//DTSXBKPT JOB (UI,4300,3400,T),PROD.TP2TP,                             00000101
//****      TYPRUN=SCAN,                                                00000200
//          CLASS=A,MSGCLASS=X,NOTIFY=ECNTSUP,                          00000300
//          REGION=0M                                                   00000400
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00000800
//*    UI TAX BACKUP VSAM FILES - SPECIAL RUN TO COPY A BACKUP          00001001
//*       TAPE TO ANOTHER TAPE (FOR SPEC. REF PURPOSES)                 00001102
//****                                                                  00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.PROD.PROCLIB                            00001900
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00002000
//****                                                                  00002101
//STEP0100 EXEC DTSUTVST,                                               00002201
//             LVLNODE='PROD',                                          00003001
//             BKPINODE='BACKUP',                                       00003101
//             BKPINGEN='.G1775V00',                                    00003201
//             BKPOUTND='BKP1775V'                                      00003301
//*                                                                     00004001