148 lines
7.4 KiB
Plaintext
148 lines
7.4 KiB
Plaintext
//****************************************************************** 00001700
|
|
//**DTSBINIT PROC
|
|
//****************************************************************** 00001700
|
|
//* THIS PROC WILL CREATE A NEW EMPTY FILES OF ALL EXTERNAL FILES 00001700
|
|
//* USED IN THE DAILY RUN DTSPDAY1 00001700
|
|
//****************************************************************** 00001700
|
|
//* 00001700
|
|
//STEP0100 EXEC PGM=IDCAMS, INITIALIZE EMPTY CONV.BTC
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.BTC(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(8192,(100,200),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//STEP0200 EXEC PGM=IDCAMS, INITIALIZE EMPTY CONV.WAGE.BTC
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.WAGE.BTC(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(25600,(100,200),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=128,BLKSIZE=25600)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//STEP0300 EXEC PGM=IDCAMS, INITIALIZE EMPTY BX210
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.FTP.BX210(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(2310,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=231,BLKSIZE=2310)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//STEP0400 EXEC PGM=IDCAMS, INITIALIZE EMPTY BX212
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.FTP.BX212(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=106,BLKSIZE=31800)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//STEP0500 EXEC PGM=IDCAMS, INITIALIZE EMPTY BX216
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.FTP.BX216(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=318,BLKSIZE=31800)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//STEP0700 EXEC PGM=IDCAMS, INITIALIZE EMPTY RPT.R202
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.CONV.RPT.R202(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|
|
//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)
|
|
//*********************************************************************
|
|
//STEP0910 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX144 DD DSN=ECNTSUP.DOESTAX.PROD.AUDIT.X144,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0920 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX144 DD DSN=ECNTSUP.DOESTAX.PROD.AUDIT.X144,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=256,BLKSIZE=25600)
|
|
//*********************************************************************
|
|
//STEP0930 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSBX440 DD DSN=DOESTAX.PROD.BX440.BTC,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0940 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSBX440 DD DSN=DOESTAX.PROD.BX440.BTC,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182)
|
|
//*********************************************************************
|
|
//STEP0950 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSBX442 DD DSN=DOESTAX.PROD.BX442.BTC,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0960 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSBX442 DD DSN=DOESTAX.PROD.BX442.BTC,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182)
|
|
//*********************************************************************
|
|
//STEP0970 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX442 DD DSN=DOESTAX.PROD.BX442.WAGE,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0980 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX442 DD DSN=DOESTAX.PROD.BX442.WAGE,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=128,BLKSIZE=25600)
|
|
//*********************************************************************
|
|
//STEP0985 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX144 DD DSN=ECNTSUP.DOESTAX.CONV.AUDIT.X144,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0990 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFX144 DD DSN=ECNTSUP.DOESTAX.CONV.AUDIT.X144,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=256,BLKSIZE=25600)
|
|
//*********************************************************************
|
|
//STEP0986 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFD145 DD DSN=DOESTAX.PROD.BD145.BTC,
|
|
// DISP=(OLD,DELETE,DELETE)
|
|
//*********************************************************************
|
|
//STEP0987 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT)
|
|
//DTSFA145 DD DSN=DOESTAX.PROD.BD145.BTC,
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(8192,(100,200),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8192)
|
|
//*********************************************************************
|
|
//STEP0991 EXEC PGM=IDCAMS, INITIALIZE EMPTY EXTRQ
|
|
// COND=(4,LT) GENERATION
|
|
//SYSPRINT DD SYSOUT=*
|
|
//INDD01 DD DUMMY
|
|
//OUTDD01 DD DSN=DOESTAX.PROD.EXTRQ.RPT(+1),
|
|
// DISP=(,CATLG,DELETE),
|
|
// SPACE=(31800,(900,900),RLSE),
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4093,BLKSIZE=8182)
|
|
//SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRONE),DISP=SHR
|
|
//*********************************************************************
|