//ECNTSUPR JOB (UI,4300,3400,T),JHP.PROD.RSTR,CLASS=P,MSGCLASS=X, 00000123 // NOTIFY=ECNTSUP, 00000217 //**** TYPRUN=SCAN, 00000320 // REGION=0M 00000414 /*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE //* 00000500 //PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB 00000609 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00000721 //**** 00000921 //* UI TAX VSAM FILES RESTORE ------ READ NOTE BELOW -------- * 00001100 //* * 00001200 //* WHEN JOB DTSPDAY1 ABENDS AND YOU HAVE TO RUN THIS RESTORE * 00001200 //* JOB THEN YOU WILL HAVE TO RUN JOB DTSREEXT TO RESTORE ALL * 00001200 //* EXTERNAL FILES NEEDED FOR DAILY JOB. * 00001200 //* PLEASE VERIFY FILES PROD.WAGE.BTC AND PROD.BTC GENERATION * 00001200 //* ARE EMPTY OR DUPLICATES WILL OCCUR. IF THERE ARE NO GENERATION 00001200 //* THAT IS OK ONE WILL BE CREATED FROM THE RESTORE AND RERUN OF * 00001200 //* THE DAILY JOB * 00001200 //**** 00001621 //* NOTE: BEFORE RUNNING THIS JOB, CLOSE THE FILES * 00001300 //* IN THE CICS REGION. * 00001400 //**** 00001621 //STEP0100 EXEC DTSURVSM, 00002000 // BKUPGEN='(+0)' 00003029