Previous Topic: JCLNeat Options Report Using REXXNext Topic: Glossary


JCLNeat Original JCL Report Using REXX

This report is a sequential listing of the statements read from the input stream specified to JCLNeat using the REXXMEM option. See the JCLNeat Original JCL report in this chapter for more information about the Original JCL Report.

CA                                         JCLNEAT ORIGINAL JCL    CA JCLCHECK     SYS: xxxx IN    //BELST029 JOB (40100000),'S. BELL',CLASS=K,MSGCLASS=X,                 00010000 IN    //     NOTIFY=BELST02                                                   00020000 REPL  //BELST029 JOB (40100000),'S. BELL',CLASS=K,MSGCLASS=A,                 00010000 IN    //STEP0  EXEC PGM=OLDPGM                                                00030000 DELT  //STEP0  EXEC PGM=OLDPGM                                                00030000 IN    //STEP1  EXEC PGM=IEFBR14                                               00031000 INSA  //STEPLIB DD DISP=SHR,DSN=CAI.J6B0.CAILOAD IN    //DD1    DD  DISP=(,CATLG),DSN=BELST02.SSC95.DATA,                      00040000 IN    //       UNIT=BOGUS,SPACE=(CYL,(1,1),RLSE),                             00050000 IN    //       DCB=(RECFM=FBA,LRECL=80,BLKSIZE=80)                            00060000 REMV  //       UNIT=BOGUS,SPACE=(CYL,(1,1)),                                  00050000 REMV  //        SPACE=(CYL,(1,1)),                                            00050000 REPL  //       DCB=(RECFM=FBA,LRECL=80,BLKSIZE=0)                             00060000 IN    //DD2    DD DISP=SHR,DSN=OBSOLETE.DATASET                               00070000 COMM  //*DD2   DD DISP=SHR,DSN=OBSOLETE.DATASET 

This is a sample of the JCLNeat Reformatted JCL report.

   CA                                            REFORMATED JCL    CA JCLCHECK     SYS: xxxx OUT //BELST029 JOB (40100000),                                              00000010 OUT //             'S. BELL',                                               00000020 OUT //             CLASS=K,                                                 00000030 OUT //             MSGCLASS=A,                                              00000040 OUT //             NOTIFY=BELST02                                           00000050 OUT //STEP1    EXEC PGM=IEFBR14                                             00000060 OUT //STEPLIB  DD  DISP=SHR,                                                00000070 OUT //             DSN=CAI.J6B0.CAILOAD                                     00000080 OUT //DD1  DD  DCB=(BLKSIZE=0,LRECL=80,RECFM=FBA),                          00000090 OUT //         DISP=(,CATLG),                                               00000100 OUT //         DSN=BELST02.SSC95.DATA,                                      00000110 OUT //         SPACE=(CYL,(1,1))                                            00000120 OUT //**------------------------------------------------------------------* 00000130 OUT //**                                                                  * 00000140 OUT //*DD2    DD DISP=SHR,DSN=OBSOLETE.DATASET                              00000150