| 
**************************************************************** * * * API: QUSLSPL * * Format: SPLF0100 * * Language: Cobol * * * **************************************************************** 01 SPLF0100-INPUT. 05 USER-SPACE. 10 SPACE-NAME PIC X(10). 10 LIBRARY PIC X(10). 05 FORMAT-SPECIFIED PIC X(08). 05 USER-NAME-SPECIFIED PIC X(10). 05 OUTPUT-QUEUE-SPECIFIED. 10 OUTQ-NAME-SPECIFIED PIC X(10). 10 LIBRARY-SPECIFIED PIC X(10). 05 FORM-TYPE-SPECIFIED PIC X(10). 05 USER-DATA-SPECIFIED PIC X(10). 01 SPLF0100-HEADER. 05 USER-NAME-RETURNED PIC X(10). 05 OUTPUT-QUEUE-RETURNED. 10 OUTQ-NAME-RETURNED PIC X(10). |
|
10 LIBRARY-RETURNED PIC X(10). 01 SPLF0100-LIST. 05 USER-NAME PIC X(10). 05 OUTPUT-QUEUE. 10 OUTQ-NAME PIC X(10). 10 LIBRARY PIC X(10). 05 FORM-TYPE PIC X(10). 05 USER-DATA PIC X(10). 05 INTERNAL-JOB-ID PIC X(16). 05 INTERNAL-SPOOL-FILE-ID PIC X(16). **************************************************************** IINPUT DS I 1 20 USRSPC I 1 10 SPCNAM I 11 20 SPCLIB I 21 28 OUTFMT I 29 38 USRNMI I 39 58 OUTQI I 39 48 OUTQNI I 49 58 OUTQLI I 59 68 FRMTYI I 69 78 USRDTI |
|
IHEADER DS I 1 10 USNMLB I 11 30 OUTQH I 11 20 OUTQNH I 21 30 OUTQLH ILIST DS I 1 10 USRNML I 11 30 OUTQL I 11 20 OUTQNL I 21 30 OUTQLL I 31 40 FRMTYL I 41 50 USRDTL I 51 66 JOBID I 67 82 SPLFID |
