//****                                                                  00000100
//**                                                                    00000200
//**         EXTRACT STEP FOR THE ANNUAL RATINGS RUN 2A                 00000305
//**                   (*NO* MSTR UPDATE)                               00000405
//**                                                                    00000505
//DTSUX503 PROC                                                         00000605
//**              DEFNS NEEDED FOR THIS PROC:                           00000705
//**   LVLNODE = DEVL/TEST/PROD                                         00000805
//**   BD750   = RTE-YR-START-YRQ,UPDATE-MASTER-IND                     00000908
//**   BD790   = RTE-YR-START-YRQ                                       00001008
//**   CHGNODE = PROD/TEST/DEVL                                         00001117
//**   CHGMNBR = CHGM002                                                00001217
//****                                                                  00001308
//STEP0100 EXEC PGM=DTSBD750,     ASSIGN RATES                          00002016
//             PARM='&BD750.'     RTE-YR-START-YRQ,UPDATE-MASTER-IND    00003006
//SYSOUT   DD  SYSOUT=*                                                 00004001
//SYSABOUT DD  SYSOUT=*                                                 00005001
//SYSUDUMP DD  SYSOUT=*                                                 00006001
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00007014
//DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                 00008001
//             AMP=('BUFNI=5,BUFND=10')                                 00009001
//DTSFVRO1 DD  DSN=DOESTAX.&LVLNODE..PER.RPT(+1),                       00010001
//             DISP=(,CATLG,DELETE),                                    00020001
//             SPACE=(8192,(1000,1000),RLSE),                           00030001
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)        00040001
//DTSFBTCO DD  DSN=DOESTAX.&LVLNODE..BTC(+1),                           00050001
//             DISP=(,CATLG,DELETE),                                    00060001
//             SPACE=(8192,(1000,1000),RLSE),                           00070001
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)        00080001
//****                                                                  00090001
//STEP0200 EXEC PGM=DTSBD790,     ETA 204 DATA EXTRACT AND ASSEMBLY.    00260017
//             COND=(0,LT),                                             00280017
//             PARM='&BD790.'       RTE-YR-START-YRQ                    00290017
//SYSOUT   DD  SYSOUT=*                                                 00300017
//SYSABOUT DD  SYSOUT=*                                                 00310017
//SYSUDUMP DD  SYSOUT=*                                                 00320017
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00330017
//DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                 00340017
//             AMP=('BUFNI=5,BUFND=10')                                 00350017
//BENCHRGI DD  DSN=DOESTAX.&CHGNODE..VSAM.&CHGMNBR.,DISP=SHR,           00361017
//             AMP=('BUFNI=5,BUFND=30')                                 00362017
//DTSFVRO1 DD  DSN=DOESTAX.&LVLNODE..PER.RPT(+2),                       00370017
//             DISP=(,CATLG,DELETE),                                    00380017
//             SPACE=(8192,(1000,1000),RLSE),                           00390017
//             DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)        00400017
//****                                                                  00410003