Tuesday, 17 April 2012

Create Dataset using procedure


//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=KC03H0E.MCA5.SORT5
//SYSIN DD *

No comments:

Post a Comment