//DTSBX450 JOB (UI,4300,3400,T),DTSBX450-ESSP-AMDS,                     00000010
//          CLASS=A,MSGCLASS=X,                                         00000010
//          USER=#DOADTS,
//          NOTIFY=ECNTSUP,
//          REGION=0M
//*                                                                     00001700
//   SET LVLNODE='CONV'
//   SET MSTNODE='PROD'
//   SET PRGNODE='CONV'
//   SET IMPNODE='CONV'
//   SET LVDHOLD='YES'                                                  00001700
//   SET EXTNODE='CONV'                                                 00001700
//   SET RPTNODE='ESSP.BX420.RPT'                                       00001700
//*                                                                     00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.&MSTNODE..PROCLIB                       00001600
//LOADLIBS INCLUDE MEMBER=DTSIZLIB                                      00001600
//**                                                                    00001700
//*   PROCESS ESSP AMENDED DATA FILES (REPORTS )                        00001700
//*                                                                     00001700
//**                                                                    00001700
//** THIS JOB WILL PROCESS ESSP AMENDED REPORT                          00001700
//**                                                                    00001700
//** ESSP FILES PROCESSED BY DUTAS (AMENDED FILES ONLY)                 00001700
//*      - X140 -EMPLOYER REPORT DATA (WAGE HEADER)                     00001700
//*                                                                     00001700
//*                                                                     00001700
//*   READ-ONLY - NO MASTER FILE UPDATES - CREATES T002,T003,T028       00001700
//*               TRANSCATIONS                                          00001700
//*   OUTPUT FILE:                                                      00001700
//*          DOESTAX.CONV.ESSPAMEN.DAYX140(+1)                          00001700
//*                                                                     00001700
//*                                                                     00001700
//*   THIS JOB MAY BE RERUN.                                            00001700
//*   IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS.                    00001700
//**                                                                    00001700
//*****************************************************************
//STEP0010 EXEC PGM=SORT,REGION=1024K
//SORT.SYSPRINT DD SYSOUT=*
//SORT.STATOUT  DD SYSOUT=*
//SORT.SYSDBOUT DD SYSOUT=*
//SORT.SYSUDUMP DD SYSOUT=*
//SORT.SYSOUT   DD SYSOUT=*
//*ORTIN   DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X140,DISP=SHR
//SORTIN   DD DSN=DOESTAX.CONV.FROMESSP.PASSED.X140,DISP=SHR
//SORTOUT  DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX140(+1),
//             DISP=(NEW,CATLG,DELETE),
//*            DISP=SHR,
//             UNIT=SYSDA,
//*            SPACE=(30720,(3000,3000),RLSE),
//             SPACE=(CYL,(20,5),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=30720)
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SYSIN    DD *
  SORT FIELDS=(1,17,CH,A)
  INCLUDE COND=(19,8,CH,GT,C'00000000')
  END
//*
//*****************************************************************
//STEP0020 EXEC PGM=SORT,REGION=1024K
//SORT.SYSPRINT DD SYSOUT=*
//SORT.STATOUT  DD SYSOUT=*
//SORT.SYSDBOUT DD SYSOUT=*
//SORT.SYSUDUMP DD SYSOUT=*
//SORT.SYSOUT   DD SYSOUT=*
//*ORTIN   DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X144,DISP=SHR
//SORTIN   DD DSN=DOESTAX.CONV.FROMESSP.PASSED.X144,DISP=SHR
//SORTOUT  DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX144(+1),
//             DISP=(NEW,CATLG,DELETE),
//*            DISP=SHR,
//             UNIT=SYSDA,
//*            SPACE=(30720,(3000,3000),RLSE),
//             SPACE=(CYL,(20,5),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=30720)
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SYSIN    DD *
  SORT FIELDS=(1,17,CH,A)
  INCLUDE COND=(19,8,CH,GT,C'00000000')
  END
//*
//STEP0030 EXEC PGM=SORT,REGION=1024K
//SORT.SYSPRINT DD SYSOUT=*
//SORT.STATOUT  DD SYSOUT=*
//SORT.SYSDBOUT DD SYSOUT=*
//SORT.SYSUDUMP DD SYSOUT=*
//SORT.SYSOUT   DD SYSOUT=*
//*ORTIN   DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X147,DISP=SHR
//SORTIN   DD DSN=DOESTAX.CONV.FROMESSP.PASSED.X147,DISP=SHR
//SORTOUT  DD DSN=DOESTAX.CONV.ESSPAMEN.DAYX147(+1),
//             DISP=(NEW,CATLG,DELETE),
//*            DISP=SHR,
//             UNIT=SYSDA,
//*            SPACE=(30720,(3000,3000),RLSE),
//             SPACE=(CYL,(20,5),RLSE),
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=512,BLKSIZE=30720)
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50,50),RLSE)
//SYSIN    DD *
  SORT FIELDS=(1,17,CH,A)
  END
//*
//*
//*TEP0200 EXEC DTSRP451   / REGULAR
//*
//*TEP0200 EXEC DTSSN451   / X147 PROCESS
//*
//**                                                                    00001700