LAB5#01

//TSOZB11A JOB 3ES10G10000012,'TSOZB11',MSGCLASS=Q,MSGLEVEL=(1,1),

           NOTIFY=&SYSUID,CLASS=A,REGION=2M

//STEP1    EXEC PGM=IEBCOPY

//SYSUT1   DD DSN=D80WW.ES10V15.PROC,DISP=SHR

//SYSUT2   DD DSN=TSOZB11.ES10.PROC,DISP=(,CATLG),

//         LIKE=D80WW.ES10V15.PROC

//SYSPRINT DD SYSOUT=*

//SYSIN    DD DUMMY