Filter
Top Products
1 QWD-JOBD1 REDEFINES RECEIVER-VARIABLE.
5 BYTES-RETURNED PIC S9(9) BINARY.
5 BYTES-AVAILABLE PIC S9(9) BINARY.
5 JOB-DESCRIPTION-NAME PIC X(1).
5 JOB-DESCRIPTION-LIB-NAME PIC X(1).
5 USER-NAME PIC X(1).
5 JOB-DATE PIC X(8).
5 JOB-SWITCHES PIC X(8).
5 JOB-QUEUE-NAME PIC X(1).
5 JOB-QUEUE-LIB-NAME PIC X(1).
5 JOB-QUEUE-PRIORITY PIC X(2).
5 HOLD-JOB-QUEUE PIC X(1).
5 OUTPUT-QUEUE-NAME PIC X(1).
5 OUTPUT-QUEUE-LIB-NAME PIC X(1).
5 OUTPUT-QUEUE-PRIORITY PIC X(2).
5 PRINTER-DEVICE-NAME PIC X(1).
5 PRINT-TEXT PIC X(3).
5 SYNTAX-CHECK-SEVERITY PIC S9(9) BINARY.
5 END-SEVERITY PIC S9(9) BINARY.
5 MESSAGE-LOG-SEVERITY PIC S9(9) BINARY.
5 MESSAGE-LOG-LEVEL PIC X(1).
5 MESSAGE-LOG-TEXT PIC X(1).
5 LOG-CL-PROGRAMS PIC X(1).
5 INQUIRY-MESSAGE-REPLY PIC X(1).
5 DEVICE-RECOVERY-ACTION PIC X(13).
5 TIME-SLICE-END-POOL PIC X(1).
5 ACCOUNTING-CODE PIC X(15).
5 ROUTING-DATA PIC X(8).
5 TEXT-DESCRIPTION PIC X(5).
5 RESERVED PIC X(1).
5 OFFSET-INITIAL-LIB-LIST PIC S9(9) BINARY. 19
5 NUMBER-LIBS-IN-LIB-LIST PIC S9(9) BINARY. 2
5 OFFSET-REQUEST-DATA PIC S9(9) BINARY.
5 LENGTH-REQUEST-DATA PIC S9(9) BINARY.
5 JOB-MESSAGE-QUEUE-MAX-SIZE PIC S9(9) BINARY.
5 JOB-MESSAGE-QUEUE-FULL-ACTION PIC X(1).
ᑍ 5 RESERVED2 PIC X(1).
ᑍ
ᑍ Varying length
ᑍ 5 INITIAL-LIB-LIST PIC X(11).
ᑍ
ᑍ
ᑍ Varying length
ᑍ 5 REQUEST-DATA PIC X(1).
ᑍ
ᑍ Varying length
ᑍ
ᑍ Command String Data Structure
ᑍ
1 COMMAND-STRING.
5 TEXT1 PIC X(22) VALUE 'SNDMSG MSG(''LIBRARY- '.
5 LIB PIC X(1).
5 TEXT2 PIC X(15) VALUE ''') TOUSR(QPGMR)'.
ᑍ
1 COMMAND-LENGTH PIC S9(1)V99999 COMP-3.
1 RECEIVER-LENGTH PIC S9(9) COMP-4.
1 FORMAT-NAME PIC X(8) VALUE 'JOBD1'.
1 QCMDEXC PIC X(1) VALUE 'QCMDEXC'.
Appendix B. Original Examples in Additional Languages B-27