sHelp
                                     PHA.CLAIM.FORM
     i   2
   pha.claim.form.dictionary
     pha.claim.form.claim.hdr
     pha.claim.form.claim.hdr.opt
     pha.claim.form.claim.info
     pha.claim.form.claim.info.opt
     pha.claim.form.dict.insurances
     pha.claim.form.reversal
     pha.claim.form.reversal.opt

 Ì     i   2
pha.claim.form.dictionary    (main) 
[mnemonic]
&TCO[tco]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 tco                                                         
 active                       1 YN       L                 &TCO[tco]|0                                                 
 cds                         15 FREE     L  MIS.SCREEN     &TCO[tco]|2                                             
 claims.per.txn               2 PINTZ    R                 &TCO[tco]|4                                                 
 last.update                 50 FREE     L                 &TCO[tco]UPD                                                
 name                        30 FREE     L                 &TCO[tco]|1                                                 
 variable                     1 YN       L                 &TCO[tco]|3                                                 
 Ì     i   2
pha.claim.form.claim.hdr    (claim.header) 
[mnemonic, claim.header.q]
&TCO[tco]CH[tcoCH]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 claim.header.q               3 PINT     R                 tcoCH                                                       
 claim.header.field          10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]CH[tcoCH]|0                                    
 Ì     i   2
pha.claim.form.claim.hdr.opt    (claim.header.optional) 
[mnemonic, claim.header.opt.q]
&TCO[tco]CHO[tcoCh]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 claim.header.opt.q           3 PINT     R                 tcoCh                                                       
 claim.header.opt.field      10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]CHO[tcoCh]|0                                   
 Ì     i   2
pha.claim.form.claim.info    (claim.info) 
[mnemonic, claim.info.q]
&TCO[tco]CI[tcoCI]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 claim.info.q                 3 PINT     R                 tcoCI                                                       
 claim.info.field            10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]CI[tcoCI]|0                                    
 Ì     i   2
pha.claim.form.claim.info.opt    (claim.info.optional) 
[mnemonic, claim.info.opt.q]
&TCO[tco]CIO[tcoCi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 claim.info.opt.q             3 PINT     R                 tcoCi                                                       
 claim.info.opt.field        10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]CIO[tcoCi]|0                                   
 Ì     i   2
pha.claim.form.dict.insurances    (insurances) 
[mnemonic, insurance]
&TCO[tco]I[ggm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 insurance                   10 FREE     L  MIS.INS.DICT   ggm                                                     
 Ì     i   2
pha.claim.form.reversal    (reversal) 
[mnemonic, reversal.q]
&TCO[tco]R[tcoR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 reversal.q                   3 PINT     R                 tcoR                                                        
 reversal.field              10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]R[tcoR]|0                                      
 Ì     i   2
pha.claim.form.reversal.opt    (reversal.optional) 
[mnemonic, reversal.opt.q]
&TCO[tco]RO[tcoRO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 reversal.opt.q               3 PINT     R                 tcoRO                                                       
 reversal.opt.field          10 FREE     L  PHA.CLAIM.FIELD&TCO[tco]RO[tcoRO]|0                                    
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 pha.claim.form.insurance.index     [insurance] = mnemonic
   insurance.x                        &TCOI[ggm]