zOs/SKELS/DBXCPR

//CPREP    EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DISP=(OLD,DELETE),DSN=&&CPG
//SYSUT2   DD DISP=SHR,DSN=$cdlPds
//SYSIN    DD *
       COPY INDD=SYSUT1,OUTDD=SYSUT2