//DTSBZ22X JOB (UI,4300,3400,T),PROD.HHCONV.SPEC,                       00010002
//         CLASS=P,MSGCLASS=X,                                          00020000
//         NOTIFY=ECNTSUP,                                              00030001
//***      USER=OPCSUB,                                                 00040000
//         REGION=0M                                                    00050000
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00060000
//     SET LVLNODE='PROD'                                               00070003
//****                                                                  00080000
//* 11/10/02 - JHP                                                      00090001
//*   THOSE STEPS FROM THE HH PARALLEL RUN TO CONVERT THE               00100001
//*      PROD FILES FOR NEW FIELDS                                      00110001
//* NOTE:  BEFORE RUNNING THIS JOB, CLOSE THE HTST FILES                00120000
//****                                                                  00130000
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB                       00190000
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00200000
//****                                                                  00261000
//****     /*  SPEC. CONV. STEP TO INIT NEW MRTE & MRCT DATA ELEMENTS   00270000
//STEP0030 EXEC PGM=DTSBZ220,                                           00270100
//             COND=(0,LT)                                              00270200
//SYSOUT   DD  SYSOUT=*                                                 00270400
//SYSABOUT DD  SYSOUT=*                                                 00270500
//SYSABEND DD  SYSOUT=*                                                 00270600
//CAIMRPTS DD  SYSOUT=*                                                 00270700
//*                                                                     00270800
//DTSFMSTR INCLUDE MEMBER=DTSIMSTX                                      00270900
//****                                                                  00271100
//****     /*  SPEC. CONV. STEP TO INIT NEW FUIR DATA ELEMENTS          00271200
//STEP0040 EXEC PGM=DTSBZ225,                                           00271300
//             COND=(0,LT)                                              00271400
//SYSOUT   DD  SYSOUT=*                                                 00271500
//SYSABOUT DD  SYSOUT=*                                                 00271600
//SYSABEND DD  SYSOUT=*                                                 00271700
//CAIMRPTS DD  SYSOUT=*                                                 00271800
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR                                      00271900
//DTSFREF  DD  DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR,                 00272000
//             AMP=('BUFNI=5,BUFND=10')                                 00273000
//****                                                                  00279101