zOs/JCL/GDGCOPY

//A540769A  JOB (CP00,KE50)                                             00010001
//S1       EXEC PGM=IEFBR14                                             00020001
//******************************************************************    00040001
//*
//S001     EXEC  PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSIN    DD  DUMMY
//SYSUT1   DD DSN=PO.WM.POVSMM.G0235V00,DISP=SHR
//SYSUT2   DD DSN=A540769.POVDOKU.MM235,DISP=(NEW,CATLG),
//             SPACE=(CYL,(500,100)),UNIT=3390,
//             DCB=(RECFM=VB,LRECL=6229,BLKSIZE=31145)
//*