//ECNTGD1P JOB (UI,4300,3400,T),RUNBZ385,CLASS=S,MSGCLASS=X, 00000010 // NOTIFY=ECNTSUP //* 00001700 // SET LVLNODE='PROD' 00001700 // SET MSTNODE='PROD' 00001700 //* 00001700 //PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600 //* 00001700 //STEP0100 EXEC PGM=DTSBZ385, CORRECT 155378 // COND=(0,LT), // REGION=0M //SYSOUT DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSABEND DD SYSOUT=* //DTSFMSTR INCLUDE MEMBER=DTSIMSTR //DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //DTSFATC DD DSN=DOESTAX.&MSTNODE..VSAM.ATC,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //*********************************************************************