IEBCOPY selective copy using select statements
//IEBCOPY JOB (12345),'SELECTIVE COPY',CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID
//STEP1 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=T12345.SOURCE.PDS,DISP=SHR
//SYSUT2 DD DSN=T12345.TARGET.PDS,DISP=SHR
//SYSIN DD *
COPY OUTDD=SYSUT2,
INDD=SYSUT1
SELECT MEMBER=PROG1,PROG2
/* Last updated
Was this helpful?