//DTSW4WGE JOB (UI,4300,3400,T),PROD.DAILY,CLASS=P,MSGCLASS=X, // NOTIFY=ECNTSUP, // USER=#DOADTS, //**** TYPRUN=SCAN, //**** TYPRUN=HOLD, // REGION=0M /*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE //** //********************************************************************* //* LOAD THE WAGE FILE FOR DOCS NIGHTLY RUN //* //* //********************************************************************* // SET ACHYEAR='FY2009' // SET EXTNODE='CONV' // SET IMPNODE='PROD' // SET PGMNODE='PROD' // SET LVLNODE='PROD' // SET MSTNODE='PROD' // SET LVDHOLD='YES' // SET PRTHOLD='NO' //* //PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB //LOADLIBS INCLUDE MEMBER=DTSIJLIB //**** //**** //**11/06/2013 - ADDED PROC TO CHECK W4FILE FOR DUPLICATE SSN ZL1 //**** //* //STEP0100 EXEC DTSWGZ07 /* DO NOT CHECK FOR DUPS ZL1 //* // //********************************************************************* //* RELOAD THE WAGE FILE FOR DOCS DUE TO A LATE RUN //* //* COMMENT THE LINE ABOVE THAT STOPS THIS STEP FROM RUNNING AND //* CHANGE THE GDG NUMBER OF THE BACKUP FILE. LINE 32 ZL1 //** //********************************************************************* //* RELOAD THE WAGE FILE FOR DOCS DUE TO A LATE RUN //* //STEPWAGE EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //INDD09 DD DSN=DOESTAX.PROD.BACKUP.W4FILE.G1466V00,DISP=SHR //OUTDD01 DD DSN=DOESTAX.PROD.W4FILE,DISP=MOD REPRO INFILE(INDD09) OUTFILE(OUTDD01) //** //*