//DTSRDAY1 JOB (UI,4300,3400,T),PROD.DAILY,CLASS=P,MSGCLASS=X,
//         NOTIFY=ECNTSUP,
//****     TYPRUN=SCAN,
//****     TYPRUN=HOLD,
//         REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
//  SET S0910='+0'
//  SET LVLNODE='PROD'
//  SET MSTNODE='PROD'
//  SET LVDHOLD='YES'
//  SET LHOLD='YES'
//  SET LDEST=U@PRT65
//  SET PRTHOLD='YES'
//*
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****
//* 09/28/99 - BROUGHT OVER TO LEXINGTON                         JHP
//* 05/29/01 - MODIFIED FOR TAPE TRACKING (STEPS 0150, 300 - 320) GD
//* 05/20/02 - REMOVED TAPE TRACKING                             JHP
//* 06/18/02 - ADDED REF TO WGH/WTC/WAGNAM/W4FILE                JHP
//* 04/02/04 - REMOVED STEP 60,70,80 BUILD OLD NAME FILE         JHP
//****
//**11/12/2004 - ADDED PROC DTSBX330 (CREDIT/DEBIT) AT EOJ       ZL1
//****
//****
//*    UI TAX DAILY BATCH RERPORTS                                  *
//STEP0200 EXEC DTSD0ARP
//*
//*    UI TAX DAILY BACKUP                                          *
//STEP0400 EXEC DTSUTVSM,
//         BKUPGEN='(+1)'
//**
//
//STEP0150 EXEC DTSUD525
//*    NOTE:  BEFORE RUNNING THIS JOB, CLOSE THE FILES IN THE       *
//*           CICS REGION.                                          *
//*                                                                 *