//DTSBX420 JOB (UI,4300,3400,T),DTSBX420, 00000010 // CLASS=A,MSGCLASS=X, 00000010 //* TYPRUN=SCAN, // USER=#DOADTS, // NOTIFY=ECNTSUP, // REGION=0M //* 00001700 //*!!!!!!!!!!!! THIS JOB IS NOW PART OF DTSPDAY1 9/21/10 ZL1 00001700 //* 00001700 //* 00001700 // SET LVLNODE='PROD' // SET MSTNODE='PROD' // SET PRGNODE='PROD' // SET IMPNODE='PROD' // SET LVDHOLD='YES' 00001700 //* 00001700 //PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600 //** 00001700 //* IMPORT EMPLOYER DATA FROM WEB DATABASE FOR UPLOAD 00001700 //* TO MAINFRAME. 00001700 //* 00001700 //* RUNS DAILY AFTER TO WEB UPDATE (DTSBX415) 00001700 //* 00001700 //* READ-ONLY - NO MASTER FILE UPDATES. 00001700 //* 00001700 //* OUTPUT FILE: 00001700 //* 00001700 //* 00001700 //* THIS JOB MAY BE RERUN. 00001700 //* IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS. 00001700 //** 00001700 //***************************************************************** //** //STEP0200 EXEC DTSBX420 //** 00001700