DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
73
Procs/DTSVR506
Normal file
73
Procs/DTSVR506
Normal file
@ -0,0 +1,73 @@
|
||||
//**** 00000100
|
||||
//* REPORTING FOR THE YEARLY RATINGS RUNS 1 & 2 00061000
|
||||
//**** 00080000
|
||||
//DTSARRPT PROC 00081000
|
||||
//* DEFNS NEEDED FOR THIS PROC: 00082000
|
||||
//* LVLNODE=DEVL/TEST/PROD 00083000
|
||||
//* LDEST=LOCAL (OR SOME PARTICULAR QUE DESTINATION) 00085000
|
||||
//* LHOLD=NO/YES 00085100
|
||||
//* RATEYR=CALENDAR YEAR FOR WHICH RATES ARE BEING CALCULATED 00085200
|
||||
//**** 00086000
|
||||
//STEP0100 EXEC PGM=DTSBD800, REPORT GENERATION 00650000
|
||||
// COND=(0,LT) 00660000
|
||||
//SYSOUT DD SYSOUT=* 00670000
|
||||
//SYSABOUT DD SYSOUT=* 00680000
|
||||
//SYSUDUMP DD SYSOUT=* 00690000
|
||||
//** 00700000
|
||||
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00701000
|
||||
//*DTSFVRI1 DD DSN=&&SRPTREC, 00710000
|
||||
//** DISP=(OLD,DELETE,DELETE) 00710100
|
||||
//DTSFVRI1 DD DSN=DOESTAX.PROD.RATE506.RPT.YR2014, 00710201
|
||||
// DISP=SHR 00711000
|
||||
//** 00720000
|
||||
//DTSFREF DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00730000
|
||||
// AMP=('BUFNI=5,BUFND=10') 00740000
|
||||
//** 00750000
|
||||
//PARMIN DD DUMMY 00760000
|
||||
//** 00770000
|
||||
//ATLSTIN DD DUMMY 00780000
|
||||
//** RATE NOTICES (632) MASS MAILING 00800000
|
||||
//RPT503R1 DD SYSOUT=* 00810001
|
||||
//** RATE NOTICES (632A) PENALTY RATES 00821100
|
||||
//RPT503R2 DD SYSOUT=* 00821201
|
||||
//** TRANSFERS OF EXPERIENCE RPT 00821500
|
||||
//RPT506R1 DD SYSOUT=0 00821600
|
||||
//** RATE CUTOFF ERROR LST 00822000
|
||||
//RPT507R1 DD SYSOUT=0 00823000
|
||||
//** RATE ASSIGNMENT DETAIL LST (REG) 00825100
|
||||
//RPT515R1 DD SYSOUT=* 00825201
|
||||
//** RATE ASSIGNMENT DETAIL LST (EST) 00825500
|
||||
//RPT515R2 DD SYSOUT=* 00825601
|
||||
//** RATE ASSIGNMENT DETAIL LST (FIN) 00825900
|
||||
//RPT515R3 DD SYSOUT=* 00826001
|
||||
//** RATE ASSIGNMENT ERROR LST 00826300
|
||||
//RPT516R1 DD SYSOUT=* 00826401
|
||||
//** ETA204 REPORT 00826700
|
||||
//RPT517R1 DD SYSOUT=* 00826802
|
||||
//** TEXT VERSION OF ETA204 FOR DOWNLOAD 00827100
|
||||
//RPT517R2 DD DUMMY 00827200
|
||||
//** TRUST FUND INTEREST DISTRIBUTN RPT 00827300
|
||||
//RPT520R1 DD SYSOUT=0 00827400
|
||||
//** RATE ASSIGNMENT SUMMARY RPT 00829100
|
||||
//RPT521R1 DD SYSOUT=0 00829200
|
||||
//** DETERIME NEW EMPLYR RATE 00829500
|
||||
//RPT522R1 DD SYSOUT=0 00829600
|
||||
//** ETA205 REPORT 00829800
|
||||
//RPT530R1 DD SYSOUT=* 00829900
|
||||
//** TPS EXPERIENCE RATING RECORDS (EXPORT) 00830000
|
||||
//** TPS EXPERIENCE RATING RECORDS (EXPORT) 00830100
|
||||
//RPT723R1 DD DSN=DOESTAX.&LVLNODE..RPT723.&TPSYRQ, 00830200
|
||||
//* DISP=(,CATLG,DELETE), 00830300
|
||||
// DISP=SHR, 00830400
|
||||
// SPACE=(8192,(100,200),RLSE), 00830500
|
||||
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=161,BLKSIZE=16100) 00830600
|
||||
//** 00831000
|
||||
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00831100
|
||||
//RPT907R1 DD SYSOUT=* 00832001
|
||||
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00835000
|
||||
//RPT907R2 DD SYSOUT=* 00836001
|
||||
//** CONTROL REPORT SUMMARY 00838100
|
||||
//RPT980R1 DD SYSOUT=* 00838201
|
||||
//** EXPORT CONTROL REPORT 00838500
|
||||
//RPT991R1 DD SYSOUT=* 00838601
|
||||
//* 00839000
|
||||
Reference in New Issue
Block a user