Files
DUTAS/Procs/DTSRRRPT
2025-07-21 11:20:11 -04:00

82 lines
6.4 KiB
Plaintext

//**** 00000100
//* REPORTING FOR THE YEARLY RATINGS RUNS 1 & 2 (RERUN ONLY) 00061001
//**** 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=DOESTAX.&LVLNODE..RATE517.RPT.&RATEYR., 00710201
// DISP=SHR 00711001
//** 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 DUMMY 00810001
//*PT503R1 DD SYSOUT=W, 00811001
//* DEST=U@PRT155, 00820001
//* HOLD=&LHOLD. 00821001
//** RATE NOTICES (632A) PENALTY RATES 00821100
//RPT503R2 DD DUMMY 00821201
//*PT503R2 DD SYSOUT=W, 00821301
//* DEST=U@PRT155, 00821401
//* HOLD=&LHOLD. 00821501
//** TRANSFERS OF EXPERIENCE RPT 00821600
//RPT506R1 DD SYSOUT=0 00821700
//** RATE CUTOFF ERROR LST 00822000
//RPT507R1 DD SYSOUT=0 00823000
//** RATE ASSIGNMENT DETAIL LST (REG) 00825100
//RPT515R1 DD SYSOUT=0 00825200
//** RATE ASSIGNMENT DETAIL LST (EST) 00825500
//RPT515R2 DD SYSOUT=0 00825600
//** RATE ASSIGNMENT DETAIL LST (FIN) 00825900
//RPT515R3 DD SYSOUT=0 00826000
//** ANNUAL FILE ONLY 00826100
//RPT515R4 DD DUMMY 00826200
//** RATE ASSIGNMENT ERROR LST 00826300
//RPT516R1 DD SYSOUT=0 00826400
//** ETA204 REPORT 00826700
//RPT517R1 DD SYSOUT=0 00826800
//** 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=0 00832000
//** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00835000
//RPT907R2 DD SYSOUT=Z, 00836000
// DEST=&LDEST., 00837000
// HOLD=&LHOLD. 00838000
//** CONTROL REPORT SUMMARY 00838100
//RPT980R1 DD SYSOUT=0 00838200
//** EXPORT CONTROL REPORT 00838500
//RPT991R1 DD SYSOUT=0 00838600
//* 00839000