//DTSCHGD7 JOB (UI,4300,3400,T),JHPPROD.CHGMBKP,                        00000103
//             CLASS=P,MSGCLASS=X,                                      00000203
//****         TYPRUN=SCAN,                                             00000300
//             USER=#DOADTS,                                            00000409
//             NOTIFY=ECNTSUP,                                          00000710
//             REGION=0M                                                00000804
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00000900
//*    UI TAX WEEKLY BACKUP OF CHGMXXX VSAM FILE(S)                     00001105
//****                                                                  00001800
//     SET LVLNODE='PROD'                                               00001903
//****                                                                  00002001
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB                       00002101
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00002200
//****                                                                  00002301
//STEP0100 EXEC DTSCHGMB,                                               00002401
//          CHGNOD2I='PROD',                                            00002505
//          CHGNOD2O='PROD',                                            00002605
//           CHGMN2R='CHGM002',                                         00002705
//          CHGNOD3I='PROD',                                            00002805
//          CHGNOD3O='PROD',                                            00002905
//           CHGMN3R='CHGM030',                                         00003006
//            BKPGEN='(+1)'                                             00003107
//****                                                                  00003206
//**           CHGMN3R='CHGM030',                                       00003306
//**            BKPGEN='.G0013V00'  /* SPEC. TO PUT BKP'S IN SYNC.      00003407
//****                                                                  00004001