//CREGDG01 JOB (INNOVA,DEV,TEAM),NEERAJ,CLASS=S,MSGCLASS=X //STEP0420 EXEC PGM=IDCAMS, INITIALIZE EMPTY BD400.BTC 00926000 // COND=(0,LT) GENERATION 00927000 //SYSPRINT DD SYSOUT=* 00928000 //INDD01 DD DUMMY 00929000 //OUTDD01 DD DSN=DOESTAX.PROD.BTC(+1), 00929100 // DISP=(,CATLG,DELETE), 00929200 // SPACE=(8192,(100,200),RLSE), 00929500 // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) 00929600 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR 00929700 // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.PROD.BTC) - LIMIT(255) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X425ACHD) - LIMIT(20) - EMPTY - SCRATCH) //***************************************************************** // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDECDOES.CHKPAY) - LIMIT(20) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDECDOES.CHKPAY) - LIMIT(20) - EMPTY - SCRATCH) // //****************************************************************** //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.FAILED.X144) - LIMIT(10) - EMPTY - DOESTAX.CONV.CURRMINI SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.FROMESSP.PASSED.X140) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X436PEND.TXT) - LIMIT(10) - EMPTY - SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X436PAID.TXT) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.PROD.ESSP.PENDING.X145) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.PENDING.X144) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.PROD.ESSP.PENDING.X140) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X430PEND.TXT) - LIMIT(10) - EMPTY - SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X430PAID.TXT) - LIMIT(10) - EMPTY - SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.DEVL.X426.BTC) - LIMIT(10) - EMPTY - DOESTAX.CONV.ESSP.X430PAID.TXT SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.AMEND.FAILED.X140) - LIMIT(10) - EMPTY - SCRATCH) //* //*STEP001 EXEC PGM=IDCAMS //*SYSPRINT DD SYSOUT=* //*SYSIN DD * //* DEFINE GDG(NAME(DOESTAX.CONV.ESSP.BX420.RPT) - //* LIMIT(10) - //* EMPTY - //* SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X451PEND.TXT) - LIMIT(10) - EMPTY - SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X451PAID.TXT) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSPAMEN.DAYX147) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSPAMEN.DAYX144) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSPAMEN.DAYX140) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDECESSP.RLSERPW) - LIMIT(10) - EMPTY -DOESTAX.CONV.ESSPAMEN.DAYX140 SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X530PEND.TXT) - LIMIT(10) - EMPTY - SCRATCH) // DOESTAX.CONV.TDECESSP.RLSERPW //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X530PAID.TXT) - LIMIT(10) - EMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.DOESESSP.X145DACH) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.PROD.TDECESSP.PAYX530) - LIMIT(10) - NOEMPTY - SCRATCH)DOESTAX.CONV.DOESESSP.X145DACH // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* DOESTAX.PROD.TDECESSP.PAYX530 //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.DOESESSP.X145SCHK) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.DOESESSP.X145EACH) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDECESSP.RPTX430) LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X424PEND.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X424PAID.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X421PAID.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) //* // /STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X421PEND.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) //** // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.FROMESSP) - LIMIT(10) - NOEMPTY - SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.RPTACH) - LIMIT(10) - NOEMPTY - SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.BX420.RPT) - LIMIT(10) - NOEMPTY - SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X438PEND.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) //* //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X438PAID.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X425ACHD) - LIMIT(10) - NOEMPTY - SCRATCH) //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDEC.X429PEND.TXT) - LIMIT(10) - NOEMPTY - SCRATCH) //* // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDEC.DOES.SDAILY.CHKS) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDECDOES.CHKPAY) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.PENDING.X437.PAY) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.ESSP.X437.BTC) - LIMIT(10) - NOEMPTY - SCRATCH) // DOESTAX.CONV.ESSP.X437PAID.TXT //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.FROMESSP.BKPX999) - LIMIT(10) - NOEMPTY - SCRATCH) // //STEP001 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSIN DD * DEFINE GDG(NAME(DOESTAX.CONV.TDEC.DOES.RPTPAY) - LIMIT(10) - NOEMPTY - SCRATCH) // //IMPMF04 JOB //* //STEP002 EXEC PGM=IEFBR14 //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DD1001 DD DSN=TMPZ0004, // DISP=(,PASS,DELETE), //* DISP=DHR, // DCB=(LRECL=750,RECFM=FB), // PATH=('E:\FLAT_FILES\DOESTAX.PROD.FTP.REFUND.X303EXP', // COPY) //* //STEP004 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SORTIN DD DSN=TMPZ0004,DISP=SHR //SORTOUT DD DSN=DOESTAX.PROD.FTP.REFUND.X303EXP,DISP=SHR //* DISP=(,CATLG,DELETE), //* UNIT=SYSDA, //* SPACE=(CYL,(20,10),RLSE), //* DCB=(RECFM=FB,LRECL=750,BLKSIZE=7500) //SYSIN DD * REPRO IFILE(SORTIN) OFILE(SORTOUT) /* //