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

51
Procs/DTSUX518 Normal file
View File

@ -0,0 +1,51 @@
//**** 00000100
//** 00000200
//** EXTRACT STEP FOR THE ANNUAL RATING RUN 3? 00000307
//** PRODUCES 'FINAL' RATES FOR HOUSEHOLD EMPLOYERS 00000407
//** FILING ANNUALLY. 00000507
//** (WITH MSTR UPDATE) 00000601
//** 00000700
//DTSUX518 PROC 00000807
//** DEFNS NEEDED FOR THIS PROC: 00001009
//** LVLNODE = DEVL/TEST/PROD 00001109
//** BD710 = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE 00001212
//** BD750 = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE 00001312
//** BD790 = RTE-YR-START-YRQ 00001412
//**** 00001512
//**** REMOVED BD710 FROM PROC - ESTIMATED RATE ALREADY EXIST; CREATED 00001614
//**** DURING NORMAL YEARLY RUN XL1 00001714
//**** 00001814
//*STEP0100 EXEC PGM=DTSBD710, INITIALIZE ANNUAL RATING 00001914
//* COND=(0,LT), CUTOFF RECORD OCCURRENCES 00002014
//* PARM='&BD710.' RTE-YR-START-YRQ,PURGE-MRCT-IND 00002114
//*SYSOUT DD SYSOUT=* (= Y IF A RERUN) 00002214
//*SYSABOUT DD SYSOUT=* 00002314
//*SYSUDUMP DD SYSOUT=* 00002414
//*DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00002514
//*DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00002614
//* AMP=('BUFNI=5,BUFND=10') 00002714
//*DTSFCHG5 DD DSN=DOESTAX.&LVLNODE..VSAM.CHGM005,DISP=SHR, 00002814
//* AMP=('BUFNI=5,BUFND=10') 00002914
//*DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..PER.RPT(+1), 00003014
//* DISP=(,CATLG,DELETE), 00003114
//* SPACE=(8192,(1000,1000),RLSE), 00003214
//* DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00003314
//**** 00003414
//STEP0100 EXEC PGM=DTSBD750, ASSIGN RATES 00003514
// COND=(0,LT), CUTOFF RECORD OCCURRENCES 00003616
// PARM='&BD750.' RTE-YR-START-YRQ,UPDATE-MASTER-IND 00003714
//SYSOUT DD SYSOUT=* 00004000
//SYSABOUT DD SYSOUT=* 00005000
//SYSUDUMP DD SYSOUT=* 00006000
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00007010
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00008000
// AMP=('BUFNI=5,BUFND=10') 00009000
//DTSFVRO1 DD DSN=DOESTAX.&LVLNODE..PER.RPT(+1), 00010014
// DISP=(,CATLG,DELETE), 00020000
// SPACE=(8192,(1000,1000),RLSE), 00030000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00040011
//DTSFBTCO DD DSN=DOESTAX.&LVLNODE..BTC(+1), 00050000
// DISP=(,CATLG,DELETE), 00060000
// SPACE=(8192,(1000,1000),RLSE), 00070000
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) 00080011
//**** 00090000