//****                                                                  00000100
//**                                                                    00000200
//**         EXTRACT STEP FOR THE ANNUAL RATING RUN 3?                  00000307
//**         PRODUCES 'FINAL' RATES FOR HOUSEHOLD EMPLOYERS             00000407
//**         FILING ANNUALLY.                                           00000507
//**                   (WITH MSTR UPDATE)                               00000601
//**                                                                    00000700
//DTSUX518 PROC                                                         00000807
//**              DEFNS NEEDED FOR THIS PROC:                           00001009
//**   LVLNODE = DEVL/TEST/PROD                                         00001109
//**   BD710   = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE            00001212
//**   BD750   = RTE-YR-START-YRQ,UPDATE-MASTER-IND,RUN TYPE            00001312
//**   BD790   = RTE-YR-START-YRQ                                       00001412
//****                                                                  00001512
//**** REMOVED BD710 FROM PROC - ESTIMATED RATE ALREADY EXIST; CREATED  00001614
//**** DURING NORMAL YEARLY RUN                                XL1      00001714
//****                                                                  00001814
//*STEP0100 EXEC PGM=DTSBD710,         INITIALIZE ANNUAL RATING         00001914
//*             COND=(0,LT),           CUTOFF RECORD OCCURRENCES        00002014
//*             PARM='&BD710.'         RTE-YR-START-YRQ,PURGE-MRCT-IND  00002114
//*SYSOUT   DD  SYSOUT=*                              (= Y IF A RERUN)  00002214
//*SYSABOUT DD  SYSOUT=*                                                00002314
//*SYSUDUMP DD  SYSOUT=*                                                00002414
//*DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                     00002514
//*DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                00002614
//*             AMP=('BUFNI=5,BUFND=10')                                00002714
//*DTSFCHG5 DD  DSN=DOESTAX.&LVLNODE..VSAM.CHGM005,DISP=SHR,            00002814
//*             AMP=('BUFNI=5,BUFND=10')                                00002914
//*DTSFVRO1 DD  DSN=DOESTAX.&LVLNODE..PER.RPT(+1),                      00003014
//*             DISP=(,CATLG,DELETE),                                   00003114
//*             SPACE=(8192,(1000,1000),RLSE),                          00003214
//*             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)       00003314
//****                                                                  00003414
//STEP0100 EXEC PGM=DTSBD750,     ASSIGN RATES                          00003514
//            COND=(0,LT),           CUTOFF RECORD OCCURRENCES          00003616
//             PARM='&BD750.'     RTE-YR-START-YRQ,UPDATE-MASTER-IND    00003714
//SYSOUT   DD  SYSOUT=*                                                 00004000
//SYSABOUT DD  SYSOUT=*                                                 00005000
//SYSUDUMP DD  SYSOUT=*                                                 00006000
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00007010
//DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                 00008000
//             AMP=('BUFNI=5,BUFND=10')                                 00009000
//DTSFVRO1 DD  DSN=DOESTAX.&LVLNODE..PER.RPT(+1),                       00010014
//             DISP=(,CATLG,DELETE),                                    00020000
//             SPACE=(8192,(1000,1000),RLSE),                           00030000
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)        00040011
//DTSFBTCO DD  DSN=DOESTAX.&LVLNODE..BTC(+1),                           00050000
//             DISP=(,CATLG,DELETE),                                    00060000
//             SPACE=(8192,(1000,1000),RLSE),                           00070000
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)        00080011
//****                                                                  00090000