//A540769G JOB (CP00,KE50) 00010000
//RM PROC FROM=FROMMISSING 00020000
//RM EXEC PGM=IEFBR14 00030000
//DEL DD DISP=(MOD,DELETE,DELETE),DSN=&FROM 00040000
// PEND 00050000
//CP PROC FROM=FROMMISSING,TO=TOMISSING 00060000
//CP EXEC PGM=IEBGENER 00070000
//SYSPRINT DD SYSOUT=* 00080000
//SYSUT1 DD DISP=SHR,DSN=&FROM 00090000
//SYSUT2 DD DISP=(NEW,CATLG,DELETE),DSN=&TO,LIKE=&FROM 00100000
// PEND 00110000
//DO PROC T=TT,F=FFF 00120000
//DO0 EXEC PROC=RM, 00130000
// FROM=A540769.ZZZ.TEST&T..FILE&F..SUF 00140000
//DO1 EXEC PROC=CP, 00150000
// FROM=DOD.RZ1.T0.TEST.T&T..POVTV&T..LTL&T&F, 00160000
// TO=A540769.ZZZ.TEST&T..FILE&F..SUF 00170000
// PEND 00180000
//T1F0 EXEC PROC=DO,T=01,F=000 00190000
//T1F1 EXEC PROC=DO,T=01,F=001 00200000
//T2F0 EXEC PROC=DO,T=02,F=000 00210000
//T2F1 EXEC PROC=DO,T=02,F=001 00220000