Thursday, April 4, 2013

JCL to Copy Dataset

This JCL will copy a dataset (SYSYUT1) to new dataset (SYSUT2)

 

//****************************************************
//**                COPY DATASET                    **
//****************************************************

//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=<INPUT DSN>,DISP=SHR
//SYSUT2 DD DSN=<OUTPUT DSN>,
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// SPACE=(CYL,(50,10),RLSE),AVGREC=K,
// DCB=*.SYSUT1
//SYSIN DD DUMMY 

No comments:

Post a Comment