//***** 00010000 //* 11/11/99 MODIFIED FOR Y2K/390 ENV. ZL1 00020000 //* 00021000 //* 05/29/01 MODIFIED FOR TAPE TRACKING FILES. GD 00022000 //* 06/18/2002 ADDED MSTH FILE (PRESENTLY COMMENTS ONLY) 00022100 //* 06/18/2002 ADDED WTC & WGH JHP 00022200 //* 00023000 //* UI TAX VSAM FILE RESTORE. SPECIAL VERSION!! 00030002 //***** 00050000 //DTSUSRST PROC 00060001 //***** 00090001 //STEP0100 EXEC PGM=IDCAMS, DELETE AND DEFINE VSAM FILES 00100000 // COND=(0,LT) 00110000 //SYSPRINT DD SYSOUT=* 00120000 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSA),DISP=SHR 00130001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSB),DISP=SHR 00140001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSC),DISP=SHR 00150001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSD),DISP=SHR 00160001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDATC),DISP=SHR 00180001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDOLA),DISP=SHR 00190001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDREF),DISP=SHR 00200001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDWRK),DISP=SHR 00210001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSE),DISP=SHR 00211001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSF),DISP=SHR 00212001 // DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSG),DISP=SHR 00213001 //*** DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDMSH),DISP=SHR 00214002 //*** DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDWTC),DISP=SHR 00215001 //*** DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSDDWGH),DISP=SHR 00216002 //****************************************************************** 00220000 //STEP0310 EXEC PGM=SORT, MSTA RESTORE 00480000 // COND=(0,LT) 00490000 //SYSOUT DD SYSOUT=* 00500000 //SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTA&BKUPGEN., 00510001 // DISP=SHR,UNIT=CART, 00520001 // VOL=&LSERVOL., 00521002 // LABEL=(1,SL) 00522000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00530000 // AMP=('BUFNI=5,BUFND=30') 00540000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..MSTB&BKUPGEN., 00600001 // DISP=SHR, 00610000 // VOLUME=(,RETAIN,REF=*.STEP0310.SORTIN), 00611000 // LABEL=(2,SL) 00612000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTB,DISP=SHR, 00620000 // AMP=('BUFNI=5,BUFND=30') 00630000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..MSTC&BKUPGEN., 00690001 // DISP=SHR, 00701000 // VOLUME=(,RETAIN,REF=*.STEP0320.SORTIN), 00702000 // LABEL=(3,SL) 00703000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTC,DISP=SHR, 00710000 // AMP=('BUFNI=5,BUFND=30') 00720000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..MSTD&BKUPGEN., 00780001 // DISP=SHR, 00791000 // VOLUME=(,RETAIN,REF=*.STEP0330.SORTIN), 00792000 // LABEL=(4,SL) 00793000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTD,DISP=SHR, 00800000 // AMP=('BUFNI=5,BUFND=30') 00810000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..AIX&BKUPGEN., 00870001 // DISP=SHR, 00881000 // VOLUME=(,RETAIN,REF=*.STEP0340.SORTIN), 00882000 // LABEL=(5,SL) 00883000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, 00890000 // AMP=('BUFNI=5,BUFND=30') 00900000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..ATC&BKUPGEN., 00960001 // DISP=SHR, 00971000 // VOLUME=(,RETAIN,REF=*.STEP0350.SORTIN), 00972000 // LABEL=(6,SL) 00973000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 00980000 // AMP=('BUFNI=5,BUFND=30') 00990000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..OLA&BKUPGEN., 01050001 // DISP=SHR, 01061000 // VOLUME=(,RETAIN,REF=*.STEP0360.SORTIN), 01062000 // LABEL=(7,SL) 01063000 //OUTDD01 DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR, 01070000 // AMP=('BUFNI=5,BUFND=30') 01080000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..REF&BKUPGEN., 01140001 // DISP=SHR, 01151000 // VOLUME=(,RETAIN,REF=*.STEP0370.INDD01), 01152000 // LABEL=(8,SL) 01153000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 01160000 // AMP=('BUFNI=5,BUFND=30') 01170000 //SYSIN DD DSN=DOESTAX.PROD.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.&LVLNDIN..&BCKNODE..WRK&BKUPGEN., 01230001 // DISP=SHR, 01241000 // VOLUME=(,RETAIN,REF=*.STEP0380.SORTIN), 01242000 // LABEL=(9,SL) 01243000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WRK,DISP=SHR, 01250000 // AMP=('BUFNI=5,BUFND=30') 01260000 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01270000 //****************************************************************** 01271000 //STEP0400 EXEC PGM=SORT, MSTE RESTORE 01272000 // COND=(0,LT) 01273000 //SYSOUT DD SYSOUT=* 01274000 //SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTE&BKUPGEN., 01275001 // DISP=SHR, 01276000 // VOLUME=(,RETAIN,REF=*.STEP0390.SORTIN), 01277100 // LABEL=(10,SL) 01277200 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTE,DISP=SHR, 01278000 // AMP=('BUFNI=5,BUFND=30') 01279000 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01279100 //****************************************************************** 01279200 //STEP0410 EXEC PGM=SORT, MSTF RESTORE 01279300 // COND=(0,LT) 01279400 //SYSOUT DD SYSOUT=* 01279500 //SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTF&BKUPGEN., 01279601 // DISP=SHR, 01279700 // VOLUME=(,RETAIN,REF=*.STEP0400.SORTIN), 01279900 // LABEL=(11,SL) 01280000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTF,DISP=SHR, 01280100 // AMP=('BUFNI=5,BUFND=30') 01280200 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01281000 //****************************************************************** 01282000 //STEP0420 EXEC PGM=SORT, MSTG RESTORE 01283000 // COND=(0,LT) 01284000 //SYSOUT DD SYSOUT=* 01285000 //SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTG&BKUPGEN., 01286001 // DISP=SHR, 01287000 // VOLUME=(,RETAIN,REF=*.STEP0410.SORTIN), 01288100 // LABEL=(12,SL) 01288200 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTG,DISP=SHR, 01289000 // AMP=('BUFNI=5,BUFND=30') 01289100 //SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01289200 //****************************************************************** 01300000 //**STEP0430 EXEC PGM=SORT, MSTH RESTORE 01310000 //** COND=(0,LT) 01320000 //**SYSOUT DD SYSOUT=* 01330000 //**SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTH&BKUPGEN., 01340001 //** DISP=SHR, 01350000 //** VOLUME=(,RETAIN,REF=*.STEP0420.SORTIN), 01360000 //** LABEL=(13,SL) 01370000 //**SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTH,DISP=SHR, 01380000 //** AMP=('BUFNI=5,BUFND=30') 01390000 //**SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01400000 //****************************************************************** 01410000 //**STEP0440 EXEC PGM=SORT, WTC RESTORE 01420001 //** COND=(0,LT) 01430001 //**SYSOUT DD SYSOUT=* 01440001 //**SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..WTC&BKUPGEN., 01450001 //** DISP=SHR, 01460001 //** VOLUME=(,RETAIN), 01470001 //** LABEL=(1,SL) 01480001 //**SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR, 01490001 //** AMP=('BUFNI=5,BUFND=30') 01500001 //**SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01510001 //****************************************************************** 01520000 //**STEP0450 EXEC PGM=SORT, WGH RESTORE 01530001 //** COND=(0,LT) 01540001 //**SYSOUT DD SYSOUT=* 01550001 //**SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..WGH&BKUPGEN., 01560001 //** DISP=SHR, 01570001 //** VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN), 01580001 //** LABEL=(2,SL) 01590001 //**SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01600001 //** AMP=('BUFNI=5,BUFND=30') 01610001 //**SYSIN DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSSCOPY),DISP=SHR 01620001 //**** 01630000