sHelp
                                     LSI.VIP
     i   2
 main
   hosp.mnemonics

 Ì     i   2
main
[mnemonic]
&(HN1)HNAV[nav]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    10 FREE     L                 nav                                                         
 active                       1 YN       L                 &(HN1)HNAV[nav]|0                                           
 name                        30 FREE     L                 &(HN1)HNAV[nav]|1                                           
 Ì   €   i   2
hosp.mnemonics
[mnemonic,  hosp.mnemonic]
&(HN1)HNAV[nav]H[navH]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 hosp.mnemonic               10 FREE     L                 navH                                                        

 Index Files                        Subscripts/Physical Base

 hosp.mnemonic.x                    [hosp.mnemonic] = mnemonic
                                      &(HN1)HNAVH[navH]