//DTSBX530 JOB (UI,4300,3400,T),DTSBXPAY-ESSP-RPTS,                     00000010
//          CLASS=A,MSGCLASS=X,                                         00000010
//*          TYPRUN=SCAN,
//          USER=#DOADTS,
//          NOTIFY=ECNTZL1,
//          REGION=0M
//*                                                                     00001700
//   SET LVLNODE='CONV'
//   SET MSTNODE='PROD'
//   SET PRGNODE='CONV'
//   SET IMPNODE='CONV'
//   SET LVDHOLD='YES'                                                  00001700
//   SET LHOLD='YES'                                                    00001700
//   SET EXTNODE='CONV'                                                 00001700
//   SET RPTNODE='ESSP.BX420.RPT'                                       00001700
//*                                                                     00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCLIB                            00001600
//LOADLIBS INCLUDE MEMBER=DTSITLIB                                      00001600
//**                                                                    00001700
//*   PROCESS EMPLOYER QUARTERLY PAYMENT DATA FROM ESSP AND CREATE      00001700
//*   T025 TRANSACTIONS FOR DUTAS CICS SYSTEM                           00001700
//**                                                                    00001700
//** THIS JOB WILL PROCESS ALL TDEC AND ESSP PAYMENTS ---- 040119 ZL1   00001700
//**                                                                    00001700
//**  PAYMENTS(X145) WILL GO TO PENDING FILE WHEN NO EMPLOYER PROFILE   00001700
//**     RECORD FOUND.                                                  00001700
//**                                                                    00001700
//** ESSP FILES PROCESSED BY DUTAS:                                     00001700
//*      - X145 -EMPLOYER PAYMENT DATA (ESSP)                           00001700
//*      - PAYMT - TDEC REPORT PAYMENT DATA FROM TDEC                   00001700
//*                                                                     00001700
//*   READ-ONLY - NO MASTER FILE UPDATES - CREATES T025 TRANSACTIONS    00001700
//*                                                                     00001700
//*   OUTPUT FILES:                                                     00001700
//*          DOESTAX.PROD.ESSP.X530.BTC                                 00001700
//*          DOESTAX.PROD.ESSP.PENDING.X145                             00001700
//*                                                                     00001700
//*   THIS JOB MAY BE RERUN BUT IT WILL CREATE DUPLICATE PENDING FILES  00001700
//*****  DELETE LAST GENERATION OF PENDING FILES CREATED OR DUPLICATE   00001700
//*****  REPORT WILL BE REPORTED ON THE PENDING FILES WHEN PROCESSED    00001700
//*   IT REBUILDS THE OUTPUT BTC AND WAGE FILE EACH TIME IT RUNS.       00001700
//**                                                                    00001700
//*************************************            01/19/17     ZL1
//*                                                                     00001700
//STEP0200 EXEC DTSBX530
//*
//STEP0200 EXEC DTSRSESP
//*                                         REPORT GENERATION
//*TEP0300 EXEC DTSRQRPT
//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
//**                                                                    00001700