sHelp
                                     PHA.APM
     i   2
 main

 Ì   €   i   2
main
[mnemonic]
&(T)TPM[tapm]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mnemonic                    10 FREE     L                 tapm                                                        
 active                       1 YN       L                 &(T)TPM[tapm]|0                                             
 facility.id                 10 CHOICE   L                 &(T)TPM[tapm]|5                                             
 inventory                   10 FREE     L  MM.INVENT      &(T)TPM[tapm]|2                                         
 last.update                 50 FREE     L                 &(T)TPM[tapm]UPD                                            
 msg.type                    12 FREE     L  MIS.X.MSG.TYPE &(T)TPM[tapm]|3                                         
 name                        30 FREE     L                 &(T)TPM[tapm]|1                                             
 recipient                   12 FREE     L  MIS.XO.RECIP   &(T)TPM[tapm]|4                                         

 Index Files                        Subscripts/Physical Base

 inventory.x                        [inventory,mnemonic] = active
                                      &(T)TPMI[mi,tapm]