//****************************************************************** 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 //*********************************************************************