Files
DUTAS/JCL/IB14flatfile.jcl

19 lines
713 B
Plaintext

//JOBINPUT JOB (INNOVA,DEV,TEAM),MANOJ,CLASS=S,MSGCLASS=X
//*STEP011 EXEC PGM=IEFBR14
//*SYSPRINT DD SYSOUT=*
//*SYSOUT DD SYSOUT=*
//*DD0011 DD DSN=DOESTAX.CONV.TDEC.ESSP.MISSING.WAGES,
//* DISP=(NEW,CATLG,CATLG),
//* DISP=SHR,
//* DCB=(RECFM=FB,LRECL=512,BLKSIZE=8192),
//* PATH=('e:\FLAT_FILES\DOESTAX.CONV.TDEC.ESSP.MISSING.WAGES',
//* COPY)
//*
//STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
//DTSRJ420 DD DSN=DOESTAX.CONV.ESSP.RPT630.TXT,
// DISP=(NEW,CATLG,CATLG),
//** DISP=(OLD,KEEP,KEEP),
//** SPACE=(CYL,(5,5)),
// DCB=(RECFM=FB,LRECL=134,BLKSIZE=1340)
//*
//