sHelp
                                     PHA.SITE
       2
   pha.site.dictionary
     pha.site.dict.comments
     pha.site.dict.contacts
     pha.site.dict.facilities
     pha.site.dict.patient.types
       pha.site.dict.inventories

 Ì       2
pha.site.dictionary    (main) 
[mnemonic]
&TDSI[tdsi]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 tdsi                                                        
 active                       1 YN       L                 &TDSI[tdsi]|0                                               
 address.1                   30 FREE     L                 &TDSI[tdsi]|2                                               
 address.2                   30 FREE     L                 &TDSI[tdsi]|3                                               
 city                        20 FREE     L                 &TDSI[tdsi]|4                                               
 director                    25 FREE     L                 &TDSI[tdsi]|8                                               
 gl.corp                      4 FREE     L  MIS.GL.CORP    &TDSI[tdsi]|10                                          
 last.update                 50 FREE     L                 &TDSI[tdsi]UPD                                              
 name                        30 FREE     L                 &TDSI[tdsi]|1                                               
 phone                       20 FREE     L                 &TDSI[tdsi]|7                                               
 postal.code                 10 ZIP.POST L                 &TDSI[tdsi]|6                                               
 province                     2 FREE     L                 &TDSI[tdsi]|5                                               
 rx.prefix                    2 FREE     L                 &TDSI[tdsi]|9                                               
 state                        2 FREE     L                 &TDSI[tdsi]|5                                               
 user.site                   10 FREE     L                 VAL=/.PHA.SITE                                              
 zcus.uk.address.county      20 FREE     L                 &TDSI[tdsi]ZCUSUK|1                                         
 zcus.uk.address.district    10 FREE     L                 &TDSI[tdsi]ZCUSUK|0                                         
 Ì        2
pha.site.dict.comments    (comments) 
[mnemonic, comment.q]
&TDSI[tdsi]M[tdsiM]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 comment.q                    3 PINT     R                 tdsiM                                                       
 any.comments                 1 FREE     L                 VAL=IF{@comments[mnemonic,1] @Z.check.mark}                 
 comment                     80 FREE     L                 &TDSI[tdsi]M[tdsiM]                                         
 Ì        2
pha.site.dict.contacts    (contacts) 
[mnemonic, contact.q]
&TDSI[tdsi]C[tdsiC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 contact.q                    2 PINT     R                 tdsiC                                                       
 contact.name                25 FREE     L                 &TDSI[tdsi]C[tdsiC]|0                                       
 contact.phone               20 FREE     L                 &TDSI[tdsi]C[tdsiC]|2                                       
 contact.title               15 FREE     L                 &TDSI[tdsi]C[tdsiC]|1                                       
 Ì        2
pha.site.dict.facilities    (facilities) 
[mnemonic, facility]
&TDSI[tdsi]F[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 Ì        2
pha.site.dict.patient.types    (patient.types) 
[mnemonic, patient.type]
&TDSI[tdsi]P[tdsiP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 patient.type                 3 CHOICE   L                 tdsiP                                                       
 Ì        2
pha.site.dict.inventories    (inventories) 
[mnemonic,patient.type, order.type]
&TDSI[tdsi]P[tdsiP]I[tdo]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 order.type                  10 FREE     L  PHA.OT         tdo                                                     
 inventory                   10 FREE     L  MM.INVENT      &TDSI[tdsi]P[tdsiP]I[tdo]|0