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

69 lines
5.4 KiB
Plaintext

//**** 00000100
//* REPORTING FOR THE YEARLY RATINGS RUNS 1 & 2 00061000
//**** 00080000
//* 10.26.04 MOD TPS FILE 723 TO INCLUDE YEAR AT END -ZL1 00080100
//**** 00080200
//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
//DTSFVRI1 DD DSN=DOESTAX.PROD.RATE517.ANNRPT.YR2007,DISP=SHR 00710001
// DD DSN=DOESTAX.PROD.RATE506.RPT.YR2007,DISP=SHR 00711002
//** 00720000
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00721000
//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
//** 00810001
//RPT503R1 DD DUMMY 00821603
//RPT503R2 DD DUMMY 00821703
//RPT517R1 DD DUMMY 00821803
//RPT517R2 DD DUMMY 00821903
//RPT723R1 DD DUMMY 00822003
//RPT907R1 DD DUMMY 00822103
//RPT907R2 DD DUMMY 00822203
//RPT980R1 DD DUMMY 00822303
//RPT991R1 DD DUMMY 00822403
//RPT506R1 DD SYSOUT=(V,DTS506Y1),HOLD=&LVDHOLD 00822503
//** 00822603
//** RATE CUTOFF ERROR LST 00822703
//** 00823001
//RPT507R1 DD SYSOUT=(V,DTS507Y1),HOLD=&LVDHOLD 00824002
//** 00825001
//** RATE ASSIGNMENT DETAIL LST (REG) 00825100
//RPT515R1 DD SYSOUT=(V,DTS515Y1),HOLD=&LVDHOLD 00825302
//** 00825401
//** RATE ASSIGNMENT DETAIL LST (EST) 00825600
//RPT515R2 DD SYSOUT=(V,DTS515Y2),HOLD=&LVDHOLD 00825802
//** 00825901
//** RATE ASSIGNMENT DETAIL LST (FIN) 00826100
//** 00826201
//RPT515R3 DD SYSOUT=(V,DTS515Y3),HOLD=&LVDHOLD 00826302
//** 00826401
//** RATE ASSIGNMENT ERROR LST 00826600
//RPT516R1 DD SYSOUT=(V,DTS516Y1),HOLD=&LVDHOLD 00826802
//** 00826901
//** TRUST FUND INTEREST DISTRIBUTN RPT 00827700
//RPT520R1 DD SYSOUT=(V,DTS520Y1),HOLD=&LVDHOLD 00827902
//** 00828001
//** RATE ASSIGNMENT SUMMARY RPT 00829100
//RPT521R1 DD SYSOUT=(V,DTS521Y1),HOLD=&LVDHOLD 00829302
//** 00829401
//** DETERIME NEW EMPLYR RATE 00829600
//RPT522R1 DD SYSOUT=(V,DTS522Y1),HOLD=&LVDHOLD 00829802
//** 00829901
//* 00839000