Previous Topic: RAW Data Processing SubroutineNext Topic: Reformatted JCL Report


JCLNeat Original JCL Report

This report is a sequential listing of the statements read from the input stream specified to JCLNeat using the REXXMEM option. All error messages issued by the JCLNeat REXX interface appear in this report and are prefixed with CAY6541.

CA JCLNeat ORIGINAL JCL CA JCLCHECK SYS: xxxx IN //PRODJOB JOB (40100000),'S. BELL',CLASS=O,MSGCLASS=X, 00010004 IN // NOTIFY=USER02,PRTY=15 00020004 CAY6541W Class "O" is reserved for second shift usage, retry after 5PM, it is only 11:14am class set for first shift use IN //* PRODUCTION GENERAL LEDGER JOB 00021005 IN //S0 EXEC PGM=GLPGM 00022005 IN //OBSOLETE DD DSN=BOGUS.DSNAME,DISP=SHR 00023005 CAY6541W DD named OBSOLETE was coded and is no longer required, this statement will be deleted IN //DD1 DD DSN=CAI.GL.MASTER,DISP=(NEW,CATLG,DELETE), 00023105 IN // UNIT=BOGUS,SPACE=(CYL,(500,50),RLSE), 00024004 IN // DCB=(RECFM=VB,LRECL=255,BLKSIZE=16320,DSORG=PS) 00025004 CAY6541I Unit name coded BOGUS is no longer valid and will be removed IN //DD2 DD DSN=CAI.GL.RATES,DISP=(NEW,CATLG,DELETE), 00025105 IN // UNIT=CART 00025205 IN //DD3 DD DSN=CAI.GL.OUT1,DISP=(NEW,CATLG,DELETE), 00025305 IN // UNIT=CART 00025405 IN //DD4 DD DSN=CAI.GL.OUT2,DISP=(NEW,CATLG,DELETE), 00025505 IN // UNIT=CART 00025605 IN //DD5 DD DSN=CAI.GL.MERGE,DISP=(NEW,CATLG,DELETE), 00025705 IN // UNIT=CART 00025805 IN //DD6 DD DSN=CAI.GL.SPLIT,DISP=(NEW,CATLG,DELETE), 00025905 IN // UNIT=CART 00026005 IN //COMMENT DD DSN=BOGUS.DSNAME,DISP=SHR 00027005 CAY6541I DD named COMMENT will be commented out, it is no longer vaild IN //S1 EXEC PGM=IEFBR14 00028006 CAY6541E Step S0 is using 5 cartridge drives, please reduce utilization CAY6541S JOB PRODJOB_ has encountered too many site violations