//****                                                                  00000010
//*   EXTRACT EMPLOYER DATA FROM TAX MAINFRAME FILES                    00001700
//*   INTO COMMA-SEPARATED FILES FOR WEB DATABASE                       00001700
//*                                                                     00001700
//*   RUNS DAILY FOLLOWING TAX UPDATE (DTSPDAY1)                        00001700
//**                                                                    00001700
//DTSBX441 PROC
//**                                                                    00001700
//STEP0100 EXEC PGM=DTSBX441,
//             COND=(0,LT),
//             REGION=4096K
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***  CORRECTED INACTIVATE DATE AND CODE
//*XPBX104 DD  DSN=DOESTAX.DEVL.X104.COMBIND.INPUT,DISP=SHR
//*
//EXPBX104 DD  DSN=DOESTAX.CONV.ESSP.DAILY.FTP.X104,DISP=SHR
//*
//EXPNW104 DD  DSN=DOESTAX.CONV.ESSP.DAILY.FTP.X104.UPD,DISP=SHR
//*
//STEP0200 EXEC PGM=IDCAMS,           COPY X104 UPD FILE TO GDG
//             COND=(0,LT)
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=DOESTAX.CONV.ESSP.DAILY.FTP.X104.UPD,
//             DISP=SHR
//*
//OUTDD01  DD  DSN=DOESTAX.CONV.ESSP.DAILY.FTP.X104,DISP=SHR
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
//*
//STEP0300 EXEC PGM=IDCAMS,           COPY X104 UPD FILE FOR BKUP
//             COND=(0,LT)
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=DOESTAX.CONV.ESSP.DAILY.FTP.X104.UPD,
//             DISP=SHR
//*
//OUTDD01  DD  DSN=DOESTAX.CONV.ESSP.X441.X104(+1),
//             DISP=(,CATLG,DELETE),
//             SPACE=(23800,(100,200),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=119,BLKSIZE=2380)
//SYSIN    DD  DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
//*
//*********************************************************************