Files
DUTAS/Procs/DTSIESSP
2025-07-21 11:20:11 -04:00

708 lines
32 KiB
Plaintext

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