//***** 00010000 //* 11/11/99 MODIFIED FOR Y2K/390 ENV. ZL1 00020000 //* 00021000 //* 00023000 //* UI TAX VSAM FILE MONTHLY RESTORE. FOR PRODUCTION USE ONLY 00030001 //* 00040000 //***** 00050000 //DTSURMON PROC LVLNODE='PROD', 00060001 // BCKNODE='BKP.MONEND', 00070001 // BKUPGEN='(-1)' 00080002 //********************************************************************* 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 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSE),DISP=SHR 00211000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSF),DISP=SHR 00212000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSG),DISP=SHR 00213000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSH),DISP=SHR 00213100 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSI),DISP=SHR 00213200 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWTC),DISP=SHR 00215000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWGH),DISP=SHR 00216000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDNAM),DISP=SHR 00217000 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWSQ),DISP=SHR 00217105 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDMSJ),DISP=SHR 00217205 // DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWG2),DISP=SHR 00217306 //****************************************************************** 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.&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, 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.&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.&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, 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.&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.&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, 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.&LVLNODE..VSAM.ATC,DISP=SHR, 00980000 // 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.&LVLNODE..VSAM.OLA,DISP=SHR, 01070000 // 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.&LVLNODE..VSAM.REF,DISP=SHR, 01160000 // 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.&LVLNODE..VSAM.WRK,DISP=SHR, 01250000 // AMP=('BUFNI=5,BUFND=30') 01260000 //SYSIN DD DSN=DOESTAX.&LVLNODE..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.&LVLNODE..&BCKNODE..MSTE&BKUPGEN., 01275000 // 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.&LVLNODE..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.&LVLNODE..&BCKNODE..MSTF&BKUPGEN., 01279600 // 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.&LVLNODE..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.&LVLNODE..&BCKNODE..MSTG&BKUPGEN., 01286000 // 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.&LVLNODE..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.&LVLNODE..&BCKNODE..MSTH&BKUPGEN., 01340000 // DISP=SHR, 01350000 // VOLUME=(,RETAIN), 01360000 // LABEL=(1,SL) 01370000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTH,DISP=SHR, 01380000 // AMP=('BUFNI=5,BUFND=30') 01390000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01400000 //****************************************************************** 01401000 //STEP0440 EXEC PGM=SORT, MSTI RESTORE 01402000 // COND=(0,LT) 01403000 //SYSOUT DD SYSOUT=* 01404000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTI&BKUPGEN., 01405000 // DISP=SHR, 01406000 // VOLUME=(,RETAIN,REF=*.STEP0430.SORTIN), 01407000 // LABEL=(2,SL) 01408000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTI,DISP=SHR, 01409000 // AMP=('BUFNI=5,BUFND=30') 01409100 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01409200 //****************************************************************** 01410000 //STEP0450 EXEC PGM=SORT, WTC RESTORE 01420000 // COND=(0,LT) 01430000 //SYSOUT DD SYSOUT=* 01440000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WTC&BKUPGEN., 01450000 // DISP=SHR, 01460000 // VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN), 01471000 // LABEL=(3,SL) 01480000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WTC,DISP=SHR, 01490000 // AMP=('BUFNI=5,BUFND=30') 01500000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01510000 //****************************************************************** 01520000 //STEP0460 EXEC PGM=SORT, WGH RESTORE 01530000 // COND=(0,LT) 01540000 //SYSOUT DD SYSOUT=* 01550000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WGH&BKUPGEN., 01560000 // DISP=SHR, 01570000 // VOLUME=(,RETAIN,REF=*.STEP0450.SORTIN), 01580000 // LABEL=(4,SL) 01590000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WGH,DISP=SHR, 01600000 // AMP=('BUFNI=5,BUFND=30') 01610000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01620000 //**** 01630000 //STEP0470 EXEC PGM=SORT, WAGE NAME RESTORE 01640000 // COND=(0,LT) 01650000 //SYSOUT DD SYSOUT=* 01660000 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WAGE.NAME&BKUPGEN., 01670000 // DISP=SHR, 01680000 // VOLUME=(,RETAIN,REF=*.STEP0460.SORTIN), 01690000 // LABEL=(5,SL) 01700000 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WAGE.NAME,DISP=SHR, 01710000 // AMP=('BUFNI=5,BUFND=30') 01720000 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01730000 //**** 01731000 //STEP0480 EXEC PGM=SORT, WESQ RESTORE 01732005 // COND=(0,LT) 01733003 //SYSOUT DD SYSOUT=* 01734003 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WESQ&BKUPGEN., 01735005 // DISP=SHR, 01736003 // VOLUME=(,RETAIN,REF=*.STEP0470.SORTIN), 01737003 // LABEL=(6,SL) 01738003 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WESQ,DISP=SHR, 01739005 // AMP=('BUFNI=5,BUFND=30') 01739103 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01739203 //**** 01739303 //STEP0490 EXEC PGM=SORT, MSTJ RESTORE 01739405 // COND=(0,LT) 01739505 //SYSOUT DD SYSOUT=* 01739605 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTJ&BKUPGEN., 01739705 // DISP=SHR, 01739805 // VOLUME=(,RETAIN,REF=*.STEP0480.SORTIN), 01739905 // LABEL=(7,SL) 01740005 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.MSTJ,DISP=SHR, 01741005 // AMP=('BUFNI=5,BUFND=30') 01742005 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01743005 //**** 01744005 //STEP0500 EXEC PGM=SORT, WG2 RESTORE 01745006 // COND=(0,LT) 01746006 //SYSOUT DD SYSOUT=* 01747006 //SORTIN DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WG2&BKUPGEN., 01748006 // DISP=SHR, 01749006 // VOLUME=(,RETAIN,REF=*.STEP0490.SORTIN), 01749106 // LABEL=(8,SL) 01749206 //SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.WG2,DISP=SHR, 01749306 // AMP=('BUFNI=5,BUFND=30') 01749406 //SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01749506 //**** 01749606 //**** 01750000