//* //* DAILY BATCH CONTROL SUMMARY REPORT RECORDS (R301) //* //* 05/08/2009 ADDED DEPOSIT FILE GD //* //DTSBX215 PROC //** DEFNS NEEDED FOR THIS PROC: //** LVLNODE = DEVL/TEST/PROD //**** //* //STEP0100 EXEC PGM=DTSBX215, // COND=(0,LT), // REGION=0M //SYSOUT DD SYSOUT=* //SYSABOUT DD SYSOUT=* //SYSABEND DD SYSOUT=* //CAIMRPTS DD SYSOUT=* //DTSFMSTR INCLUDE MEMBER=DTSIMSTR //DTSFVRI1 DD DSN=DOESTAX.&MSTNODE..SRTDAILY.RPT(+0),DISP=SHR //* //DTSFX215 DD DSN=ECNTSUP.DOESTAX.&MSTNODE..FTP.BX215, 00005000 // DISP=(OLD,KEEP,KEEP), //** DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(5,5),RLSE), // DCB=(RECFM=FB,LRECL=103,BLKSIZE=22660) //* 00014000 //DTSFX220 DD DSN=ECNTSUP.DOESTAX.&MSTNODE..FTP.BX220, 00005000 // DISP=(OLD,KEEP,KEEP), //** DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(5,5),RLSE), // DCB=(RECFM=FB,LRECL=52,BLKSIZE=26000) //* 00014000 //DTSFDPST DD DSN=ECNTSUP.DOESTAX.&LVLNODE..FTP.DEPOSIT, // DISP=(OLD,KEEP,KEEP), //** DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(20600,(1000,1000),RLSE), // DCB=(RECFM=FB,LRECL=103,BLKSIZE=20600) //* //*****************************************