99 lines
5.4 KiB
Plaintext
99 lines
5.4 KiB
Plaintext
//****************************************************************** 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)
|
|
//*********************************************************************
|