//CRT1 JOB 1
//MYPROC PROC
//STEP1 EXEC PGM=IEFBR14
//DD1 DD DSN=&CREATE1,DISP=(NEW,CATLG),SPACE=(TRK,(5,2,0))
//SYPRINT DD SYSOUT=*
// PEND
//STEP2 EXEC MYPROC,CREATE1=KC03H09.MA5.SORT5
//SYSIN DD *
//DEL1 JOB 1
//MYPROC PROC
//STEP1 EXEC PGM=IEFBR14
//DD1 DD DSN=KC03H09.M7.M7,DISP=(OLD,DELETE,DELETE)
//SYPRINT DD SYSOUT=*
// PEND
//STEP2 EXEC MYPROC
//SYSIN DD *
No comments:
Post a Comment