//* ------------------------------------------------------------------- 00030000
//* COPY ONLINE JCL-CHANGES TO GDG AND INIT LOG DATASET                 00030000
//* ------------------------------------------------------------------- 00030000
//IEBGENE1 EXEC PGM=IEBGENER
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DSN=HLQ.SYSMOD.TEMPJCL.LOG,DISP=OLD
//SYSUT2   DD DSN=HLQ.SYSMOD.JCLLOG(+1),
//            DISP=(NEW,CATLG),
//            DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3325),
//            SPACE=(TRK,(75,10),RLSE),
//            UNIT=SYSDA
//*                                                                     00030000
//IEBGENE2 EXEC PGM=IEBGENER
//SYSIN    DD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1   DD DUMMY,
//            DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3325)
//SYSUT2   DD DSN=HLQ.SYSMOD.TEMPJCL.LOG,DISP=OLD