//DTSBX452 JOB (UI,4300,3400,T),DTSBX452-ESSP-DUPS,                     00000010
//          CLASS=A,MSGCLASS=X,                                         00000010
//          NOTIFY=ECNTSUP,
//          REGION=0M
//*                                                                     00001700
//   SET LVLNODE='CONV'
//   SET MSTNODE='PROD'
//   SET LVDHOLD='YES'                                                  00001700
//   SET RPTNODE='ESSP.BX420.RPT'                                       00001700
//*                                                                     00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB                            00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//*                                                                     00001700
//******************************************************************    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*---NOTE-----RE-PROCESS DUPLICATE AMENDMENTS ONLY ----------------    00001700
//*                                                                     00001700
//**                                                                    00001700
//*   READ-ONLY - NO MASTER FILE UPDATES - CREATES T002,T003,T028       00001700
//*               TRANSCATIONS                                          00001700
//*   OUTPUT FILE:                                                      00001700
//*          DOESTAX.PROD.X452.BTC                                      00001700
//*          DOESTAX.PROD.X452.W4FILE                                   00001700
//*                                                                     00001700
//*                                                                     00001700
//*   THIS JOB MAY BE RERUN.                                            00001700
//*   IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS.                    00001700
//**                                                                    00001700
//*****************************************************************
//STEP0200 EXEC DTSBX452   / X140 AMENDED DUPLICATE REPORTS
//*
//*STEP0200 EXEC DTSZN451   / X144 AND X147 AMENDED WAGES
//*
//*------------------------------------------------------------------
//* CHANGE SORTIN BELOW TO CORRECT GDG YOU WANT TO REPROCESS      ZL1
//*------------------------------------------------------------------
//*
//*TEP0100.SORTIN DD DSN=DOESTAX.CONV.ESSP.AMEND.FAILED.X140.G1651V00,
//STEP0100.SORTIN DD DSN=DOESTAX.CONV.ESSP.AMEND.FAILED.X140.NH,
//         DISP=SHR
//STEP0100.RPT140R1 DD  HOLD=YES
//STEP0100.RPT140R2 DD  HOLD=YES
//STEP0100.RPT907R1 DD  HOLD=YES
//STEP0100.RPT907R2 DD  HOLD=YES
//STEP0100.RPT980R1 DD  HOLD=YES
//*
//X452MAIL EXEC PGM=IEBGENER,COND=(0,LT),
//         REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'CC:MARGARET.HERNANDEZ@DC.GOV',
//         'SUBJECT: DUTAS FAILED REPROCESSED AMENDED REPORTS',
//         'FILENAME:DUTAS_X452_FAILED.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.ESSP.X452PEND.TXT(+1),DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*
//Z452MAIL EXEC PGM=IEBGENER,COND=(0,LT),
//         REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//         'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'CC:MARGARET.HERNANDEZ@DC.GOV',
//         'SUBJECT: DUTAS REPROCESSED AMENDED REPORTS',
//         'FILENAME:DUTAS_X452_PASSED.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.ESSP.X452PAID.TXT(+1),DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//**                                                                    00001700