//****************************************************************** 00001700 //**DTSRINIT PROC //****************************************************************** 00001700 //* THIS PROC WILL DELETE ALL EXTERNAL FILES BEFORE RESTORING FILES 00001700 //* USED IN THE DAILY RUN DTSPDAY1 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //CONVBTC DD DSN=DOESTAX.CONV.BTC,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0200 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //WAGEBTC DD DSN=DOESTAX.CONV.WAGE.BTC,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0300 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX210 DD DSN=DOESTAX.CONV.FTP.BX210,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0400 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX212 DD DSN=DOESTAX.CONV.FTP.BX212,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0500 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX216 DD DSN=DOESTAX.CONV.FTP.BX216,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0500 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSR202 DD DSN=DOESTAX.CONV.RPT.R202,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0600 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX101 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X101 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0610 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX102 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X102 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0620 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX104 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X104 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0630 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX106 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X106 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0640 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX108 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X108 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0650 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX110 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X110 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0660 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX120 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X120 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0670 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX140 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X140 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0680 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX144 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X144 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0690 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX145 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X145 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0700 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX149 DD DSN=ECNTSUP.DOESTAX.PROD.FROMWEB.X149 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0710 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX144 DD DSN=ECNTSUP.DOESTAX.PROD.FTP.X144 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0720 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX150 DD DSN=ECNTSUP.DOESTAX.PROD.FTP.X150 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0730 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX151 DD DSN=ECNTSUP.DOESTAX.PROD.FTP.X151 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0730 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX152 DD DSN=ECNTSUP.DOESTAX.PROD.FTP.X152 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0740 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSBX155 DD DSN=ECNTSUP.DOESTAX.PROD.FTP.X155 // ,DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0800 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFR202 DD DSN=DOESTAX.PROD.RPT.R202, // DISP=(OLD,DELETE,DELETE) //********************************************************************* //STEP0900 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFR202 DD DSN=DOESTAX.PROD.RPT.R202, // DISP=(,CATLG,DELETE), // SPACE=(31800,(900,900),RLSE), // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182) //*********************************************************************