giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DUTAS re-platformed to Raincode - Initial Source Code

Browse Source
This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
JCL/DTSBX475.jcl Normal file
View File

@ -0,0 +1,34 @@
//DTSBX475 JOB (UI,4300,3400,T),EMP.ADDR.EXTRACT.BEN, 00000010
// CLASS=P,MSGCLASS=X, 00000010
//* TYPRUN=SCAN,
// USER=#DOADTS,
//*** USER=ECNTSUP,
// NOTIFY=ECNTSUP,
// REGION=0M
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//* 00001700
// SET UINODE='PROD'
// SET LVLNODE='PROD'
// SET MSTNODE='PROD'
//* 00001700
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB 00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600
//** 00001700
//* EXTRACT EMPLOYER DATA (NAME, ADDRESS, CLASS, STATUS, RATE) 00001700
//* FROM TAX MASTER FILES FOR USE IN A BENEFITS WEB APPLICATION 00001700
//* 00001700
//* RUNS AS PART OF THE WEEK-END PROCESS 00001700
//* 00001700
//* READ-ONLY - NO MASTER FILE UPDATES. 00001700
//* 00001700
//* OUTPUT FILE: UI.TAX.PROD.WEEKLY.EXTRACT 00001700
//* 00001700
//* THIS JOB MAY BE RERUN. THE TIMING IS NOT CRITICAL. 00001700
//* IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS. 00001700
//* IF IT IS RERUN, IT MUST BE THROUGH CA7, SINCE IT WRITES TO 00001700
//* A FILE WITH A HIGH LEVEL NODE OF 'UI'. 00001700
//** 00001700
//STEP0100 EXEC DTSBX475
//*** (FOLLOWING FILE CAN BE USED FOR TEST OVERRIDE) 00001700
//***STEP0100.ADRFILE DD DSN=DOESTAX.DEVL.UI.WEEKLY.EXTRACT
//** 00001700