//DTSBX475 JOB (UI,4300,3400,T),EMP.ADDR.EXTRACT.BEN,                   00000010
//          CLASS=P,MSGCLASS=X,                                         00000010
//*         TYPRUN=SCAN,
//          USER=#DOADTS,
//***       USER=ECNTSUP,
//          NOTIFY=ECNTSUP,
//          REGION=0M
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//*                                                                     00001700
//   SET  UINODE='PROD'
//   SET LVLNODE='PROD'
//   SET MSTNODE='PROD'
//*                                                                     00001700
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB                       00001600
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00001600
//**                                                                    00001700
//*   EXTRACT EMPLOYER DATA (NAME, ADDRESS, CLASS, STATUS, RATE)        00001700
//*   FROM TAX MASTER FILES FOR USE IN A BENEFITS WEB APPLICATION       00001700
//*                                                                     00001700
//*   RUNS AS PART OF THE WEEK-END PROCESS                              00001700
//*                                                                     00001700
//*   READ-ONLY - NO MASTER FILE UPDATES.                               00001700
//*                                                                     00001700
//*   OUTPUT FILE: UI.TAX.PROD.WEEKLY.EXTRACT                           00001700
//*                                                                     00001700
//*   THIS JOB MAY BE RERUN. THE TIMING IS NOT CRITICAL.                00001700
//*   IT REBUILDS THE OUTPUT FILE EACH TIME IT RUNS.                    00001700
//*   IF IT IS RERUN, IT MUST BE THROUGH CA7, SINCE IT WRITES TO        00001700
//*   A FILE WITH A HIGH LEVEL NODE OF 'UI'.                            00001700
//**                                                                    00001700
//STEP0100 EXEC DTSBX475
//***            (FOLLOWING FILE CAN BE USED FOR TEST OVERRIDE)         00001700
//***STEP0100.ADRFILE  DD  DSN=DOESTAX.DEVL.UI.WEEKLY.EXTRACT
//**                                                                    00001700