//DTSVOSW  JOB (UI,4300,3400,T),RUNVOSW,CLASS=A,MSGCLASS=X,             00000010
//*         TYPRUN=SCAN,
//          USER=#DOADTS,
//          NOTIFY=ECNTSUP
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//**
// SET LVLNODE='PROD'
// SET MSTNODE='PROD'
//**
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//**
//*  WEEKLY UPDATE OF SQL SERVER EMPLOYER FILE USED FOR VOS             00014000
//*
//*                                                                     00014000
//***                                                                   00014000
//STEP0100 EXEC PGM=SORT,PARM='VLTEST=0',   SORT NEW HIRE DATA          00015001
//            COND=(0,LT)
//SYSOUT DD SYSOUT=*                                                    00017000
//*                                                                     00019000
//SORTIN DD DSN=DOESTAX.CONV.NEWHIRE.WEEKLYS(+0),DISP=SHR               00021006
//*                                                                     00030103
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00031001
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00032001
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00033001
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00034001
//SORTOUT DD DSN=&&NHSORT,                                              00040008
//        DISP=(NEW,PASS,DELETE),                                       00041005
//        UNIT=SYSDA,                                                   00042000
//        SPACE=(CYL,(100,50),RLSE),
//        DCB=(RECFM=FB,LRECL=801,BLKSIZE=18423)
//SYSIN   DD *                                                          00047000
  SORT FIELDS=(3,9,CH,A)                                                00048006
