DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
28
JCL/DTSDX148.jcl
Normal file
28
JCL/DTSDX148.jcl
Normal file
@ -0,0 +1,28 @@
|
||||
//DTSDX148 JOB (UI,4300,3400,T),EDIT-TDEC-DELQ-WAGES, 00000010
|
||||
// CLASS=A,MSGCLASS=X, 00000010
|
||||
// USER=#DOADTS,
|
||||
// NOTIFY=ECNTSUP,
|
||||
// REGION=0M
|
||||
//* 00001700
|
||||
//*************************************************** 00001700
|
||||
//* MATCH W4 TRANSACTIONS TO REPORTS
|
||||
//*************************************************** 00001700
|
||||
//* 00001700
|
||||
// SET LVLNODE='PROD'
|
||||
// SET EXTNODE='CONV'
|
||||
// SET MSTNODE='PROD'
|
||||
// SET PRGNODE='PROD'
|
||||
// SET LVDHOLD='YES'
|
||||
// SET LDEST='LOCAL'
|
||||
// SET LHOLD='YES'
|
||||
//* 00001700
|
||||
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB 00001600
|
||||
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
|
||||
//*****************************************************************
|
||||
//***
|
||||
//*****************************************************************
|
||||
//* RUN TDEC DELING WAGES JOB
|
||||
//*****************************************************************
|
||||
//STEP0100 EXEC PROC=DTSDX148,
|
||||
// RUNTYPE='DELINQ'
|
||||
//***
|
||||
Reference in New Issue
Block a user