//****                                                                  00000100
//*    REPORTING FOR THE ANNUAL FILERS RATES NOTICES                    00061002
//****                                                                  00080000
//DTSVARPT PROC                                                         00081001
//*              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                                      00701007
//DTSFVRI1 DD  DSN=&&SRPTREC,                                           00710000
//             DISP=(OLD,DELETE,DELETE)                                 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
//RPT723R1 DD  SYSOUT=*                                                 00790010
//RPT503R1 DD  SYSOUT=W,                                                00791010
//             DEST=&LDEST.,                                            00800006
//             HOLD=&LHOLD.                                             00810006
//RPT503R2 DD  SYSOUT=W,                                                00820008
//             DEST=&LDEST.,                                            00821006
//             HOLD=&LHOLD.                                             00822006
//RPT503R3 DD  DSN=DOESTAX.CONV.ESSP.RATE.&RATEYR.,                     00822113
//*            DISP=SHR,                                                00822213
//             DISP=(NEW,CATLG,DELETE),                                 00822313
//             UNIT=SYSDA,                                              00822413
//             SPACE=(800,(500,500),RLSE),                              00822513
//             DCB=(RECFM=FB,LRECL=24,BLKSIZE=2400)                     00822613
//**                         RATE CUTOFF ERROR LST                      00823009
//RPT507R1 DD  SYSOUT=Z,                                                00824009
//             DEST=&LDEST.,                                            00825009
//             HOLD=&LHOLD.                                             00825109
//**                         RATE ASSIGNMENT DETAIL LST  (REG)          00825200
//RPT515R1 DD  SYSOUT=0                                                 00825311
//*            DEST=&LDEST.,                                            00825411
//*            HOLD=&LHOLD.                                             00825511
//RPT515R2 DD  SYSOUT=X,                                                00825603
//             DEST=&LDEST.,                                            00825703
//             HOLD=&LHOLD.                                             00825803
//RPT515R3 DD  SYSOUT=X,                                                00825903
//             DEST=&LDEST.,                                            00826003
//             HOLD=&LHOLD.                                             00826103
//RPT515R4 DD  SYSOUT=X,                                                00826212
//             DEST=&LDEST.,                                            00826312
//             HOLD=&LHOLD.                                             00826412
//**                         RATE ASSIGNMENT ERROR LST                  00826500
//RPT516R1 DD  SYSOUT=0                                                 00826611
//*            DEST=&LDEST.,                                            00826711
//*            HOLD=&LHOLD.                                             00826811
//**                                                                    00826904
//RPT517R1 DD  SYSOUT=X,                                                00827004
//             DEST=&LDEST.,                                            00827104
//             HOLD=&LHOLD.                                             00827204
//**                                                                    00827305
//RPT517R2 DD  SYSOUT=X,                                                00828005
//             DEST=&LDEST.,                                            00829005
//             HOLD=&LHOLD.                                             00829105
//**                         RATE ASSIGNMENT SUMMARY RPT                00829200
//RPT521R1 DD  SYSOUT=0                                                 00829311
//*            DEST=&LDEST.,                                            00829411
//*            HOLD=&LHOLD.                                             00829511
//**                           UNUSUAL CONDITIONS ENCOUNTERED REPORT    00829609
//RPT907R1 DD  SYSOUT=0                                                 00829711
//*            DEST=&LDEST.,                                            00829811
//*            HOLD=&LHOLD.                                             00829911
//**                           UNUSUAL CONDITIONS ENCOUNTERED REPORT    00831100
//RPT907R2 DD  SYSOUT=Z,                                                00836000
//             DEST=&LDEST.,                                            00837000
//             HOLD=&LHOLD.                                             00838000
//**                           CONTROL REPORT SUMMARY                   00838100
//RPT980R1 DD  SYSOUT=0                                                 00838211
//*            HOLD=&LHOLD.,                                            00838311
//*            DEST=&LDEST.                                             00838411
//**                           EXPORT CONTROL REPORT                    00838500
//RPT991R1 DD  SYSOUT=0                                                 00838611
//*            DEST=&LDEST.,                                            00838711
//*            HOLD=&LHOLD.                                             00838811
//*                                                                     00839000