/*                                                                      00060000
//*                                                                     00070000
//STEP0110 EXEC PGM=DTSBX450,
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//NEWHIREI DD  DSN=&&NHSORT,DISP=(OLD,DELETE,DELETE)
//*
//TRANFLEO DD  DSN=&&TRAN,                       NEW HIRE TRAN FILE
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(30750,(400,200),RLSE),
//             DCB=(RECFM=FB,LRECL=41,BLKSIZE=30750)
//*
//WORKFLEO DD  DSN=&&WORKER,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29920,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=136,BLKSIZE=29920)
//*
//EMPLFLEO DD  DSN=&&EMPLOYER,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(31050,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=135,BLKSIZE=31050)
//*                                                                     00070000
//***                                                                   00014000
//STEP0120 EXEC PGM=SORT,PARM='VLTEST=0', SORT WORKER                   00015001
//            COND=(0,LT)
//SYSOUT DD SYSOUT=*                                                    00017000
//*                                                                     00019000
//SORTIN   DD  DSN=&&WORKER,
//             DISP=(OLD,DELETE,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29920,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=136,BLKSIZE=29920)
//*                                                                     00030103
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00031001
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00032001
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00033001
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00034001
//SORTOUT  DD  DSN=&&WORKSRT,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(2992,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=136,BLKSIZE=29920)
//SYSIN   DD *                                                          00047000
  SORT FIELDS=(1,15,CH,A)                                               00048006
/*                                                                      00060000
//*****                                                                 00070000
//STEP0130 EXEC PGM=SORT,PARM='VLTEST=0', SORT EMPLOYER                 00015001
//            COND=(0,LT)
//SYSOUT DD SYSOUT=*                                                    00017000
//*                                                                     00019000
//SORTIN   DD  DSN=&&EMPLOYER,
//             DISP=(OLD,DELETE,DELETE),
//             UNIT=SYSDA,
//             SPACE=(31050,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=135,BLKSIZE=31050)
//*                                                                     00070000
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00031001
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00032001
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00033001
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00034001
//SORTOUT  DD  DSN=&&EMPLSRT,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(31050,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=135,BLKSIZE=31050)
//SYSIN   DD *                                                          00047000
  SORT FIELDS=(1,15,CH,A)                                               00048006
/*                                                                      00060000
//STEP0140 EXEC PGM=SORT,PARM='VLTEST=0', SORT HIRE TRANSACTIONS        00015001
//            COND=(0,LT)
//SYSOUT DD SYSOUT=*                                                    00017000
//*                                                                     00019000
//SORTIN   DD  DSN=&&TRAN,
//             DISP=(OLD,DELETE,DELETE),
//             UNIT=SYSDA,
//             SPACE=(30750,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=41,BLKSIZE=30750)
//*                                                                     00030103
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00031001
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00032001
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00033001
//SORTWK04 DD  UNIT=SYSDA,SPACE=(CYL,(25,10),RLSE)                      00034001
//SORTOUT  DD  DSN=DOESTAX.DEVL.NEWHIRE.TRAN,    NEW HIRE TRAN FILE
//             DISP=(OLD,KEEP,KEEP),
//             UNIT=SYSDA,
//             SPACE=(30750,(400,200),RLSE),
//             DCB=(RECFM=FB,LRECL=41,BLKSIZE=30750)
//*
//SYSIN   DD *                                                          00047000
  SORT FIELDS=(1,30,CH,A)                                               00048006
  SUM FIELDS=NONE
/*                                                                      00060000
//*****                                                                 00070000
//STEP0150 EXEC PGM=DTSBX451,
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//WORKRIN  DD  DSN=&&WORKSRT,
//             DISP=(OLD,DELETE,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29920,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=136,BLKSIZE=29920)
//*
//WORKROUT DD  DSN=DOESTAX.DEVL.NEWHIRE.WORKER,
//**           DISP=(OLD,KEEP,KEEP),
//             DISP=(NEW,CATLG,DELETE),
//             UNIT=SYSDA,
//             SPACE=(30000,(400,200),RLSE),
//             DCB=(RECFM=FB,LRECL=150,BLKSIZE=30000)
//*
//EMPLRIN  DD  DSN=&&EMPLSRT,
//             DISP=(OLD,DELETE,DELETE),
//             UNIT=SYSDA,
//             SPACE=(31050,(5000,2000),RLSE),
//             DCB=(RECFM=FB,LRECL=135,BLKSIZE=31050)
//*                                                                     00070000
//EMPLROUT DD  DSN=&&EMPOUT,
//             DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29000,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=290,BLKSIZE=29000)
//*
//STEP0160 EXEC PGM=SORT,PARM='VLTEST=0',       SORT EMPLOYERS
//             COND=(5,LT),
//             REGION=0K
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  DSN=&&EMPOUT,
//             DISP=(OLD,DELETE,DELETE)
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTOUT  DD  DSN=&&BX451EMP,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29000,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=290,BLKSIZE=29000)
//SYSIN    DD  *
  SORT FIELDS=(1,9,CH,A)
/*
//***
//STEP0220 EXEC PGM=DTSBX477,
//             COND=(0,LT),
//             PARM='UPDATE,W',
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*                                                                     00001700
//TAXFILE  DD  DSN=&&VOSTAX,                                            00005000
//             DISP=(NEW,PASS,DELETE),                                  00006000
//             UNIT=SYSDA,                                              00007000
//             SPACE=(29000,(1000,1000),RLSE),                          00008000
//             DCB=(RECFM=FB,LRECL=290,BLKSIZE=29000)                   00009000
//*                                                                     00001700
//DTSFMSTR INCLUDE MEMBER=DTSIMSTR
//DTSFREF  DD  DSN=DOESTAX.&MSTNODE..VSAM.REF,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=10')
//***
//**                                                                    00001700
//STEP0230 EXEC PGM=SORT,PARM='VLTEST=0',       SORT TAX EMPLOYERS
//             COND=(5,LT),
//             REGION=0K
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  DSN=&&VOSTAX,
//             DISP=(OLD,DELETE,DELETE)
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTOUT  DD  DSN=&&TAXSORT,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(29000,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=290,BLKSIZE=29000)
//SYSIN    DD  *
  SORT FIELDS=(1,9,CH,A)
/*
//***
//STEP0300 EXEC PGM=DTSBX462,     EXTRACT & CREATE OTR FEIN FILE
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//EMPINP   DD  DSN=&&BX451EMP,
//             DISP=(OLD,DELETE,DELETE)
//*
//TAXINP   DD  DSN=&&TAXSORT,
//             DISP=(OLD,DELETE,DELETE)
//*
//*EMPOUTP  DD  DSN=&&BX462EMP,
//*             DISP=(,PASS,DELETE),
//EMPOUTP  DD  DSN=DOESTAX.&LVLNODE..VOSEMP,
//             DISP=(NEW,CATLG,DELETE),
//*            DISP=(OLD,KEEP,KEEP),
//             UNIT=SYSDA,
//             SPACE=(32040,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=89,BLKSIZE=32040)
//ADDROUTP DD  DSN=&&VOSADDR,
//             DISP=(,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(32000,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=128,BLKSIZE=32000)
//***
//STEP0310 EXEC PGM=DTSBX464,     FIND NEW EMPLOYERS
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//*NEWEMP    DD  DSN=&&BX462EMP,
//*            DISP=(OLD,PASS,DELETE)
//NEWEMP   DD  DSN=DOESTAX.&LVLNODE..VOSEMP,
//             DISP=(OLD,KEEP,KEEP)
//OLDEMP   DD  DSN=DOESTAX.&LVLNODE..VSAM.VOSEMP,
//             AMP=('BUFNI=5,BUFND=30'),
//             DISP=SHR
//**
//EMPUPD   DD  DSN=DOESTAX.&LVLNODE..NEWVOS,
//             DISP=(NEW,CATLG,DELETE),
//**           DISP=(OLD,KEEP,KEEP),
//             UNIT=SYSDA,
//             SPACE=(32040,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=89,BLKSIZE=32040)
//**
//***************************************************************
//STEP0330 EXEC PGM=IDCAMS          LOAD VSAM.VOSEMP
//SYSPRINT DD  SYSOUT=*
//INDD01   DD  DSN=DOESTAX.&LVLNODE..NEWVOS,
//             DISP=(OLD,KEEP,KEEP)
//OUTDD01  DD  DSN=DOESTAX.&LVLNODE..VSAM.VOSEMP,DISP=SHR,
//             AMP=('BUFNI=5,BUFND=30')
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR
//***
//*
//STEP0400 EXEC PGM=SORT,PARM='VLTEST=0',       SORT ADDRESSES
//             COND=(5,LT),
//             REGION=0K
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  DSN=&&VOSADDR,
//             DISP=(OLD,DELETE,DELETE)
//SORTWK01 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK02 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTWK03 DD  UNIT=SYSDA,SPACE=(CYL,(15,15),RLSE)
//SORTOUT  DD  DSN=&&ADRSORT,
//*SORTOUT  DD  DSN=DOESTAX.&LVLNODE..VOSADDR,
//           DISP=(NEW,PASS,DELETE),
//             UNIT=SYSDA,
//             SPACE=(32000,(1000,1000),RLSE),
//             DCB=(RECFM=FB,LRECL=128,BLKSIZE=32000)
//SYSIN    DD  *
    SORT FIELDS=(1,72,CH,A)
/*
//***
//***
//STEP0410 EXEC PGM=DTSBX463,     ELIMINATE DUPLICATE ADDRESSES
//             COND=(0,LT),
//             REGION=0M
//SYSOUT   DD  SYSOUT=*
//SYSABOUT DD  SYSOUT=*
//SYSABEND DD  SYSOUT=*
//*
//ADRINP    DD  DSN=&&ADRSORT,
//            DISP=(OLD,PASS,DELETE),
//            UNIT=SYSDA,
//            SPACE=(32000,(1000,1000),RLSE),
//            DCB=(RECFM=FB,LRECL=128,BLKSIZE=32000)
//ADDROUTP  DD  DSN=DOESTAX.&LVLNODE..VOSADDR,
//            DISP=(NEW,CATLG,DELETE),
//*           DISP=(OLD,KEEP,KEEP),
//            UNIT=SYSDA,
//            SPACE=(32000,(1000,1000),RLSE),
//            DCB=(RECFM=FB,LRECL=128,BLKSIZE=32000)
//***
//***                              SEND DATA TO SERVER FOR UPLOAD
//STEP0500 EXEC PGM=FTP,           TO DATA VALIDATION DATABASE
//             COND=(0,LT)
//SYSPRINT DD  SYSOUT=*
//SOUTOUT  DD  SYSOUT=*
//SYSPUT   DD  SYSOUT=*,DCB=BLKSIZE=133
//SYSGET   DD  *,DCB=BLKSIZE=80
//INPUT    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSFTVOS),
//            DISP=SHR
//*****