//RUNCHGD1 JOB (UI,4300,3400,T),JHP.CHGDLY,CLASS=A,MSGCLASS=X,          00000160
//***      TYPRUN=SCAN,                                                 00000225
//         NOTIFY=ECNTSUP,REGION=0M                                     00000564
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00000637
//  SET PRGNODE='PROD'          RERUN DAILY CHARGING UPDATE FROM        00000760
//  SET LVLNODE='PROD'             /* UI BENEFITS TO UI TAX             00000860
//  SET MSTNODE='PROD'                                                  00000960
//  SET CHGNODE='PROD'                                                  00001060
//  SET CHGMNBR='CHGM002'                                               00001149
//  SET CHGMSSN='CHGM030'                                               00001249
//  SET  BKPGEN='(+1)'                                                  00001349
//  SET   LDEST=U@PRT65                                                 00001449
//  SET   LHOLD='YES'                                                   00001549
//  SET   BD200='Y'                /* TOLERATE DUPS OR NOT              00001662
//****                                                                  00001749
//* RERUN PROC FOR DAILY BENEFIT CHARGE PROCESS                         00002003
//*
//* CHANGE THE NAME OF THE INPUT IN PROC RUNUXCD1 TO THE BACKUP TAPE
//*
//****                                                                  00002425
//PROCLIB  JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB                       00003026
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00003227
//****                                                                  00003325
//STEP0100 EXEC RUNUXCD1           /*EXTRACT AND UPDATE CHARGE FILE     00003963
//****                                                                  00005461
//STEP0300 EXEC DTSCGRD1,          /* PRINT REPORTS                     00005560
//           LDEST=U@PRT65,                                             00005660
//           LHOLD='YES'                                                00005760
//**                                                                    00005860
//*STEP0200.RPT907R1 DD HOLD=NO                /*  UNUS.COND. RPT       00006049
//STEP0200.RPT907R2 DD DUMMY                  /*  UNUS.COND. RPT        00006149
//DOESLBLP.DOESLBL1 DD DUMMY                  /*  LABELS                00007049
//****                                                                  00020025