//****                                                                  00000125
//*    REPORTING FOR THE YEARLY RATINGS RUNS 1 & 2                      00061036
//****                                                                  00080025
//*    10.26.04 MOD TPS FILE 723 TO INCLUDE YEAR AT END          -ZL1   00080155
//****                                                                  00080255
//DTSARRPT PROC                                                         00081038
//*              DEFNS NEEDED FOR THIS PROC:                            00082025
//*   LVLNODE=DEVL/TEST/PROD                                            00083025
//*   LDEST=LOCAL      (OR SOME PARTICULAR QUE DESTINATION)             00085028
//*   LHOLD=NO/YES                                                      00085136
//*   RATEYR=CALENDAR YEAR FOR WHICH RATES ARE BEING CALCULATED         00085245
//****                                                                  00086027
//STEP0100 EXEC PGM=DTSBD800,                    REPORT GENERATION      00650036
//             COND=(0,LT)                                              00660020
//SYSOUT   DD  SYSOUT=*                                                 00670020
//SYSABOUT DD  SYSOUT=*                                                 00680020
//SYSUDUMP DD  SYSOUT=*                                                 00690020
//**                                                                    00700020
//DTSFVRI1 DD  DSN=&&SRPTREC,                                           00710036
//             DISP=(OLD,DELETE,DELETE)                                 00711034
//**                                                                    00720020
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00721056
//DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                 00730029
//             AMP=('BUFNI=5,BUFND=10')                                 00740020
//**                                                                    00750020
//PARMIN   DD  DUMMY                                                    00760020
//**                                                                    00770020
//ATLSTIN  DD  DUMMY                                                    00780020
//**                         RATE NOTICES (632) MASS MAILING            00800037
//RPT503R1 DD  SYSOUT=W,                                                00810037
//             DEST=U@PRT155,                                           00820036
//             HOLD=&LHOLD.                                             00821036
//**                         RATE NOTICES (632A) PENALTY RATES          00821137
//RPT503R2 DD  SYSOUT=W,                                                00821237
//             DEST=U@PRT155,                                           00821337
//             HOLD=&LHOLD.                                             00821437
//**                         TRANSFERS OF EXPERIENCE RPT                00821537
//RPT506R1 DD  SYSOUT=Z,                                                00821637
//             DEST=&LDEST.,                                            00821737
//             HOLD=&LHOLD.                                             00821837
//**                         RATE CUTOFF ERROR LST                      00822036
//RPT507R1 DD  SYSOUT=Z,                                                00823036
//             DEST=&LDEST.,                                            00824036
//             HOLD=&LHOLD.                                             00825036
//**                         RATE ASSIGNMENT DETAIL LST  (REG)          00825153
//RPT515R1 DD  SYSOUT=Z,                                                00825237
//             DEST=&LDEST.,                                            00825337
//             HOLD=&LHOLD.                                             00825437
//**                         RATE ASSIGNMENT DETAIL LST  (EST)          00825553
//RPT515R2 DD  SYSOUT=Z,                                                00825653
//             DEST=&LDEST.,                                            00825753
//             HOLD=&LHOLD.                                             00825853
//**                         RATE ASSIGNMENT DETAIL LST  (FIN)          00825953
//RPT515R3 DD  SYSOUT=Z,                                                00826053
//             DEST=&LDEST.,                                            00826153
//             HOLD=&LHOLD.                                             00826253
//**                         RATE ASSIGNMENT ERROR LST                  00826337
//RPT515R4 DD  DSN=DOESTAX.PROD.ANNRATE.RPT515R4.TXT,DISP=SHR           00826457
//**                         RATE ASSIGNMENT ERROR LST                  00826557
//RPT516R1 DD  SYSOUT=Z,                                                00826637
//             DEST=&LDEST.,                                            00826737
//             HOLD=&LHOLD.                                             00826837
//**                         ETA204 REPORT                              00826937
//RPT517R1 DD  SYSOUT=I,                                                00827037
//             DEST=&LDEST.,                                            00827137
//             HOLD=&LHOLD.                                             00827237
//**                         TEXT VERSION OF ETA204 FOR DOWNLOAD        00827341
//RPT517R2 DD  DUMMY                                                    00827446
//**                         TRUST FUND INTEREST DISTRIBUTN RPT         00827546
//RPT520R1 DD  SYSOUT=Z,                                                00827646
//             DEST=&LDEST.,                                            00828036
//             HOLD=&LHOLD.                                             00829036
//**                         RATE ASSIGNMENT SUMMARY RPT                00829137
//RPT521R1 DD  SYSOUT=Z,                                                00829237
//             DEST=&LDEST.,                                            00829337
//             HOLD=&LHOLD.                                             00829437
//**                         DETERIME NEW EMPLYR RATE                   00829536
//RPT522R1 DD  SYSOUT=Z,                                                00829636
//             DEST=&LDEST.,                                            00829736
//             HOLD=&LHOLD.                                             00829836
//**                         TPS EXPERIENCE RATING RECORDS (EXPORT)     00829937
//RPT723R1 DD  DSN=DOESTAX.&LVLNODE..RPT723.&TPSYRQ,                    00830055
//             DISP=(,CATLG,DELETE),                                    00830255
//             SPACE=(8192,(100,200),RLSE),                             00830355
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=161,BLKSIZE=16100)        00830455
//**                                                                    00831037
//**                           UNUSUAL CONDITIONS ENCOUNTERED REPORT    00831137
//RPT907R1 DD  SYSOUT=Z,                                                00832036
//             DEST=&LDEST.,                                            00833036
//             HOLD=&LHOLD.                                             00834036
//**                           UNUSUAL CONDITIONS ENCOUNTERED REPORT    00835036
//RPT907R2 DD  SYSOUT=Z,                                                00836036
//             DEST=&LDEST.,                                            00837036
//             HOLD=&LHOLD.                                             00838036
//**                           CONTROL REPORT SUMMARY                   00838139
//RPT980R1 DD  SYSOUT=Q,COPIES=2,                                       00838239
//             HOLD=&LHOLD.,                                            00838339
//             DEST=&LDEST.                                             00838439
//**                           EXPORT CONTROL REPORT                    00838537
//RPT991R1 DD  SYSOUT=Q,COPIES=2,                                       00838647
//             DEST=&LDEST.,                                            00838737
//             HOLD=&LHOLD.                                             00838837
//*                                                                     00839036