51 lines
4.0 KiB
Plaintext
51 lines
4.0 KiB
Plaintext
//***** 00010000
|
|
//* 11/11/99 MODIFIED FOR Y2K/390 ENV. ZL1 00020003
|
|
//* 00021003
|
|
//* UI TAX VSAM FILE RESTORE. 00030000
|
|
//* 00040000
|
|
//***** 00050000
|
|
//DTSRORG2 PROC LVLNODE='PROD', 00060006
|
|
// 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(DTSDDATC),DISP=SHR 00130005
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDREF),DISP=SHR 00200000
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSDDWRK),DISP=SHR 00210000
|
|
//****************************************************************** 00220000
|
|
//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, 00970009
|
|
// VOLUME=(,RETAIN), 00971009
|
|
// LABEL=(6,SL) 00973009
|
|
//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
|
|
//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, 01150009
|
|
// VOLUME=(,RETAIN,REF=*.STEP0360.SORTIN), 01151009
|
|
// LABEL=(8,SL) 01152009
|
|
//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, 01240009
|
|
// VOLUME=(,RETAIN,REF=*.STEP0380.SORTIN), 01241009
|
|
// LABEL=(9,SL) 01242009
|
|
//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
|
|
//**** 01280008
|