//OPC27K01 JOB (XXX)'OPC',MSGCLASS=0,
// CLASS=#    WILL BE RESOLVED BY OPC SUBMIT-EXIT
/*JOBPARM S=ANY
//*%OPC SCAN
//*%OPC FETCH MEMBER=$HEADER
//*********************************************************
//* S010   COPY HLQ.SYSTEM.INCLOG TO HLQ.DRUCK.INCLOG
//* S020   INIT HLQ.SYSTEM.INCLOG (IEBGENER)
//*********************************************************
//S010     EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  DSN=HLQ.SYSTEM.INCLOG,DISP=SHR
//SYSUT2   DD  DSN=HLQ.DRUCK.INCLOG(+1),DISP=(,CATLG,DELETE),
//             UNIT=DISK,SPACE=(TRK,(5,1),RLSE),
//             DCB=(GDG.CAT,RECFM=FB,LRECL=80,BLKSIZE=7440)
//SYSIN    DD  *
/*
//S020     EXEC PGM=IEBGENER,COND=(0,NE,S010)
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  *
/*
//SYSUT2   DD  DSN=HLQ.SYSTEM.INCLOG,DISP=SHR,
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SYSIN    DD  DUMMY