//ECNTSUP9 JOB (UI,4300,3400,T),ZARATH,CLASS=A,MSGCLASS=X, 00000010 //*** TYPRUN=SCAN, // NOTIFY=ECNTSUP /*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE //********************************************************************* //* 00000200 // SET LVLNODE='PROD' //* 00000200 //* 00000200 //PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB 00000300 //* 00000400 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600 //* 00001700 //STEP0100 EXEC PGM=IDCAMS, DELETE/DEFINE MSTE FILE // COND=(0,LT), // REGION=0K //SYSPRINT DD SYSOUT=* //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSE),DISP=SHR //* //STEP0200 EXEC PGM=DTSBD998, INITIALIZE ELF FILES // REGION=4096K //SYSOUT DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSABEND DD SYSOUT=* //CAIMRPTS DD SYSOUT=* //DTSFMSTE DD DSN=DOESTAX.&LVLNODE..VSAM.MSTE,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIMSTE),DISP=SHR //* 00001700 //STEP0300 EXEC PGM=IDCAMS, DELETE/DEFINE MSTF FILE // COND=(0,LT), // REGION=0K //SYSPRINT DD SYSOUT=* //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSF),DISP=SHR //* //STEP0400 EXEC PGM=DTSBD998, INITIALIZE ELF FILES // COND=(0,LT), // REGION=4096K //SYSOUT DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSABEND DD SYSOUT=* //CAIMRPTS DD SYSOUT=* //DTSFMSTF DD DSN=DOESTAX.&LVLNODE..VSAM.MSTF,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIMSTF),DISP=SHR //* //STEP0500 EXEC PGM=IDCAMS, DELETE/DEFINE MSTG FILE // COND=(0,LT), // REGION=0K //SYSPRINT DD SYSOUT=* //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSG),DISP=SHR //* //STEP0600 EXEC PGM=DTSBD998, INITIALIZE ELF FILES // COND=(0,LT), // REGION=4096K //SYSOUT DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSABEND DD SYSOUT=* //CAIMRPTS DD SYSOUT=* //DTSFMSTG DD DSN=DOESTAX.&LVLNODE..VSAM.MSTG,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSIMSTG),DISP=SHR //* //*TEP0700 EXEC PGM=DTSBZ067, CLEAR AIX FILE //* COND=(0,LT), //* REGION=4096K //*YSOUT DD SYSOUT=* //*YSABOUT DD SYSOUT=* //*YSABEND DD SYSOUT=* //*AIMRPTS DD SYSOUT=* //*TSFAIX DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, //* AMP=('BUFNI=5,BUFND=10') //*