//DTSCHGD1 JOB (UI,4300,3400,T),JHP.CHGDLY,CLASS=J,MSGCLASS=X,          00000160
//***      TYPRUN=SCAN,                                                 00000225
//         NOTIFY=ECNTSUP,REGION=0M                                     00000564
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00000637
//  SET PRGNODE='PROD'             /* 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)'             /* 200 BACKUP GENERATIONS            00001349
//  SET   LDEST=U@PRT65                                                 00001449
//  SET   LHOLD='YES'                                                   00001549
//  SET   BD200='Y'                /* TOLERATE DUPS OR NOT              00001662
//****                                                                  00001749
//*    DAILY BENEFIT CHARGE PROCESS                                     00002003
//****                                                                  00002425
//PROCLIB  JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB                       00003026
//*OADLIBS INCLUDE MEMBER=DTSIJLIB                                      00003227
//LOADLIBS INCLUDE MEMBER=DTSIKLIB                                      00003227
//****                                                                  00003325
//STEP0100 EXEC DTSUTCHG,
//             BKUPGEN='(+1)'                                           00002425
//*