//DTSBZ057 JOB (UI,4300,3400,T),GIL,CLASS=S,MSGCLASS=X, 00000010 // NOTIFY=ECNTSUP, // USER=#DOADTS //* // SET MSTNODE='PROD' // SET LVLNODE='DEVL' //* //PROCLIB JCLLIB ORDER=DOESTAX.DEVL.PROCS.BATCH.LIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600 //* 00001700 //STEP0100 EXEC PGM=DTSBZ057, CORRECT 07/3 REPORTS ENTERED // COND=(0,LT), LATE BY MISTAKE // REGION=4096K //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') //DTSFWTC DD DSN=DOESTAX.&MSTNODE..VSAM.WTC,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //DTSFWGH DD DSN=DOESTAX.&MSTNODE..VSAM.WGH,DISP=SHR, // AMP=('BUFNI=5,BUFND=10') //* //DTSFBTCO DD DSN=DOESTAX.&MSTNODE..BTC(+1), // DISP=(,CATLG,DELETE), // SPACE=(8192,(100,200),RLSE), // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //DTSFZ057 DD DSN=DOESTAX.&LVLNODE..FZ057, //** DISP=(,CATLG,DELETE), // DISP=(OLD,KEEP,KEEP), // UNIT=SYSDA, // SPACE=(2300,(100,100),RLSE), // DCB=(RECFM=FB,LRECL=23,BLKSIZE=2300) //* //*********************************************************************