//**** 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 00701005 //DTSFVRI1 DD DSN=&&SRPTREC, 00710017 // DISP=(OLD,DELETE,DELETE) 00710117 //*TSFVRI1 DD DSN=DOESTAX.&LVLNODE..RATE506.RPT.&RATEYR., 00710217 //* DISP=SHR 00711017 //** 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=W, 00810000 // DEST=U@PRT155, 00820000 // HOLD=&LHOLD. 00821000 //** RATE NOTICES (632A) PENALTY RATES 00821100 //RPT503R2 DD SYSOUT=W, 00821200 // DEST=U@PRT155, 00821300 // HOLD=&LHOLD. 00821400 //** RATE FILE FOR ESSP 00821520 //RPT503R3 DD DSN=DOESTAX.PROD.RATES.RPT503,DISP=SHR 00821620 //** TRANSFERS OF EXPERIENCE RPT 00821700 //RPT506R1 DD SYSOUT=0 00821809 //** RATE CUTOFF ERROR LST 00822000 //RPT507R1 DD SYSOUT=0 00823009 //** RATE ASSIGNMENT DETAIL LST (REG) 00825103 //RPT515R1 DD SYSOUT=0 00825209 //** RATE ASSIGNMENT DETAIL LST (EST) 00825503 //RPT515R2 DD SYSOUT=0 00825609 //** RATE ASSIGNMENT DETAIL LST (FIN) 00825903 //RPT515R3 DD SYSOUT=0 00826009 //** ANNUAL FILE ONLY 00826119 //RPT515R4 DD DUMMY 00826219 //** RATE ASSIGNMENT ERROR LST 00826300 //RPT516R1 DD SYSOUT=0 00826409 //** ETA204 REPORT 00826700 //RPT517R1 DD SYSOUT=0 00826815 //** TEXT VERSION OF ETA204 FOR DOWNLOAD 00827100 //RPT517R2 DD DUMMY 00827200 //** TRUST FUND INTEREST DISTRIBUTN RPT 00827300 //RPT520R1 DD SYSOUT=0 00827409 //** RATE ASSIGNMENT SUMMARY RPT 00829100 //RPT521R1 DD SYSOUT=0 00829209 //** DETERIME NEW EMPLYR RATE 00829500 //RPT522R1 DD SYSOUT=0 00829609 //** ETA205 REPORT 00829811 //RPT530R1 DD SYSOUT=* 00829911 //** TPS EXPERIENCE RATING RECORDS (EXPORT) 00830000 //** TPS EXPERIENCE RATING RECORDS (EXPORT) 00830106 //RPT723R1 DD DSN=DOESTAX.&LVLNODE..RPT723.&TPSYRQ, 00830206 // DISP=(,CATLG,DELETE), 00830318 //* DISP=SHR, 00830418 // SPACE=(8192,(100,200),RLSE), 00830508 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=161,BLKSIZE=16100) 00830608 //** 00831000 //** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00831100 //RPT907R1 DD SYSOUT=0 00832009 //** UNUSUAL CONDITIONS ENCOUNTERED REPORT 00835000 //RPT907R2 DD SYSOUT=Z, 00836000 // DEST=&LDEST., 00837000 // HOLD=&LHOLD. 00838000 //** CONTROL REPORT SUMMARY 00838100 //RPT980R1 DD SYSOUT=0 00838209 //** EXPORT CONTROL REPORT 00838500 //RPT991R1 DD SYSOUT=0 00838609 //* 00839000