//***** 00010000 //* 12/15/00 00020001 //* 00021000 //* UI TAX VSAM FILE RESTORE. 00030000 //* 00040000 //* SPECIAL RESTORE OF THE DTSUB506 BACKUP FILES 00041001 //* 00044001 //***** 00050000 //DTSURVSM PROC LVLNODE='PROD', 00060000 // BCKNODE='BKP', 00071002 // BKUPGEN='506.YR2001', 00080002 // LVLRSTR='DEVL' 00081002 //********************************************************************* 00090000 //STEP0100 EXEC PGM=IDCAMS, DELETE AND DEFINE VSAM FILES 00100000 // COND=(0,LT) 00110000 //SYSPRINT DD SYSOUT=* 00120000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSA),DISP=SHR 00130000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSB),DISP=SHR 00140000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSC),DISP=SHR 00150000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSD),DISP=SHR 00160000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDAIX),DISP=SHR 00170000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDATC),DISP=SHR 00180000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDOLA),DISP=SHR 00190000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDREF),DISP=SHR 00200000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWRK),DISP=SHR 00210000 //****************************************************************** 00220000 //STEP0310 EXEC PGM=SORT, MSTA RESTORE 00480000 // COND=(0,LT) 00490000 //SYSOUT DD SYSOUT=* 00500000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00510000 // DISP=SHR, 00520000 // VOLUME=(,RETAIN), 00521000 // LABEL=(1,SL) 00522000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.MSTA,DISP=SHR, 00530002 // AMP=('BUFNI=5,BUFND=30') 00540000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000 //****************************************************************** 00560000 //STEP0320 EXEC PGM=SORT, MSTB RESTORE 00570000 // COND=(0,LT) 00580000 //SYSOUT DD SYSOUT=* 00590000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00600000 // DISP=SHR, 00610000 // VOLUME=(,RETAIN,REF=*.STEP0310.SORTIN), 00611000 // LABEL=(2,SL) 00612000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.MSTB,DISP=SHR, 00620002 // AMP=('BUFNI=5,BUFND=30') 00630000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00640000 //****************************************************************** 00650000 //STEP0330 EXEC PGM=SORT, MSTC RESTORE 00660000 // COND=(0,LT) 00670000 //SYSOUT DD SYSOUT=* 00680000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00690000 // DISP=SHR, 00701000 // VOLUME=(,RETAIN,REF=*.STEP0320.SORTIN), 00702000 // LABEL=(3,SL) 00703000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.MSTC,DISP=SHR, 00710002 // AMP=('BUFNI=5,BUFND=30') 00720000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00730000 //****************************************************************** 00740000 //STEP0340 EXEC PGM=SORT, MSTD RESTORE 00750000 // COND=(0,LT) 00760000 //SYSOUT DD SYSOUT=* 00770000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00780000 // DISP=SHR, 00791000 // VOLUME=(,RETAIN,REF=*.STEP0330.SORTIN), 00792000 // LABEL=(4,SL) 00793000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.MSTD,DISP=SHR, 00800002 // AMP=('BUFNI=5,BUFND=30') 00810000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00820000 //****************************************************************** 00830000 //STEP0350 EXEC PGM=SORT, AIX RESTORE 00840000 // COND=(0,LT) 00850000 //SYSOUT DD SYSOUT=* 00860000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00870000 // DISP=SHR, 00881000 // VOLUME=(,RETAIN,REF=*.STEP0340.SORTIN), 00882000 // LABEL=(5,SL) 00883000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.AIX,DISP=SHR, 00890002 // AMP=('BUFNI=5,BUFND=30') 00900000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00910000 //****************************************************************** 00920000 //STEP0360 EXEC PGM=SORT, ATC RESTORE 00930000 // COND=(0,LT) 00940000 //SYSOUT DD SYSOUT=* 00950000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00960000 // DISP=SHR, 00971000 // VOLUME=(,RETAIN,REF=*.STEP0350.SORTIN), 00972000 // LABEL=(6,SL) 00973000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.ATC,DISP=SHR, 00980002 // AMP=('BUFNI=5,BUFND=30') 00990000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01000000 //****************************************************************** 01010000 //STEP0370 EXEC PGM=IDCAMS, OLA RESTORE 01020000 // COND=(0,LT) 01030000 //SYSPRINT DD SYSOUT=* 01040000 //INDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 01050000 // DISP=SHR, 01061000 // VOLUME=(,RETAIN,REF=*.STEP0360.SORTIN), 01062000 // LABEL=(7,SL) 01063000 //OUTDD01 DD DSN=DOESTAX.&LVLRSTR..VSAM.OLA,DISP=SHR, 01070002 // AMP=('BUFNI=5,BUFND=30') 01080000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 01090000 //****************************************************************** 01100000 //STEP0380 EXEC PGM=SORT, REF RESTORE 01110000 // COND=(0,LT) 01120000 //SYSOUT DD SYSOUT=* 01130000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 01140000 // DISP=SHR, 01151000 // VOLUME=(,RETAIN,REF=*.STEP0370.INDD01), 01152000 // LABEL=(8,SL) 01153000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.REF,DISP=SHR, 01160002 // AMP=('BUFNI=5,BUFND=30') 01170000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01180000 //****************************************************************** 01190000 //STEP0390 EXEC PGM=SORT, WRK RESTORE 01200000 // COND=(0,LT) 01210000 //SYSOUT DD SYSOUT=* 01220000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 01230000 // DISP=SHR, 01241000 // VOLUME=(,RETAIN,REF=*.STEP0380.SORTIN), 01242000 // LABEL=(9,SL) 01243000 //SORTOUT DD DSN=DOESTAX.&LVLRSTR..VSAM.WRK,DISP=SHR, 01250002 // AMP=('BUFNI=5,BUFND=30') 01260000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01270000 // 01280000