//***** 00010000 //* 00020000 //* UI TAX MAIN VSAM FILE RESTORE/REORGANIZATION (MONTH-END) 00030003 //* 00040000 //* 05/29/2001 MODIFIED FOR TAPE TRACKING FILES. GD. 00041012 //* 00042012 //***** 00050000 //DTSRORG1 PROC LVLNODE='PROD', 00060009 // BCKNODE='BACKUP', 00070000 // BKUPGEN='(+0)' 00080000 //********************************************************************* 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(DTSDDMSE),DISP=SHR 00180012 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSF),DISP=SHR 00190012 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSG),DISP=SHR 00200012 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSH),DISP=SHR 00210023 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSI),DISP=SHR 00210123 //* DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWGH),DISP=SHR 00211021 //****************************************************************** 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, 00520014 // VOLUME=(,RETAIN), 00521014 // LABEL=(1,SL) 00522014 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00530000 // 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, 00610014 // VOLUME=(,RETAIN,REF=*.STEP0310.SORTIN), 00611014 // LABEL=(2,SL) 00612014 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTB,DISP=SHR, 00620000 // 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, 00700014 // VOLUME=(,RETAIN,REF=*.STEP0320.SORTIN), 00701014 // LABEL=(3,SL) 00702014 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTC,DISP=SHR, 00710000 // 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, 00790014 // VOLUME=(,RETAIN,REF=*.STEP0330.SORTIN), 00791014 // LABEL=(4,SL) 00792014 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTD,DISP=SHR, 00800000 // 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, 00880015 // VOLUME=(,RETAIN,REF=*.STEP0340.SORTIN), 00881015 // LABEL=(5,SL) 00882015 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, 00890000 // AMP=('BUFNI=5,BUFND=30') 00900000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00910000 //****************************************************************** 00920000 //STEP0360 EXEC PGM=SORT, MSTE RESTORE 00940012 // COND=(0,LT) 00950012 //SYSOUT DD SYSOUT=* 00960012 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTE&BKUPGEN., 00970012 // DISP=SHR, 00980015 // VOLUME=(,RETAIN,REF=*.STEP0350.SORTIN), 00981015 // LABEL=(10,SL) 00982016 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTE,DISP=SHR, 00990012 // AMP=('BUFNI=5,BUFND=30') 01000012 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01010012 //****************************************************************** 01020012 //STEP0370 EXEC PGM=SORT, MSTF RESTORE 01030012 // COND=(0,LT) 01040012 //SYSOUT DD SYSOUT=* 01050012 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTF&BKUPGEN., 01060012 // DISP=SHR, 01070016 // VOLUME=(,RETAIN,REF=*.STEP0360.SORTIN), 01071016 // LABEL=(11,SL) 01072016 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTF,DISP=SHR, 01080012 // AMP=('BUFNI=5,BUFND=30') 01090012 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01100012 //****************************************************************** 01110012 //STEP0380 EXEC PGM=SORT, MSTG RESTORE 01120012 // COND=(0,LT) 01130012 //SYSOUT DD SYSOUT=* 01140012 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTG&BKUPGEN., 01150012 // DISP=SHR, 01160016 // VOLUME=(,RETAIN,REF=*.STEP0370.SORTIN), 01161016 // LABEL=(12,SL) 01162016 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTG,DISP=SHR, 01170012 // AMP=('BUFNI=5,BUFND=30') 01180012 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01190012 //****************************************************************** 01190120 //STEP0390 EXEC PGM=SORT, MSTH RESTORE 01190222 // COND=(0,LT) 01190322 //SYSOUT DD SYSOUT=* 01190422 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTH&BKUPGEN., 01190522 // DISP=SHR, 01190622 // VOLUME=(,RETAIN), 01190724 // LABEL=(1,SL) 01190824 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTH,DISP=SHR, 01190922 // AMP=('BUFNI=5,BUFND=30') 01191022 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01191122 //****************************************************************** 01192018 //STEP0400 EXEC PGM=SORT, MSTI RESTORE 01194022 // COND=(0,LT) 01195022 //SYSOUT DD SYSOUT=* 01196022 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTI&BKUPGEN., 01197022 // DISP=SHR, 01198022 // VOLUME=(,RETAIN,REF=*.STEP0390.SORTIN), 01199022 // LABEL=(2,SL) 01200024 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTI,DISP=SHR, 01201022 // AMP=('BUFNI=5,BUFND=30') 01202022 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01203022 //****************************************************************** 01204020 //*TEP0410 EXEC PGM=SORT, WGH RESTORE 01210022 //* COND=(0,LT) 01220022 //*YSOUT DD SYSOUT=* 01230022 //*ORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WGH&BKUPGEN., 01240021 //* DISP=SHR 01250021 //*ORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01260021 //* AMP=('BUFNI=5,BUFND=30') 01270021 //*YSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01280021 //****************************************************************** 01290018