DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
34
JCL/DTSBX415.jcl
Normal file
34
JCL/DTSBX415.jcl
Normal file
@ -0,0 +1,34 @@
|
||||
//DTSBX415 JOB (UI,4300,3400,T),DTSBX415, 00000010
|
||||
// CLASS=S,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'
|
||||
//* 00001700
|
||||
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB 00001600
|
||||
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
|
||||
//** 00001700
|
||||
//* IMPORT EMPLOYER DATA FROM WEB DATABASE FOR UPLOAD 00001700
|
||||
//* TO MAINFRAME. 00001700
|
||||
//* 00001700
|
||||
//* RUNS DAILY PRIOR TO TAX UPDATE (DTSPDAY1) 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
|
||||
//*****************************************************************
|
||||
//*** GET DAILY WEB T011 DATA
|
||||
//STEP0100 EXEC DTSBX415
|
||||
//** 00001700
|
||||
Reference in New Issue
Block a user