****************************************************************
* *
* API: QSPROUTQ *
* Format: OUTQ0100 *
* *
****************************************************************
01 OUTQ0100-RCVVAR.
05 BYTES-RETURNED PIC S9(9) COMP-4.
05 BYTES-AVAILABLE PIC S9(9) COMP-4.
05 OUTPUT-QUEUE-NAME PIC X(10).
05 OUTPUT-QUEUE-LIBRARY PIC X(10).
05 ORDER-OF-FILES PIC X(10).
05 DISPLAY-ANY-FILE PIC X(10).
05 JOB-SEPARATORS PIC S9(9) COMP-4.
05 OPERATOR-CONTROL PIC X(10).
05 DATA-QUEUE-NAME PIC X(10).
05 DATA-QUEUE-LIBRARY PIC X(10).
05 AUTHORITY-TO-CHECK PIC X(10).
05 NUMBER-OF-FILES PIC S9(9) COMP-4.
05 OUTPUT-QUEUE-STATUS PIC X(10).
05 WRITER-JOB-NAME PIC X(10).
05 WRITER-JOB-USER-NAME PIC X(10).
| 
| 
| 