38 lines
2.9 KiB
Plaintext
38 lines
2.9 KiB
Plaintext
//***** 00010000
|
|
//* 00023000
|
|
//* UI TAX VSAM CHARGE FILES RESTORE. 04/20/20 ZL1 00030001
|
|
//* 00040000
|
|
//***** 00050000
|
|
//DTSURCHG PROC LVLNODE='PROD', 00060001
|
|
// BKPNODE='BACKUP' 00070001
|
|
//* BKUPGEN='(+0)' 00080001
|
|
//********************************************************************* 00090000
|
|
//STEP0100 EXEC PGM=IDCAMS, DELETE AND DEFINE VSAM FILES 00100001
|
|
// COND=(0,LT) 00110001
|
|
//SYSPRINT DD SYSOUT=* 00120001
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(CHGDD002),DISP=SHR 00130004
|
|
// DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(CHGDD030),DISP=SHR 00140002
|
|
//****************************************************************** 00220000
|
|
//STEP0110 EXEC PGM=SORT, CHGM002 RESTORE 00480001
|
|
// COND=(0,LT) 00490000
|
|
//SYSOUT DD SYSOUT=* 00500000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPNODE..CHGM002&BKUPGEN., 00510001
|
|
// DISP=SHR, 00520000
|
|
// VOLUME=(,RETAIN), 00521000
|
|
// LABEL=(1,SL) 00522000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.CHGM002,DISP=SHR, 00530001
|
|
// AMP=('BUFNI=5,BUFND=30') 00540000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000
|
|
//****************************************************************** 00560000
|
|
//STEP0120 EXEC PGM=SORT, CHGM030 RESTORE 00570001
|
|
// COND=(0,LT) 00580000
|
|
//SYSOUT DD SYSOUT=* 00590000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..&BKPNODE..CHGM030&BKUPGEN., 00600001
|
|
// DISP=SHR, 00610000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTIN), 00611001
|
|
// LABEL=(2,SL) 00612000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..VSAM.CHGM030,DISP=SHR, 00620001
|
|
// AMP=('BUFNI=5,BUFND=30') 00630000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00640000
|
|
//**** 01630000
|