//DTSBXREJ JOB (UI,4300,3400,T),DTSBXPEN-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 EXTNODE='CONV' 00001700 // SET RPTNODE='ESSP.BX420.RPT' 00001700 //* 00001700 //PROCLIB JCLLIB ORDER=DOESTAX.&MSTNODE..PROCS.BATCH.LIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIELIB 00001600 //** 00001700 //* PROCESS ESSP PENDING DATA FILES (REPORTS PAYMENTS AND WAGES) 00001700 //* 00001700 //** 00001700 //** THIS JOB WILL PROCESS ESSP PENDING REPORT WAGES AND PAYMENTS 00001700 //** 1. REPORTS(X140) WILL GO TO PENDING FILLE FOR 7 DAYS IF NO 00001700 //** PAYMENT(X145) FOUND. ALL REPORTS RELEASED FROM PENDING 00001700 //** FILE THE REMIT AMOUNT WILL BE ZEROED OUT. 00001700 //** 00001700 //** ESSP FILES PROCESSED BY DUTAS (PENDING FILES ONLY) 00001700 //* - X140 -EMPLOYER REPORT DATA (WAGE HEADER) 00001700 //* - X144 -EMPLOYER WAGE DETAIL 00001700 //* - X145 -EMPLOYER PAYMENT DATA 00001700 //* 00001700 //* 00001700 //* READ-ONLY - NO MASTER FILE UPDATES - CREATES T002,T003,T028 00001700 //* TRANSCATIONS 00001700 //* OUTPUT FILE: 00001700 //* DOESTAX.PROD.X418.BTC 00001700 //* 00001700 //* 00001700 //* THIS JOB MAY BE RERUN. 00001700 //* IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS. 00001700 //** 00001700 //***************************************************************** //** //STEP0200 EXEC DTSBXDTS //* //STEP0200 EXEC DTSRSESP //*** //* REPORT GENERATION //STEP0300 EXEC DTSRERPT //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 //STEP0999 EXEC DTSEINIT //** 00001700