         PROC  &P,1                                                     OMH00100
ZM#DOMH  NAME  0                                                        OMH00200
ZA#OMH   DSECT                                                          OMH00300
*                                                                       OMH00400
*  OUTPUT MESSAGE HEADER                                                OMH00500
*                                                                       OMH00600
ZA#ODTID DS    CL4                 DESTINATION TERMINAL ID              OMH00700
         DS    XL4                 RESERVED FOR SYSTEM USE              OMH00800
ZA#CONT  DS    XL4                 CONTINUOUS OUTPUT CODE               OMH00810
ZA#OMHL  EQU   *-ZA#OMH            OUTPUT MSG AREA HEADER LENGTH        OMH00900
ZA#OTL   DS    H                   MESSAGE LENGTH                       OMH01000
ZA#OAUX  DS    CL2                 AUXILIARY-DEVICE-ID                  OMH01100
*                                                                       OMH01200
*   EQUATES FOR ZA#OAUX                                                 OMH01300
*                                                                       OMH01400
ZA#ONCOP EQU   X'00'               NO COP SUPPORT REQUESTED             OMH01500
ZA#OCO   EQU   X'C3'               CONTINUOUS OUTPUT REQ                OMH01510
ZA#OOIQ  EQU   X'C9'               QUEUE AS INPUT FOR DEST. TCT         OMH01520
ZA#OCOP  EQU   X'F0'               COP OUTPUT REQUESTED                 OMH01600
ZA#OCOCP EQU   X'F3'               CONTINUOUS OUTPUT TO COP             OMH01610
ZA#OPTCP EQU   X'F4'               PRINT TRANSPARENT TO COP             OMH01620
ZA#OPCOC EQU   X'F7'               CONTINUOUS OUTPUT TO COP WITH        OMH01630
*                                  PRINT TRANSPARENT                    OMH01640
*                                                                       OMH01700
*   EQUATES FOR ZA#OAUX+1                                               OMH01800
*                                                                       OMH01900
ZA#ODID1 EQU   C'1'                DEVICE = AUX1                        OMH02000
ZA#ODID2 EQU   C'2'                DEVICE = AUX2                        OMH02100
ZA#ODID3 EQU   C'3'                DEVICE = AUX3                        OMH02200
ZA#ODID4 EQU   C'4'                DEVICE = AUX4                        OMH02300
ZA#ODID5 EQU   C'5'                DEVICE = AUX5                        OMH02400
ZA#ODID6 EQU   C'6'                DEVICE = AUX6                        OMH02500
ZA#ODID7 EQU   C'7'                DEVICE = AUX7                        OMH02600
ZA#ODID8 EQU   C'8'                DEVICE = AUX8                        OMH02700
ZA#ODID9 EQU   C'9'                DEVICE = AUX9                        OMH02800
         EJECT                                                          OMH02900
         END                                                            OMH03000
