You can automatically create a duplicate copy of the reports as they are created.
Below is the original JCL producing one copy of the report to class X:
//JOB6 JOB ,IOAP,CLASS=A,MSGCLASS=D
//*
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=IOAP.PROD.SAMPREPS(REPORT1)
//SYSUT2 DD SYSOUT=X
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//
Below is the amended JCL, producing one copy of the report to class X for production use, and one copy to class T for Control-D parallel testing purposes:
//JOB6 JOB ,IOAP,CLASS=A,MSGCLASS=D
//*
//OUT1 OUTPUT CLASS=X
//OUT2 OUTPUT CLASS=T
//*
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=IOAP.PROD.SAMPREPS(REPORT1)
//SYSUT2 DD SYSOUT=(,),OUTPUT=(*.OUT1,*.OUT2)
//SYSIN DD DUMMY
//SYSPRINT DD SYSOUT=*
//
Parent Topic |