//***** 00010000 //* UI TAX VSAM FILE TAPE BACKUP - SPECIAL VERSION (03.27.02) 00030001 //***** 00050000 //DTSUXVSM PROC LVLNODE='PROD', 00060001 // BCKNODE='BACKUP', 00061000 // BKUPGEN='(+1)' 00070000 //********************************************************************* 00100000 //**STEP0110 EXEC PGM=SORT, MSTA BACKUP 00240102 //** COND=(0,LT) 00240202 //**SYSOUT DD SYSOUT=* 00240302 //**SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00240402 //** AMP=('BUFNI=5,BUFND=30') 00240502 //**SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00240602 //** DISP=(,CATLG,DELETE), 00240702 //** UNIT=CART, 00240802 //** VOLUME=(,RETAIN), 00240902 //** LABEL=(1,SL), 00241002 //** DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00241102 //**SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241202 //********************************************************************* 00241300 //STEP0120 EXEC PGM=SORT, MSTB BACKUP 00241400 // COND=(0,LT) 00242000 //SYSOUT DD SYSOUT=* 00243000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB.G1428V00, 00243102 // DISP=SHR, 00243202 // VOLUME=(,RETAIN), 00243302 // LABEL=(2,SL) 00243402 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00246000 // DISP=(,CATLG,DELETE), 00247000 // UNIT=CART, 00248000 // VOLUME=(,RETAIN), 00248104 // LABEL=(1,SL), 00248202 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00249000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00249100 //********************************************************************* 00249200 //STEP0130 EXEC PGM=SORT, MSTC BACKUP 00249300 // COND=(0,LT) 00249400 //SYSOUT DD SYSOUT=* 00249500 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC.G1428V00, 00249602 // DISP=SHR, 00249702 // VOLUME=(,RETAIN), 00249802 // LABEL=(3,SL) 00249902 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00250200 // DISP=(,CATLG,DELETE), 00250300 // UNIT=CART, 00251000 // VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00260000 // LABEL=(2,SL), 00270002 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00280000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00290000 //********************************************************************* 00300000 //STEP0140 EXEC PGM=SORT, MSTD BACKUP 00310000 // COND=(0,LT) 00320000 //SYSOUT DD SYSOUT=* 00330000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD.G1428V00, 00331002 // DISP=SHR, 00332002 // VOLUME=(,RETAIN), 00333002 // LABEL=(4,SL) 00334002 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00360000 // DISP=(,CATLG,DELETE), 00370000 // UNIT=CART, 00380000 // VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00390000 // LABEL=(3,SL), 00400002 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00410000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00420000 //********************************************************************* 00430000 //STEP0150 EXEC PGM=SORT, AIX BACKUP 00431000 // COND=(0,LT) 00432000 //SYSOUT DD SYSOUT=* 00433000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX.G1428V00, 00433102 // DISP=SHR, 00433202 // VOLUME=(,RETAIN), 00433302 // LABEL=(5,SL) 00433402 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00436000 // DISP=(,CATLG,DELETE), 00437000 // UNIT=CART, 00438000 // VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00439000 // LABEL=(4,SL), 00439102 // DCB=(SYS3.MODEL,RECFM=FB,LRECL=64,BLKSIZE=8192) 00439200 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00439300 //********************************************************************* 00439400 //STEP0160 EXEC PGM=SORT, ATC BACKUP 00440000 // COND=(0,LT) 00450000 //SYSOUT DD SYSOUT=* 00460000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC.G1428V00, 00461002 // DISP=SHR, 00462002 // VOLUME=(,RETAIN), 00463002 // LABEL=(6,SL) 00464002 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00490000 // DISP=(,CATLG,DELETE), 00500000 // UNIT=CART, 00510000 // VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 00520000 // LABEL=(5,SL), 00530002 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00540000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000 //********************************************************************* 00560000 //STEP0170 EXEC PGM=IDCAMS, OLA BACKUP 00570000 // COND=(0,LT) 00580000 //SYSPRINT DD SYSOUT=* 00590000 //INDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA.G1428V00, 00591002 // DISP=SHR, 00592002 // VOLUME=(,RETAIN), 00593002 // LABEL=(7,SL) 00594002 //OUTDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 00620000 // DISP=(,CATLG,DELETE), 00630000 // UNIT=CART, 00640000 // VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 00650000 // LABEL=(6,SL), 00660002 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00670000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00680000 //********************************************************************* 00690000 //STEP0180 EXEC PGM=SORT, REF BACKUP 00700000 // COND=(0,LT) 00710000 //SYSOUT DD SYSOUT=* 00720000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF.G1428V00, 00721002 // DISP=SHR, 00722002 // VOLUME=(,RETAIN), 00723002 // LABEL=(8,SL) 00724002 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 00750000 // DISP=(,CATLG,DELETE), 00760000 // UNIT=CART, 00770000 // VOLUME=(,RETAIN,REF=*.STEP0170.OUTDD01), 00780000 // LABEL=(7,SL), 00790002 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00800000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00810000 //********************************************************************* 00820000 //STEP0190 EXEC PGM=SORT, WRK BACKUP 00830000 // COND=(0,LT) 00840000 //SYSOUT DD SYSOUT=* 00850000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK.G1428V00, 00851002 // DISP=SHR, 00852002 // VOLUME=(,RETAIN), 00853002 // LABEL=(9,SL) 00854003 //SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 00880000 // DISP=(,CATLG,DELETE), 00890000 // UNIT=CART, 00900000 // VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 00910000 // LABEL=(8,SL), 00920003 // DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00930000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00940000 //********************************************************************* 01340000