sHelp
                                     ADM.MSG
       2
 main
   adm.reg
   bed.change
   cancel
   dis.depart
   edit.attend
   guar.ins
   pre
   sch
   swap
   undo
   undo.adm
   undo.swap
   undo.xfer
   xfer

 Ì   €     2
main
[facility,pt.status]
&(A)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.reg
[facility,pt.status,  oa.msg.adm.reg]
&(A)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
[facility,pt.status,  oa.msg.bed.change]
&(A)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
[facility,pt.status,  oa.msg.cancel]
&(A)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
[facility,pt.status,  oa.msg.dis.depart]
&(A)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
[facility,pt.status,  oa.msg.edit.attend]
&(A)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
guar.ins
[facility,pt.status,  oa.msg.guar.ins]
&(A)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
pre
[facility,pt.status,  oa.msg.pre]
&(A)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
[facility,pt.status,  oa.msg.sch]
&(A)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
[facility,pt.status,  oa.msg.swap]
&(A)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
undo
[facility,pt.status,  oa.msg.undo]
&(A)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
[facility,pt.status,  oa.msg.undo.adm]
&(A)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
[facility,pt.status,  oa.msg.undo.swap]
&(A)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
[facility,pt.status,  oa.msg.undo.xfer]
&(A)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
[facility,pt.status,  oa.msg.xfer]
&(A)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