Tuesday, April 17, 2012

to copy the members

//MYJOB JOB
//MYPROC PROC
//STEP1 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DISP=SHR,DSN=KC03K7B.TODAY.PDS
//SYSUT2 DD DISP=SHR,DSN=KC03K7B.NEW.PDS
// PEND
//STEP1 EXEC MYPROC
//SYSIN DD

No comments:

Post a Comment