sHelp
                                     ADM.CHARGES
     i   2
 ee.proc.mult
 main
   patient.type
     patient.locations
     patient.services

 Ì     i   2
ee.proc.mult
[proc.seq.no]
/ACM[acm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 proc.seq.no                  3 PINT     R                 acm                                                         
 proc.billing.code           10 FREE     L                 /ACM[acm]|2                                                 
 proc.pt.type                 4 CHOICE   L                 /ACM[acm]|0                                                 
 proc.service.location       10 FREE     L                 /ACM[acm]|1                                                 
 Ì     i   2
main
[mnemonic]
&(A)AC[ac]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    10 FREE     L                 ac                                                          
 active                       1 YN       L                 &(A)AC[ac]|0                                                
 description                 30 FREE     L                 &(A)AC[ac]|1                                                
 last.update                 30 FREE     L                 &(A)AC[ac]UPD                                               
 Ì   €   i   2
patient.type
[mnemonic,  pat.type]
&(A)AC[ac]T[act]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pat.type                     4 CHOICE   L                 act                                                         
 Ì   €   i   2
patient.locations
[mnemonic,pat.type,  location]
&(A)AC[ac]T[act]L[ggn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 location                    10 FREE     L  MIS.LOCN       ggn                                                     
 outpt.billing.code          10 FREE     L                 &(A)AC[ac]T[act]L[ggn]|0                                    
 Ì   €   i   2
patient.services
[mnemonic,pat.type,  service]
&(A)AC[ac]T[act]S[ggs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 service                     10 FREE     L  MIS.SVC        ggs                                                     
 inpt.billing.code           10 FREE     L                 &(A)AC[ac]T[act]S[ggs]|0                                    

 Index Files                        Subscripts/Physical Base

 type.index                         [pat.type,mnemonic]
                                      &(A)ACT[act,ac]

 type.location.index                [pat.type,location,mnemonic]
                                      &(A)ACTL[act,ggn,ac]

 type.service.index                 [pat.type,service,mnemonic]
                                      &(A)ACTS[act,ggs,ac]