//DTSRQ335 JOB (UI,4300,3400,T),DTSRQ335,CLASS=S,                       00010099
//         MSGCLASS=X,                                                  00020061
//         NOTIFY=ECNTSUP,                                              00030099
//         USER=#DOADTS,                                                00031099
//****     TYPRUN=SCAN,                                                 00040098
//         REGION=0M                                                    00050022
//****                                                                  00060025
//*   BUILD DAILY DATABASE EXTRACTS FOR INTRANET WEB APPS               00070099
//*                                                                     00081099
//*   NO MASTER FILE UPDATES                                            00090099
//*                                                                     00100099
//*   JOB RUNS AFTER A SUCESSFULL DAILY UPDATE(DTSPDAY1)                00110099
//*                                                                     00111099
//*   REMOVED CALL TO DTSBX335. REPLACED BY STEP0510 IN                 00120099
//*   DESBD300   02/08/2007   GD.                                       00121099
//****                                                                  00130090
//  SET LVLNODE='PROD'                                                  00140099
//  SET MSTNODE='PROD'                                                  00150099
//****                                                                  00151099
//PROCLIB  JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB                       00160036
//****                                                                  00170036
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00180036
//****                                                                  00190086
//STEP0100 EXEC DTSUX335,        MASTER FILE DATA                       00200099
//          RUNTYPE='QE'                                                00210099
//STEP0100.EXTPARM  DD  *                                               00220099
335,                                                                    00230099
/*                                                                      00240099
//*                                                                     00250099
//STEP0100.DTSFBTCO DD  DUMMY                                           00260061
//STEP0100.DTSFVRO1 DD  DUMMY                                           00270099
//*                                                                     00271099
//STEP0200 EXEC DTSBX201          REPORT COUNTS                         00272099
//****                                                                  00280099
//STEP0300 EXEC DTSBX206          CHANGES TO ARPT-EMP-NO                00281099
//****                                                                  00282099
//STEP0400 EXEC DTSBX215          ICESA BATCH AUDIT                     00283099
//****                                                                  00284099
//*STEP0500 EXEC DTSBX335          WAGES                                00290099
//****                                                                  00300099
/*                                                                      00460099