//DTSBXACH 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..PROCLIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIELIB 00001600 //** 00001700 //* PROCESS ESSP ACH PAYMENTS FILES 00001700 //* 00001700 //** 00001700 //** THIS JOB WILL PROCESS ESSP ACH PAYMENTS TO DUTAS 00001700 //* 00001700 //* 00001700 //* THIS JOB MAY BE RERUN. 00001700 //* IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS. 00001700 //** 00001700 //***************************************************************** //** //STEP0200 EXEC DTSBXACH //* //STEP0300 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