sHelp
                                     ADM.MSG
       2
   adm.msg.main
     adm.msg.activities
     adm.reg
     bed.change
     cancel
     dis.depart
     edit.attend
     exclud.prov
     guar.ins
     max.obs.hrs
     pre
     sch
     swap
     undef.prov
     undo
     undo.adm
     undo.swap
     undo.xfer
     xfer

 Ì       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                                         
 Ì       2
adm.reg    (adm.reg) 
[facility,pt.status, oa.msg.adm.reg]
&AM[gqb,am]AR[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.adm.reg              10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
bed.change    (bed.change) 
[facility,pt.status, oa.msg.bed.change]
&AM[gqb,am]BC[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.bed.change           10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
cancel    (cancel) 
[facility,pt.status, oa.msg.cancel]
&AM[gqb,am]CN[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.cancel               10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
dis.depart    (dis.depart) 
[facility,pt.status, oa.msg.dis.depart]
&AM[gqb,am]DD[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.dis.depart           10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
edit.attend    (edit.attend) 
[facility,pt.status, oa.msg.edit.attend]
&AM[gqb,am]EA[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.edit.attend          10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
exclud.prov    (exclud.prov) 
[facility,pt.status, oa.msg.edit.excl.prov]
&AM[gqb,am]EP[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.edit.excl.prov       10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
guar.ins    (guar.ins) 
[facility,pt.status, oa.msg.guar.ins]
&AM[gqb,am]GI[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.guar.ins             10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
max.obs.hrs    (max.obs.hrs) 
[facility,pt.status, oa.msg.max.obs.hrs]
&AM[gqb,am]MH[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.max.obs.hrs          10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
pre    (pre) 
[facility,pt.status, oa.msg.pre]
&AM[gqb,am]PR[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.pre                  10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
sch    (sch) 
[facility,pt.status, oa.msg.sch]
&AM[gqb,am]SH[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.sch                  10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
swap    (swap) 
[facility,pt.status, oa.msg.swap]
&AM[gqb,am]SW[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.swap                 10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
undef.prov    (undef.prov) 
[facility,pt.status, oa.msg.edit.undef.prov]
&AM[gqb,am]UP[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.edit.undef.prov      10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
undo    (undo) 
[facility,pt.status, oa.msg.undo]
&AM[gqb,am]UN[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.undo                 10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
undo.adm    (undo.adm) 
[facility,pt.status, oa.msg.undo.adm]
&AM[gqb,am]UA[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.undo.adm             10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
undo.swap    (undo.swap) 
[facility,pt.status, oa.msg.undo.swap]
&AM[gqb,am]US[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.undo.swap            10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
undo.xfer    (undo.xfer) 
[facility,pt.status, oa.msg.undo.xfer]
&AM[gqb,am]UX[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.undo.xfer            10 FREE     L  MIS.OA.MSG.DICTgomd                                                    
 Ì       2
xfer    (xfer) 
[facility,pt.status, oa.msg.xfer]
&AM[gqb,am]XR[gomd]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 oa.msg.xfer                 10 FREE     L  MIS.OA.MSG.DICTgomd