zOs/JCL/CPSHR

//A540769X  JOB (CP00,KE50),REGION=0M,MSGCLASS=T,TIME=1440              00010006
//*MAIN CLASS=LOG                                                       00020001
//*******  COPY PS                                                      00030001
//CP       PROC FROM=FROMMISSING,TO=TOMISSING                           00040001
//CP       EXEC PGM=IEBGENER                                            00050001
//SYSPRINT DD SYSOUT=*                                                  00060001
//SYSUT1   DD DISP=SHR,DSN=&FROM                                        00070001
//SYSUT2   DD DISP=(NEW,CATLG,CATLG),DSN=&TO,LIKE=&FROM,                00080001
//           MGMTCLAS=NONSMS,DATACLAS=EYN08P,DSNTYPE=BASIC,             00090003
//           VOL=SER=(SHR299,SHR212,SHR242,SHR210,SHR215,               00100005
//           SHR216,SHR205,SHR215,SHR204,SHR200),                       00110005
//           SPACE=(CYL,(1000,1000))                                    00120002
//         PEND                                                         00130001
//S1       EXEC PROC=CP,                                                00140001
//           FROM=DSN.A540769.UPTB.VP02A1P.A023A.UNL,                   00150006
//           TO=DSN.A540769.UPTC.VP02A1P.A023A.UNL                      00160006