//****                                                                  00000010
//*   PROCESS TDEC CHECK DEPOSIT FILES                                  00001700
//*                                                                     00001700
//*   RUNS DAILY TAX UPDATE (DTSPDAY1)                                  00001700
//**                                                                    00001700
//DTSBXCHK PROC
//**                                                                    00001700
//STEP0220 EXEC PGM=DTSBX429,
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//SYSUDUMP DD  SYSOUT=*
//*                                                                     00001700
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFATC  DD  DSN=DOESTAX.&MSTNODE..VSAM.ATC,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***
//DTSFX145 DD  DSN=DOESTAX.&IMPNODE..TDECDOES.CHKPAY(+0),
//             DISP=OLD                                                 00006000
//*                                                                     00001700
//DTSPX145 DD  DSN=&&PENDX145,                                          00005000
//             DISP=(NEW,PASS,DELETE),                                  00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(8192,(1000,200),RLSE),
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120)
//*                                                                     00001700
//DTSFBTCO DD  DSN=DOESTAX.&MSTNODE..TDEC.X429.BTC,                     00005000
//*            DISP=(NEW,CATLG,DELETE),                                 00006000
//*            DISP=SHR,                                                00006000
//             DISP=MOD,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//*
//X429RPT1 DD  DSN=DOESTAX.&LVLNODE..TDEC.X429PAID.TXT(+1),
//             DISP=(,CATLG,DELETE),
//*            DISP=(OLD,KEEP,KEEP),
//             SPACE=(30000,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=134,BLKSIZE=1340)
//*
//X429RPT2 DD  DSN=DOESTAX.&LVLNODE..TDEC.X429PEND.TXT(+1),
//             DISP=(,CATLG,DELETE),
//*            DISP=(OLD,KEEP,KEEP),
//             SPACE=(30000,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=133,BLKSIZE=1330)
//*
//DTSFVRO1 DD  DSN=DOESTAX.&LVLNODE..ESSP.BX420.RPT(+1),                00409000
//             DISP=(,CATLG,DELETE),
//*            DISP=(OLD,KEEP,KEEP),                                    00410000
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192)
//
//* SEND EMAIL WHEN INPUT FILES EMPTY
//***********************************************************
//STEP0230 EXEC PGM=IEBGENER,COND=(3,NE,STEP0220),REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO: ZARATH.LALPUTAN@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//         'SUBJECT: NO TDEC CHECKS TODAY .....ZL1',
//         'FILEDESC: DOES-TDEC DAILY CHECK PROCESSING         ',
//         'FILENAME:NO_TDEC_DOES_CHECK.TXT')
//SYSUT1   DD DSN=DOESTAX.&EXTNODE..TDEC.NOCHECK.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//***********************************************************
//* SEND EMAIL WHEN CHECK FILES HAS ERRORS
//***********************************************************
//***********************************************************
//STEP0240 EXEC PGM=IEBGENER,COND=(2,NE,STEP0220),REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:ZARATH.LALPUTAN@DC.GOV',
//*        'CC:GERALD.SMART@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//*        'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: TDEC DAILY CHECKS HAS ERROR..ZL1',
//         'FILEDESC: TDEC DOES  ERROR REPORT                   ',
//         'FILENAME:ERROR_DOES_DUTAS.TXT')
//SYSUT1   DD DSN=DOESTAX.&EXTNODE..TDEC.ERORCHK.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//***********************************************************
//* SEND EMAIL WHEN CHECK FILES PROCESSED
//***********************************************************
//***********************************************************
//STEP0245 EXEC PGM=IEBGENER,COND=(3,LT),REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:MARGARET.HERNANDEZ@DC.GOV',
//         'CC:ESAYAS.LEMMA@DC.GOV',
//         'CC:NANCY.HUDAK@DC.GOV',
//         'CC:RAJINI.JUJJAVARAPU@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: TDEC DAILY CHECKS REPORT.....ZL1',
//         'FILEDESC: TDEC DOES CHECKS REPORT                   ',
//         'FILENAME:TDEC_DOES_CHECK.TXT')
//SYSUT1   DD DSN=DOESTAX.&EXTNODE..TDEC.X429PAID.TXT(+1),DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//*
//STEP0250 EXEC PGM=IDCAMS,           COPY X145 PENDING TO GDG
//             COND=(3,LT)
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=&&PENDX145,
//             DISP=(OLD,DELETE,DELETE),                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120)
//OUTDD01  DD  DSN=DOESTAX.CONV.TDEC.PENDING.X429.CHKS(+1),
//             DISP=(,CATLG,DELETE),
//*            DISP=SHR,
//             SPACE=(25600,(100,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120)
//SYSIN    DD  DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//*
//*********************************************************************
//*
//STEP0260 EXEC PGM=IDCAMS,           COPY CHKS RECEIVE TO QTR FILE
//             COND=(3,LT)
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=DOESTAX.CONV.TDEC.DOES.DAILY.CHKS,
//             DISP=OLD,                                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120)
//OUTDD01  DD  DSN=DOESTAX.CONV.TDEC.DOES.DAILY.CHKS.G2014Q4,
//*            DISP=(,CATLG,DELETE),
//             DISP=MOD,
//             SPACE=(25600,(100,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120)
//SYSIN    DD  DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//
//****************            END OF PROC FOR NOW             ZL1******
//STEP0420 EXEC PGM=IDCAMS,           COPY X145 PENDING TO GDG
//             COND=(0,LT)
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=&&PENDX145,
//             DISP=(OLD,DELETE,DELETE),                                00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(8192,(100,200),RLSE),
//             DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120)
//OUTDD01  DD  DSN=DOESTAX.DEVL.PENDING.X435.X145,
//*            DISP=(,CATLG,DELETE),
//             DISP=SHR,
//             SPACE=(25600,(100,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120)
//SYSIN    DD  DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//*
//*********************************************************************