Nov 15, 2023 11:40
//COPYJOB JOB 'COPY WERT.2311.MONTHLY',CLASS=A,MSGLEVEL=(1,1)
//STEP1 EXEC PGM=IEBCOPY
//SYSUT1 DD DSN=WERT.2311.MONTHLY,DISP=SHR
//SYSUT2 DD DSN=NEW.LIBRARY1,DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1)),UNIT=SYSALLDA
//SYSUT3 DD DSN=NEW.LIBRARY2,DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1)),UNIT=SYSALLDA
//SYSUT4 DD DSN=NEW.LIBRARY3,DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1)),UNIT=SYSALLDA
//SYSIN DD *
COPY OUTDD=SYSUT2
COPY OUTDD=SYSUT3
COPY OUTDD=SYSUT4
/*