//*****                                                                 00010000
//*                                                                     00040000
//*    UI TAX VSAM PRODUCTION CHARGE FILES DAILY BACKUP 04/20/20 ZL1    00050001
//*                                                                     00060000
//*****                                                                 00070000
//DTSUTCHG PROC BCKNODE='BACKUP',                                       00080001
//             BKUPGEN='(+1)'                                           00100000
//****                                                                  00110000
//STEP0110 EXEC PGM=SORT,REGION=0K,              CHGM002 CHG SSN        00120001
//             COND=(0,LT)                                              00130000
//SYSOUT   DD  SYSOUT=*                                                 00140000
//SORTIN   DD  DSN=DOESTAX.&LVLNODE..VSAM.CHGM002,DISP=SHR,             00150001
//             AMP=('BUFNI=5,BUFND=30')                                 00160000
//SORTOUT  DD  DSN=DOESTAX.&LVLNODE..&BCKNODE..CHGM002&BKUPGEN.,        00170001
//             DISP=(,CATLG,DELETE),                                    00180000
//             UNIT=CART,                                               00190000
//             VOLUME=(,RETAIN),                                        00200000
//             LABEL=(1,SL,,,EXPDT=99000),                              00210000
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=64,BLKSIZE=6400)          00220001
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR    00230000
//****                                                                  00240000
//STEP0120 EXEC PGM=SORT,                      CHGM030 CHG TOTAL        02210001
//             COND=(0,LT)                                              02220000
//SYSOUT   DD  SYSOUT=*                                                 02230000
//SORTIN   DD  DSN=DOESTAX.&LVLNODE..VSAM.CHGM030,DISP=SHR,             02240001
//             AMP=('BUFNI=5,BUFND=30')                                 02250000
//SORTOUT  DD  DSN=DOESTAX.&LVLNODE..&BCKNODE..CHGM030&BKUPGEN.,        02260001
//             DISP=(,CATLG,DELETE),                                    02270000
//             UNIT=CART,                                               02280000
//             VOLUME=(,RETAIN,REF=*.STEP0110.SORTOUT),                 02290001
//             LABEL=(2,SL,,,EXPDT=99000),                              02300001
//             DCB=(SYS3.MODEL,RECFM=FB,LRECL=22,BLKSIZE=22000)         02310001
//SYSIN    DD  DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR    02320000
//****                                                                  02330000