sHelp
                                     LAB.R.FEE
     i   2
 main
   clients
   schedule

 Ì     i   2
main
[mnemonic]
&(S)SRM[srm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    10 FREE     L                 srm                                                         
 active                       1 YN       L                 &(S)SRM[srm]|0                                              
 discountable                 1 YN       L                 &(S)SRM[srm]|2                                              
 effective.date               8 DATE     L                 &(S)SRM[srm]|3                                              
 last.update                  9 FREE     L                 &(S)SRM[srm]UPD                                             
 name                        30 FREE     L                 &(S)SRM[srm]|1                                              
 Ì   €   i   2
clients
[mnemonic,  client]
&(S)SRM[srm]CL[ggg]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 client                      10 FREE     L  MIS.DOC        ggg                                                     
 Ì   €   i   2
schedule
[mnemonic,  bill.code]
&(S)SRM[srm]S[srmP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bill.code                   10 FREE     L  LAB.C.BC       srmP                                                    
 allow.discount               1 YN       L                 &(S)SRM[srm]S[srmP]|2                                       
 bill.code.desc              50 FREE     L                 &(S)SRM[srm]S[srmP]|0                                       
 bill.price                   7 SMONEY   R                 &(S)SRM[srm]S[srmP]|1                                       

 Index Files                        Subscripts/Physical Base

 bill.code.fee.x                    [bill.code,mnemonic] = 0
                                      &(S)SRMB[srmP,srm]