//DTSPDAY7 JOB (UI,4300,3400,T),PROD.VIEWD,CLASS=P,MSGCLASS=X,
//         NOTIFY=ECNTSUP,
//         REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
//  SET LVLNODE='PROD'
//  SET LVDHOLD='YES'
//*
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****
//INFOPACK EXEC PGM=INFOPACR,
//         COND=(0,LT),
//         PARM='DTSPDAY7'
//*