sHelp
                                     ADM.MSG
       2
   adm.msg.main
     adm.msg.activities

 Ì       2
adm.msg.main    (main) 
[facility,pt.status]
&AM[gqb,am]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 pt.status                    3 CHOICE   L                 am                                                          

 Ì   €�     2
adm.msg.activities    (activities) 
[facility,pt.status, activity]
&AM[gqb,am]A[amA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 activity                    10 CHOICE   L                 amA                                                         
 oa.message                  10 FREE     L                 &AM[gqb,am]A[amA]|0