| 
**************************************************************** * * * API: QWCLSCDE * * Format: SCDL0100 * * * **************************************************************** 01 SCDL0100-INPUT. 05 USER-SPACE-SPECIFIED PIC X(10). 05 USER-SPACE-LIBRARY-SPECIFIED PIC X(10). 05 FORMAT-SPECIFIED PIC X(8). 05 JOB-SCHED-NAME-SPECIFIED PIC X(10). 01 SCDL0100-HEADER. 05 JOB-SCHED-NAME-SPECIFIED PIC X(10). 05 CONTINUE-VALUE PIC X(16). 01 SCDL0100-LIST. 05 INFORMATION-STATUS PIC X(1). 05 JOB-NAME PIC X(10). 05 ENTRY-NUMBER PIC X(10). 05 SCHEDULED-DATE PIC X(10). 05 SCHEDULED-DAYS. 10 SCHEDULED-DAY OCCURS 7 TIMES PIC X(10). 05 SCHEDULED-TIME PIC X(06). |
|
05 FREQUENCY PIC X(10). 05 RELATIVE-DAY-OF-MONTH. 10 RELATIVE-DAY OCCURS 5 TIMES PIC X(10). 05 RECOVERY-ACTION PIC X(10). 05 NEXT-SUBMIT-DATE PIC X(10). 05 STAT PIC X(10). 05 JOB-QUEUE. 10 JOB-QUEUE-NAME PIC X(10). 10 JOB-QUEUE-LIBRARY PIC X(10). 05 USER-PROFILE-OF-ENTRY-ADDER PIC X(10). 05 LAST-SUBMISSION-DATE PIC X(10). 05 LAST-SUBMISSION-TIME PIC X(6). 05 TXT PIC X(50). 05 RESERVED-SPACE PIC X(23). **************************************************************** IINPUT DS I 1 20 QUSRSP I 1 10 USRSPC I 11 20 USRSPL I 21 28 FORMAT I 29 38 JOBNMI IHEADER DS |
|
I 1 10 JOBNMH I 11 26 CNTVAL ILIST DS I 1 1 INFOST I 2 11 JOBNM I 12 21 ENTNBR I 22 31 SCDDTE I 32 101 SCDDAY I 102 107 SCDTIM I 108 117 FRQNCY I 118 167 RLDYMN I 168 177 RCYACN I 178 187 NXTSBD I 188 197 STATUS I 198 217 QJOBQ I 198 207 JOBQNM I 208 217 JOBQLB I 218 227 USRADD I 228 237 LSBDTE I 238 243 LSBTME I 244 293 TEXT I 294 316 RESERV |
|
**************************************************************** * * * API: QWCLSCDE * * Format: SCDL0200 * * * **************************************************************** 01 SCDL0200-INPUT. 05 USER-SPACE-SPECIFIED PIC X(10). 05 USER-SPACE-LIBRARY-SPECIFIED PIC X(10). 05 FORMAT-SPECIFIED PIC X(8). 05 JOB-SCHED-NAME-SPECIFIED PIC X(10). 01 SCDL0200-HEADER. 05 JOB-SCHED-NAME-SPECIFIED PIC X(10). 05 CONTINUE-VALUE PIC X(16). 01 SCDL0200-LIST. 05 INFORMATION-STATUS PIC X(1). 05 JOB-NAME PIC X(10). 05 ENTRY-NUMBER PIC X(10). 05 SCHEDULED-DATE PIC X(10). 05 SCHEDULED-DAYS. 10 SCHEDULED-DAY OCCURS 7 TIMES PIC X(10). 05 SCHEDULED-TIME PIC X(06). |
|
05 FREQUENCY PIC X(10). 05 RELATIVE-DAY-OF-MONTH. 10 RELATIVE-DAY OCCURS 5 TIMES PIC X(10). 05 RECOVERY-ACTION PIC X(10). 05 NEXT-SUBMIT-DATE PIC X(10). 05 STAT PIC X(10). 05 JOB-QUEUE. 10 JOB-QUEUE-NAME PIC X(10). 10 JOB-QUEUE-LIBRARY PIC X(10). 05 USER-PROFILE-OF-ENTRY-ADDER PIC X(10). 05 LAST-SUBMISSION-DATE PIC X(10). 05 LAST-SUBMISSION-TIME PIC X(6). 05 TXT PIC X(50). 05 RESERVED-SPACE PIC X(23). 05 JOB-QUEUE-STATUS PIC X(10). 05 DATES-OMITTED. 10 DATE-OMITTED OCCURS 20 TIMES PIC X(10). 05 JOB-DESCRIPTION. 10 JOB-DESCRIPTION-NAME PIC X(10). 10 JOB-DESCRIPTION-LIBRARY PIC X(10). 05 USER-PROFILE-OF-SUBMITTED-JOB PIC X(10). 05 MESSAGE-QUEUE. |
|
10 MESSAGE-QUEUE-NAME PIC X(10). 10 MESSAGE-QUEUE-LIBRARY PIC X(10). 05 SAVE-INDICATOR PIC X(10). 05 LAST-SUBMISSION-JOB. 10 LAST-SUBMISSION-JOB-NAME PIC X(10). 10 LAST-SUBMISSION-USER-NAME PIC X(10). 10 LAST-SUBMISSION-JOB-NUMBER PIC X(6). 05 LAST-ATTEMPTED-SUBMIT-DATE PIC X(10). 05 LAST-ATTEMPTED-SUBMIT-TIME PIC X(6). 05 STATUS-LAST-ATTEMPTED-SUBMIT PIC X(10). 05 BOUNDARY-ALIGN PIC X(2). 05 NUMBER-OF-COMMAND-BYTES PIC S9(9) COMP-4. 05 COMMAND-PART1 PIC X(256). 05 COMMAND-PART2 PIC X(256). **************************************************************** IINPUT DS I 1 20 QUSRSP I 1 10 USRSPC I 11 20 USRSPL I 21 28 FORMAT I 29 38 JOBNMI IHEADER DS |
|
I 1 10 JOBNMH I 11 26 CNTVAL ILIST DS I 1 1 INFOST I 2 11 JOBNM I 12 21 ENTNBR I 22 31 SCDDTE I 32 101 SCDDAY I 102 107 SCDTIM I 108 117 FRQNCY I 118 167 RLDYMN I 168 177 RCYACN I 178 187 NXTSBD I 188 197 STATUS I 198 217 QJOBQ I 198 207 JOBQNM I 208 217 JOBQLB I 218 227 USRADD I 228 237 LSBDTE I 238 243 LSBTME I 244 293 TEXT I 294 316 RESERV |
|
I 317 326 JOBQST I 327 526 DTEOMT I 527 546 QJOBD I 527 536 JOBD I 537 546 JOBDLB I 547 556 USRJBR I 557 576 QMSGQ I 557 566 MSGQ I 567 576 MSGQLB I 577 586 SAVIND I 587 596 LSSBJB I 597 606 LSSBUS I 607 612 LSSBNB I 613 622 LASBDT I 623 628 LASBTM I 629 638 LASTAT I 639 640 FILLER I B 641 6440CMDBYT I 645 900 CMD1 I 9011156 CMD2 |
