//TRNG111A JOB CLASS=C,NOTIFY=TRNG111
//STEP1 EXEC PGM=IEFBR14
//AA DD DSN=TRNG111.AA.DATA,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1))
//STEP2 EXEC PGM=IEFBR14
//BB DD DSN=TRNG111.BB.DATA,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1))
//STEP3 EXEC PGM=IEFBR14
//CC DD DSN=TRNG111.CC.DATA,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1))
//STEP4 EXEC PGM=IEFBR14
//AD DD DSN=TRNG111.DD.DATA,DISP=(NEW,CATLG),
// SPACE=(TRK,(1,1))
RUN PGMX
//TRNG111X JOB CLASS=A,NOTIFY=TRNG111
//S1 EXEC PGM=IEBEDIT
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=TRNG111.NEW.JCL(PGMX),DISP=SHR
//SYSUT2 DD SYSOUT=(*,INTRDR)
//SYSIN DD *
EDIT START=TRNG111A,TYPE=INCLUDE,STEPNAME=(STEP1,STEP3)
No comments:
Post a Comment