//****************************************************************** 00001700 //**DTSIESSP PROC 01/04/15 ZL1 //****************************************************************** 00001700 //* THIS PROC WILL CREATE A NEW EMPTY FILES OF ALL ESSP FILES 00001700 //* USED IN THE DAILY RUN DTSPDAY1 00001700 //****************************************************************** 00001700 //** DELETE AND CREATE BTC FILES USED FOR REJECTS PROCESSING 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSRJ420 DD DSN=DOESTAX.PROD.ESSP.X418.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSRJ420 DD DSN=DOESTAX.PROD.ESSP.X418.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE BTC FILES USED FOR PAYMENT X530 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSXJ530 DD DSN=DOESTAX.PROD.ESSP.X530.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSRJ530 DD DSN=DOESTAX.PROD.ESSP.X530.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE FTP LOG FILE FOR JOB DTSPACHD 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFL420 DD DSN=DOESTAX.CONV.PACHLOG.TXT, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFL420 DD DSN=DOESTAX.CONV.PACHLOG.TXT, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=1028,BLKSIZE=6144) //* //****************************************************************** 00001700 //****************************************************************** 00001700 //** DELETE AND CREATE BTC FILES USED FOR REJECT ACH PAYMENTS 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSAC420 DD DSN=DOESTAX.PROD.ESSP.X501.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSAC420 DD DSN=DOESTAX.PROD.ESSP.X501.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE FILES SPECIAL BTC FILES FOR FIXES TO DATA 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSNE420 DD DSN=DOESTAX.PROD.ESSP.XN420.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSNE420 DD DSN=DOESTAX.PROD.ESSP.XN420.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSNZ420 DD DSN=DOESTAX.PROD.ESSP.XZ420.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSNZ420 DD DSN=DOESTAX.PROD.ESSP.XZ420.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE FILES USED BY REGISTRATION PROC DTSBXREG 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE421 DD DSN=DOESTAX.PROD.ESSP.X421.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE421 DD DSN=DOESTAX.PROD.ESSP.X421.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //** DELETE AND CREATE ESSP EMP-OPO ADDRESS TRANSACTON FILE //********************************************************************* //STEP0102 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX424 DD DSN=DOESTAX.PROD.ESSP.X424.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0103 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX424 DD DSN=DOESTAX.PROD.ESSP.X424.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE ESSP ACH DEPOSIT AND RETURN FILES //********************************************************************* //STEP0104 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFACHR DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDRETN, // DISP=(OLD,DELETE,DELETE) //* //STEP0105 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFACHR DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDRETN, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120) //* //* //****************************************************************** 00001700 //** DELETE AND CREATE ESSP ACH DEPOSIT AND RETURN FILES //********************************************************************* //STEP0104 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFACHD DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDPAYT, // DISP=(OLD,DELETE,DELETE) //* //STEP0105 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFACHD DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDPAYT, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120) //* //****************************************************************** 00001700 //** DELETE AND CREATE ACH PAYMENT REVERSAL BTC FILE 00001700 //****************************************************************** 00001700 //STEP0100 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE426 DD DSN=DOESTAX.PROD.ESSP.X426.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE426 DD DSN=DOESTAX.PROD.ESSP.X426.BTC(+1), // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE ESSP ADDRESS UPDATE BTC FILE 00001700 //****************************************************************** 00001700 //STEP0101 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE427 DD DSN=DOESTAX.PROD.ESSP.X427.BTC, // DISP=(OLD,DELETE,DELETE) //* 00001700 //STEP0103 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE427 DD DSN=DOESTAX.PROD.ESSP.X427.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(5,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //****************************************************************** 00001700 //** DELETE AND CREATE ESSP X102 PROCESSED RECORDS //********************************************************************* //STEP0104 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX102 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X102, // DISP=(OLD,DELETE,DELETE) //* //STEP0105 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX102 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X102, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X104 ESSP PROCESSED RECORDS //********************************************************************* //STEP0106 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX104 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X104, // DISP=(OLD,DELETE,DELETE) //* //STEP0107 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX104 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X104, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //****************************************************************** 00001700 //** DELETE AND CREATE X106 ESSP PROCESSED RECORDS //********************************************************************* //STEP0108 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX106 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X106, // DISP=(OLD,DELETE,DELETE) //* //STEP0109 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX106 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X106, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //****************************************************************** 00001700 //** DELETE AND CREATE X106 UPDATE ESSP PROCESSED RECORDS //********************************************************************* //STEP0108 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX106 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X106UPD, // DISP=(OLD,DELETE,DELETE) //* //STEP0109 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX106 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X106UPD, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X108 ESSP PROCESSED RECORDS //********************************************************************* //STEP0110 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX108 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X108, // DISP=(OLD,DELETE,DELETE) //* //STEP0111 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX108 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X108, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //****************************************************************** 00001700 //** DELETE AND CREATE X110 ESSP PROCESSED RECORDS //********************************************************************* //STEP0112 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX110 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X110, // DISP=(OLD,DELETE,DELETE) //* //STEP0113 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX110 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X110, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //****************************************************************** 00001700 //** DELETE AND CREATE X110 UPDATE ESSP PROCESSED RECORDS //********************************************************************* //STEP0112 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX110 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X110UPD, // DISP=(OLD,DELETE,DELETE) //* //STEP0113 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX110 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X110UPD, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X120 ESSP PROCESSED RECORDS //********************************************************************* //STEP0114 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX120 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X120, // DISP=(OLD,DELETE,DELETE) //* //STEP0115 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX120 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X120, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X120UPD ESSP PROCESSED RECORDS //********************************************************************* //STEP0114 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX120 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X120UPD, // DISP=(OLD,DELETE,DELETE) //* //STEP0115 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX120 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X120UPD, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE FILE USED BY REPORTING PROC DTSBXRPT //********************************************************************* //STEP0200 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX430 DD DSN=DOESTAX.PROD.ESSP.X430.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0201 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX430 DD DSN=DOESTAX.PROD.ESSP.X430.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP0202 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X430.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0203 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X430.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //********************************************************************* //STEP0202 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.DTS193.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0203 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.DTS193.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //********************************************************************* //STEP0222 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.PROD.MAG.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0223 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWMAG DD DSN=DOESTAX.PROD.MAG.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //****************************************************************** 00001700 //** DELETE AND CREATE X140 ESSP PROCESSED RECORDS //********************************************************************* //STEP0204 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX140 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X140, // DISP=(OLD,DELETE,DELETE) //* //STEP0205 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX140 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X140, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X144 WEB PROCESSED RECORDS //********************************************************************* //STEP0206 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX144 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X144, // DISP=(OLD,DELETE,DELETE) //* //STEP0207 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX144 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X144, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X145 WEB PROCESSED RECORDS //********************************************************************* //STEP0208 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX145 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X145, // DISP=(OLD,DELETE,DELETE) //* //STEP0209 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX145 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X145, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X146 ESSP RECON FILE //********************************************************************* //STEP0210 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX146 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X146, // DISP=(OLD,DELETE,DELETE) //* //STEP0209 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX146 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X146, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE X147 ESSP AMEND WAGES //********************************************************************* //STEP0211 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX147 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X147, // DISP=(OLD,DELETE,DELETE) //* //STEP0212 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX147 DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X147, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //** DELETE AND CREATE FILES USED BY CHECKS PROC DTSBXCHK //********************************************************************* //STEP0400 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.DAILY.CHKS, // DISP=(OLD,DELETE,DELETE) //* //STEP0401 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.DAILY.CHKS(+1), // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //********************************************************************* //STEP0402 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX429 DD DSN=DOESTAX.PROD.TDEC.X429.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0403 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX429 DD DSN=DOESTAX.PROD.TDEC.X429.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP0404 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFT429 DD DSN=DOESTAX.CONV.TDEC.X429.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0405 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFT429 DD DSN=DOESTAX.CONV.TDEC.X429.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //** DELETE AND CREATE FILES USED BY FTPWEB JOBS //********************************************************************* //STEP0406 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.DAILY.FTPWEB.CHKS, // DISP=(OLD,DELETE,DELETE) //* //STEP0407 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.DAILY.FTPWEB.CHKS, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //STEP0408 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDCHKS DD DSN=DOESTAX.CONV.TDEC.ESSP.DAILY.FTPWEB.PAYMT, // DISP=(OLD,DELETE,DELETE) //* //STEP0409 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCCHKS DD DSN=DOESTAX.CONV.TDEC.ESSP.DAILY.FTPWEB.PAYMT, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //STEP0410 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.CRYPT.CHKS, // DISP=(OLD,DELETE,DELETE) //* //STEP0411 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCCHKS DD DSN=DOESTAX.CONV.TDEC.DOES.CRYPT.CHKS, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=VB,LRECL=256,BLKSIZE=6233) //* //********************************************************************* //** DELETE AND CREATE TDEC DAILY PAYMENTS JOB DTSGPAYT //********************************************************************* //STEP0500 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDPAYT DD DSN=DOESTAX.CONV.TDEC.ESSP.DWAGE.PAYMT, // DISP=(OLD,DELETE,DELETE) //* //STEP0510 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCPAYT DD DSN=DOESTAX.CONV.TDEC.ESSP.DWAGE.PAYMT(+1), // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //STEP0511 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDPAYT DD DSN=DOESTAX.CONV.TDEC.ESSP.CRYPT.PYMTS, // DISP=(OLD,DELETE,DELETE) //* //STEP0512 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCPAYT DD DSN=DOESTAX.CONV.TDEC.ESSP.CRYPT.PYMTS, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=VB,LRECL=256,BLKSIZE=6233) //* //********************************************************************* //** DELETE AND CREATE TDEC DAILY WAGES USED BY JOB DTSGWAGE //********************************************************************* //STEP0600 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.DWAGE.WAGES, // DISP=(OLD,DELETE,DELETE) //* //STEP0601 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.DWAGE.WAGES(+1), // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //********************************************************************* //** DELETE AND CREATE ESSP DAILY FTP WAGE FILE - ESSP USE ONLY //********************************************************************* //STEP0602 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.FTP.OWAGES.TXT, // DISP=(OLD,DELETE,DELETE) //* //STEP0603 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.FTP.OWAGES.TXT, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=512,BLKSIZE=30720) //* //STEP0605 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSDWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.CRYPT.WAGES, // DISP=(OLD,DELETE,DELETE) //* //STEP0606 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSCWAGE DD DSN=DOESTAX.CONV.TDEC.ESSP.CRYPT.WAGES, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=VB,LRECL=256,BLKSIZE=6233) //* //********************************************************************* //** DELETE AND CREATE FILE USED BY PENDING PROC DTSBXPEN //********************************************************************* //STEP0700 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX435 DD DSN=DOESTAX.PROD.ESSP.X435.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0701 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX435 DD DSN=DOESTAX.PROD.ESSP.X435.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP0702 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X435.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0703 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X435.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //****************************************************************** 00001700 //** DELETE AND CREATE FILE USED BY RELEASE PROC DTSBXREL //********************************************************************* //STEP0800 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX436 DD DSN=DOESTAX.PROD.ESSP.X436.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0801 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX436 DD DSN=DOESTAX.PROD.ESSP.X436.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP0802 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X436.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0803 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X436.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //****************************************************************** 00001700 //********************************************************************* //** USED FOR TEMP BTC FILE WHEN NEED TO RUN REGISTRATION JOB TWICE ON //** SAME DAY //********************************************************************* //STEP0900 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE420 DD DSN=DOESTAX.PROD.ESSP.X420.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0901 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFE420 DD DSN=DOESTAX.PROD.ESSP.X420.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP0902 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X420.W4FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP0903 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFWFIL DD DSN=DOESTAX.CONV.ESSP.X420.W4FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //* //********************************************************************* //** NOT USED - FOR NOW 01/05/15 ZL1 //********************************************************************* //STEP0991 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX423 DD DSN=DOESTAX.CONV.ESSP.X423.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0992 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX423 DD DSN=DOESTAX.CONV.ESSP.X423.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //** NOT USED 01/05/15 ZL1 //********************************************************************* //STEP0993 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX422 DD DSN=DOESTAX.CONV.ESSP.X422.BTC, // DISP=(OLD,DELETE,DELETE) //* //STEP0994 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX422 DD DSN=DOESTAX.CONV.ESSP.X422.BTC, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(20,5)), // DCB=(RECFM=VB,LRECL=4093,BLKSIZE=8192) //* //********************************************************************* //STEP1001 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX140 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD140.RELEASE, // DISP=(OLD,DELETE,DELETE) //* //STEP1002 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX140 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD140.RELEASE, // DISP=(,CATLG,DELETE), // SPACE=(CYL,(20,5)), // DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120) //**** //********************************************************************* //STEP1003 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX144 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD144.RELEASE, // DISP=(OLD,DELETE,DELETE) //* //STEP1004 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX144 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD144.RELEASE, // DISP=(,CATLG,DELETE), // SPACE=(CYL,(20,5)), // DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120) //* //STEP1005 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX147 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD147.RELEASE, // DISP=(OLD,DELETE,DELETE) //* //STEP1006 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSFX147 DD DSN=DOESTAX.CONV.FROMESSP.FRAUD147.RELEASE, // DISP=(,CATLG,DELETE), // SPACE=(CYL,(20,5)), // DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=5120) //* //STEP1007 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSF453 DD DSN=DOESTAX.CONV.DTS453.W2FILE, // DISP=(OLD,DELETE,DELETE) //* //STEP1008 EXEC PGM=IEFBR14,REGION=1024K,COND=(4,LT) //DTSF453 DD DSN=DOESTAX.CONV.DTS453.W2FILE, // DISP=(NEW,CATLG,CATLG), //** DISP=(OLD,KEEP,KEEP), // SPACE=(CYL,(10,5)), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000) //********************************************************************* //* END OF ESSP FILES INITILIZATION AS OF 01/05/15 ZL1