183 lines
14 KiB
Plaintext
183 lines
14 KiB
Plaintext
//***** 00010004
|
|
//* 00020004
|
|
//* UI TAX VSAM FILE RESTORE. 00030004
|
|
//* 00040004
|
|
//* 03/25/2004 THIS PROC INCLUDES A PARM TO INDICTE WHETHER 00041023
|
|
//* THE INPUT WGH AND WTC FILES NEED TO BE RESTORED. 00041123
|
|
//* IF CONVERT = 0, CONVERT THE FILES 00041228
|
|
//* IF CONVERT = 1, USE THE BACKUP VERSIONS WITHOUT 00041328
|
|
//* CONVERTING 00041428
|
|
//* 00042004
|
|
//***** 00043004
|
|
//CXXX2XXX PROC LVLNDIN='XXXX', 00044023
|
|
// LVLNDOUT='XXXX', 00044108
|
|
// BCKNODE='BACKUP', 00045004
|
|
// BKUPGEN='(+0)' 00046032
|
|
//********************************************************************* 00047004
|
|
//STEP0100 EXEC PGM=IDCAMS, DELETE AND DEFINE VSAM FILES 00048004
|
|
// COND=(0,LT) 00049004
|
|
//SYSPRINT DD SYSOUT=* 00050004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSA),DISP=SHR 00060005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSB),DISP=SHR 00070005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSC),DISP=SHR 00080005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSD),DISP=SHR 00090005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDAIX),DISP=SHR 00100005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDATC),DISP=SHR 00110005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDOLA),DISP=SHR 00120005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDREF),DISP=SHR 00130005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDWRK),DISP=SHR 00140005
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSE),DISP=SHR 00141019
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSF),DISP=SHR 00142019
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDMSG),DISP=SHR 00143019
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDWGH),DISP=SHR 00144023
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDWGX),DISP=SHR 00144130
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDWTC),DISP=SHR 00145019
|
|
// DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSDDWTX),DISP=SHR 00145131
|
|
//*** 00145223
|
|
//****************************************************************** 00150004
|
|
//STEP0310 EXEC PGM=SORT, MSTA RESTORE 00160004
|
|
// COND=(0,LT) 00170004
|
|
//SYSOUT DD SYSOUT=* 00180004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTA&BKUPGEN., 00190005
|
|
// DISP=SHR, 00200004
|
|
// VOLUME=(,RETAIN) 00210004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTA,DISP=SHR, 00220005
|
|
// AMP=('BUFNI=5,BUFND=30') 00230004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00240005
|
|
//****************************************************************** 00250004
|
|
//STEP0320 EXEC PGM=SORT, MSTB RESTORE 00260004
|
|
// COND=(0,LT) 00270004
|
|
//SYSOUT DD SYSOUT=* 00280004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTB&BKUPGEN., 00290005
|
|
// DISP=SHR, 00300004
|
|
// VOLUME=(,RETAIN) 00310004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTB,DISP=SHR, 00320005
|
|
// AMP=('BUFNI=5,BUFND=30') 00330004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00340005
|
|
//****************************************************************** 00350004
|
|
//STEP0330 EXEC PGM=SORT, MSTC RESTORE 00360004
|
|
// COND=(0,LT) 00370004
|
|
//SYSOUT DD SYSOUT=* 00380004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTC&BKUPGEN., 00390005
|
|
// DISP=SHR, 00400004
|
|
// VOLUME=(,RETAIN) 00410004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTC,DISP=SHR, 00420005
|
|
// AMP=('BUFNI=5,BUFND=30') 00430004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00440005
|
|
//****************************************************************** 00450004
|
|
//STEP0340 EXEC PGM=SORT, MSTD RESTORE 00460004
|
|
// COND=(0,LT) 00470004
|
|
//SYSOUT DD SYSOUT=* 00480004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTD&BKUPGEN., 00490005
|
|
// DISP=SHR, 00500004
|
|
// VOLUME=(,RETAIN) 00510004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTD,DISP=SHR, 00520005
|
|
// AMP=('BUFNI=5,BUFND=30') 00530004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00540005
|
|
//****************************************************************** 00550004
|
|
//STEP0350 EXEC PGM=SORT, AIX RESTORE 00560004
|
|
// COND=(0,LT) 00570004
|
|
//SYSOUT DD SYSOUT=* 00580004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..AIX&BKUPGEN., 00590005
|
|
// DISP=SHR, 00600004
|
|
// VOLUME=(,RETAIN) 00610004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.AIX,DISP=SHR, 00620005
|
|
// AMP=('BUFNI=5,BUFND=30') 00630004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00640005
|
|
//****************************************************************** 00650004
|
|
//STEP0360 EXEC PGM=SORT, ATC RESTORE 00660004
|
|
// COND=(0,LT) 00670004
|
|
//SYSOUT DD SYSOUT=* 00680004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..ATC&BKUPGEN., 00690005
|
|
// DISP=SHR, 00700004
|
|
// VOLUME=(,RETAIN) 00710004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.ATC,DISP=SHR, 00720005
|
|
// AMP=('BUFNI=5,BUFND=30') 00730004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00740005
|
|
//****************************************************************** 00750004
|
|
//STEP0370 EXEC PGM=IDCAMS, OLA RESTORE 00760004
|
|
// COND=(0,LT) 00770004
|
|
//SYSPRINT DD SYSOUT=* 00780004
|
|
//INDD01 DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..OLA&BKUPGEN., 00790005
|
|
// DISP=SHR, 00800004
|
|
// VOLUME=(,RETAIN) 00810004
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNDOUT..VSAM.OLA,DISP=SHR, 00820005
|
|
// AMP=('BUFNI=5,BUFND=30') 00830004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSRONE),DISP=SHR 00840005
|
|
//****************************************************************** 00850004
|
|
//STEP0380 EXEC PGM=SORT, REF RESTORE 00860004
|
|
// COND=(0,LT) 00870004
|
|
//SYSOUT DD SYSOUT=* 00880004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..REF&BKUPGEN., 00890005
|
|
// DISP=SHR, 00900004
|
|
// VOLUME=(,RETAIN) 00910004
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.REF,DISP=SHR, 00920005
|
|
// AMP=('BUFNI=5,BUFND=30') 00930004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00940005
|
|
//****************************************************************** 00950004
|
|
//STEP0390 EXEC PGM=SORT, WRK RESTORE 00960004
|
|
// COND=(0,LT) 00970004
|
|
//SYSOUT DD SYSOUT=* 00980004
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..WRK&BKUPGEN., 00990005
|
|
// DISP=SHR, 01000017
|
|
// VOLUME=(,RETAIN) 01001016
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.WRK,DISP=SHR, 01010005
|
|
// AMP=('BUFNI=5,BUFND=30') 01020004
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01030005
|
|
//****************************************************************** 01050012
|
|
//STEP0400 EXEC PGM=SORT, MSTE RESTORE 01060012
|
|
// COND=(0,LT) 01070012
|
|
//SYSOUT DD SYSOUT=* 01080012
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTE&BKUPGEN., 01090012
|
|
// DISP=SHR, 01100012
|
|
// VOLUME=(,RETAIN) 01110012
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTE,DISP=SHR, 01120012
|
|
// AMP=('BUFNI=5,BUFND=30') 01130012
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01140012
|
|
//****************************************************************** 01150012
|
|
//STEP0410 EXEC PGM=SORT, MSTF RESTORE 01160012
|
|
// COND=(0,LT) 01170012
|
|
//SYSOUT DD SYSOUT=* 01180012
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTF&BKUPGEN., 01190012
|
|
// DISP=SHR, 01200012
|
|
// VOLUME=(,RETAIN) 01210012
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTF,DISP=SHR, 01220012
|
|
// AMP=('BUFNI=5,BUFND=30') 01230012
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01240012
|
|
//****************************************************************** 01250012
|
|
//STEP0420 EXEC PGM=SORT, MSTG RESTORE 01260012
|
|
// COND=(0,LT) 01270012
|
|
//SYSOUT DD SYSOUT=* 01280012
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..MSTG&BKUPGEN., 01290012
|
|
// DISP=SHR 01300017
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.MSTG,DISP=SHR, 01320012
|
|
// AMP=('BUFNI=5,BUFND=30') 01330012
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01340012
|
|
//****************************************************************** 01350019
|
|
//STEP0440 EXEC PGM=SORT, WTC RESTORE 01360019
|
|
// COND=(0,LT) 01370019
|
|
//SYSOUT DD SYSOUT=* 01380019
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..WTC&BKUPGEN., 01390020
|
|
// DISP=SHR, 01400019
|
|
// VOLUME=(,RETAIN), 01410019
|
|
// LABEL=(1,SL) 01420019
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.WTX,DISP=SHR, 01430031
|
|
// AMP=('BUFNI=5,BUFND=30') 01440019
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01451021
|
|
//****************************************************************** 01460019
|
|
//STEP0445 EXEC DTSBZ263 CONVERT WTC 01460230
|
|
//****************************************************************** 01460330
|
|
//STEP0460 EXEC PGM=SORT, RESTORE WGH TO WGX 01461130
|
|
// COND=(0,LT) 01461229
|
|
//SYSOUT DD SYSOUT=* 01461329
|
|
//SORTIN DD DSN=DOESTAX.&LVLNDIN..&BCKNODE..WGH&BKUPGEN., 01461429
|
|
// DISP=SHR, 01461529
|
|
// VOLUME=(,RETAIN,REF=*.STEP0440.SORTIN), 01461629
|
|
// LABEL=(2,SL) 01461729
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNDOUT..VSAM.WGX,DISP=SHR, 01462329
|
|
// AMP=('BUFNI=5,BUFND=30') 01462429
|
|
//SYSIN DD DSN=DOESTAX.&LVLNDOUT..APPL.PARMLIB(DTSSCOPY),DISP=SHR 01462529
|
|
//** 01462629
|
|
//STEP0470 EXEC DTSBZ265 WGH CONVERSION 01462729
|
|
//****************************************************************** 01570019
|