//DTSMIN01 JOB (UI,4300,3400,T),SRJ,CLASS=A,MSGCLASS=X, JOB21442 // USER=#DOADTS, // NOTIFY=EUSC01K //* 00001700 // SET MSTNODE='PROD' 00001700 // SET LVLNODE='PROD' 00001700 //* 00001700 //PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB 00001600 //LOADLIBS INCLUDE MEMBER=DTSIJLIB 00001600 //*LOADLIBS INCLUDE MEMBER=USERJLIB 00001600 //* //* RAINCODE TESTED 08/30/25 ZL1 //* 00001700 //STEP0100 EXEC PGM=DTSBS411, GENERAL SCAN // COND=(0,LT), // 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') //* //DTSFCPRE DD DSN=DOESTAX.CONV.CURRMINI(0),DISP=SHR //* //DTSFCURR DD DSN=DOESTAX.CONV.CURRMINI(+1), // DISP=(,CATLG,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,05),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //DTSFCRPT DD DSN=DOESTAX.CONV.CURRRPT.TXT,DISP=SHR //* //DTSFSENT DD DSN=DOESTAX.CONV.SENTMINI(+1), // DISP=(,CATLG,KEEP), // UNIT=SYSDA, // SPACE=(CYL,(10,05),RLSE), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //DTSFSRPT DD DSN=DOESTAX.CONV.SENTRPT.TXT,DISP=SHR //*