DUTAS re-platformed to Raincode - Initial Source Code

2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions
--- a/JCL/GSIRQ300.jcl
+++ b/JCL/GSIRQ300.jcl
@ -0,0 +1,22 @@
+//GSIRQ300 JOB (UI,4300,3400,T),WAGE-FILE-UPD,CLASS=S,MSGCLASS=X,       00000010
+//**        TYPRUN=SCAN,
+//          USER=#DOADTS,
+//          NOTIFY=ECNTSUP
+/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
+//**
+//  SET  UINODE='PROD'            REGION VSAM MASTER FILES
+//  SET MSTNODE='PROD'            REGION VSAM MASTER FILES
+//  SET LVLNODE='PROD'            REGION BATCH LOADLIB/PROCLIB
+//*
+//****
+//*    UI TAX DAILY WAGE FILE REBUILD                               *
+//*                                                                 *
+//*    NOTE:  BEFORE RUNNING THIS JOB, CLOSE THE FILES IN THE       *
+//*           CICS REGION.                                          *
+//*                                                                 *
+//**
+//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB                       00001600
+//LOADLIBS INCLUDE MEMBER=DTSIJGSI                                      00001600
+//*                                                                     00001700
+//STEP0100 EXEC DES300T1      EXTRACT DATA FROM WAGE FILE
+//*********************************************************************