//ECNTVDY7 JOB (UI,4300,3400,T),WKLYPROD.VIEWDIR,                       00000010
//          CLASS=P,MSGCLASS=X,                                         00000010
//          USER=#DOADTS,
//****      TYPRUN=SCAN,
//****      NOTIFY=ECNTSUP,REGION=0M
//          NOTIFY=ECNTJP2,REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//*
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCLIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****
//*  10/05/01 - JHP - STUB OF THE WEEKLY RUN TO REPRODUCE ALL REPORTS
//*         FROM THE LAST PROD WEEKLY *ON HOLD* FOR VIEW-DIRECT
//****
//*                                          WEEKLY REPORTS
//STEP0300 EXEC DTSRWVD,
//           LVLNODE='PROD',
//            RPTGEN='(+0)',
//             LDEST=U@PRT65,
//           LVDHOLD='YES'
//*                           //* REPORTS NOT NEEDED FOR VIEWDIRECT
//STEP0100.RPT905R1 DD DUMMY
//STEP0100.RPT907R2 DD DUMMY
//*