//**** 00000100 //** DAILY REPORT TRANSACTION EXTRACT FOR INTRANET 00000369 //** WEB APPLICATION 00000469 //** (*NO* MSTR UPDATE) 00000505 //** 00000605 //DTSBX201 PROC 00000787 //** DEFNS NEEDED FOR THIS PROC: 00001105 //** LVLNODE = DEVL/TEST/PROD 00001205 //**** 00001408 //STEP0100 EXEC PGM=DTSBX201, 00001587 // COND=(0,LT) 00001669 //SYSOUT DD SYSOUT=* 00002069 //SYSABOUT DD SYSOUT=* 00002169 //SYSABEND DD SYSOUT=* 00002269 //DTSFMSTR INCLUDE MEMBER=DTSIMSTR 00002369 //DTSFREF DD DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR, 00002469 // AMP=('BUFNI=5,BUFND=10') 00002569 //DTSFATC DD DSN=DOESTAX.&MSTNODE..VSAM.ATC,DISP=SHR, 00002669 // AMP=('BUFNI=5,BUFND=10') 00002769 //** 00003269 //BX200SUM DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ERR, 00003997 //** DISP=(NEW,CATLG,CATLG), 00004099 // DISP=(MOD,KEEP,KEEP), 00004199 // UNIT=SYSDA, 00004269 // SPACE=(CYL,(20,5),RLSE), 00004399 // DCB=(RECFM=FB,LRECL=73,BLKSIZE=21900) 00004488 //** 00005069 //BX200TRN DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.ERRTRN, 00420190 //** DISP=(NEW,CATLG,KEEP), 00420299 // DISP=(OLD,KEEP,KEEP), 00420399 // UNIT=SYSDA, 00420488 // SPACE=(CYL,(20,5),RLSE), 00420599 // DCB=(RECFM=FB,LRECL=135,BLKSIZE=31050) 00420699 //* 00420788 //BX200HDR DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.HEADER, 00420899 //** DISP=(NEW,CATLG,KEEP), 00420999 // DISP=(OLD,KEEP,KEEP), 00421099 // UNIT=SYSDA, 00422099 // SPACE=(28200,(1000,1000),RLSE), 00423099 // DCB=(RECFM=FB,LRECL=141,BLKSIZE=28200) 00424099 //* 00425099 //* 00470073