129 lines
10 KiB
Plaintext
129 lines
10 KiB
Plaintext
//***** 00010000
|
|
//* UI TAX VSAM FILE TAPE BACKUP 00030000
|
|
//* 00040000
|
|
//* SPECIAL 1-TIME BKP OF THE PROD MSTR FILES AS 1ST STEP IN 00041003
|
|
//* THE DTSRQ506 RUN - EXPERIENCE RATING (PART 1) FOR 2001. 00042003
|
|
//* TO BE RESTORED FOR TESTS OF NEW EXPERIENCE RATING FORMULAS. 00043003
|
|
//***** 00050000
|
|
//DTSUBVSM PROC LVLNODE='PROD', 00060000
|
|
// BCKNODE='BKP', 00061001
|
|
// BKUPGEN='506.YR2001' 00070002
|
|
//********************************************************************* 00100000
|
|
//STEP0110 EXEC PGM=SORT, MSTA BACKUP 00240100
|
|
// COND=(0,LT) 00240200
|
|
//SYSOUT DD SYSOUT=* 00240300
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTA,DISP=SHR, 00240400
|
|
// AMP=('BUFNI=5,BUFND=30') 00240500
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTA&BKUPGEN., 00240600
|
|
// DISP=(,CATLG,DELETE), 00240700
|
|
// UNIT=CART, 00240800
|
|
// VOLUME=(,RETAIN), 00240900
|
|
// LABEL=(1,SL), 00241000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00241100
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00241200
|
|
//********************************************************************* 00241300
|
|
//STEP0120 EXEC PGM=SORT, MSTB BACKUP 00241400
|
|
// COND=(0,LT) 00242000
|
|
//SYSOUT DD SYSOUT=* 00243000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTB,DISP=SHR, 00244000
|
|
// AMP=('BUFNI=5,BUFND=30') 00245000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTB&BKUPGEN., 00246000
|
|
// DISP=(,CATLG,DELETE), 00247000
|
|
// UNIT=CART, 00248000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0110.SORTOUT), 00248100
|
|
// LABEL=(2,SL), 00248200
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00249000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00249100
|
|
//********************************************************************* 00249200
|
|
//STEP0130 EXEC PGM=SORT, MSTC BACKUP 00249300
|
|
// COND=(0,LT) 00249400
|
|
//SYSOUT DD SYSOUT=* 00249500
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTC,DISP=SHR, 00249600
|
|
// AMP=('BUFNI=5,BUFND=30') 00249700
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTC&BKUPGEN., 00249800
|
|
// DISP=(,CATLG,DELETE), 00249900
|
|
// UNIT=CART, 00250000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0120.SORTOUT), 00260000
|
|
// LABEL=(3,SL), 00270000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00280000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00290000
|
|
//********************************************************************* 00300000
|
|
//STEP0140 EXEC PGM=SORT, MSTD BACKUP 00310000
|
|
// COND=(0,LT) 00320000
|
|
//SYSOUT DD SYSOUT=* 00330000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.MSTD,DISP=SHR, 00340000
|
|
// AMP=('BUFNI=5,BUFND=30') 00350000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..MSTD&BKUPGEN., 00360000
|
|
// DISP=(,CATLG,DELETE), 00370000
|
|
// UNIT=CART, 00380000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0130.SORTOUT), 00390000
|
|
// LABEL=(4,SL), 00400000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00410000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00420000
|
|
//********************************************************************* 00430000
|
|
//STEP0150 EXEC PGM=SORT, AIX BACKUP 00431000
|
|
// COND=(0,LT) 00432000
|
|
//SYSOUT DD SYSOUT=* 00433000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.AIX,DISP=SHR, 00434000
|
|
// AMP=('BUFNI=5,BUFND=30') 00435000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..AIX&BKUPGEN., 00436000
|
|
// DISP=(,CATLG,DELETE), 00437000
|
|
// UNIT=CART, 00438000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0140.SORTOUT), 00439000
|
|
// LABEL=(5,SL), 00439100
|
|
// DCB=(SYS3.MODEL,RECFM=FB,LRECL=64,BLKSIZE=8192) 00439200
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00439300
|
|
//********************************************************************* 00439400
|
|
//STEP0160 EXEC PGM=SORT, ATC BACKUP 00440000
|
|
// COND=(0,LT) 00450000
|
|
//SYSOUT DD SYSOUT=* 00460000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.ATC,DISP=SHR, 00470000
|
|
// AMP=('BUFNI=5,BUFND=30') 00480000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..ATC&BKUPGEN., 00490000
|
|
// DISP=(,CATLG,DELETE), 00500000
|
|
// UNIT=CART, 00510000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0150.SORTOUT), 00520000
|
|
// LABEL=(6,SL), 00530000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00540000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00550000
|
|
//********************************************************************* 00560000
|
|
//STEP0170 EXEC PGM=IDCAMS, OLA BACKUP 00570000
|
|
// COND=(0,LT) 00580000
|
|
//SYSPRINT DD SYSOUT=* 00590000
|
|
//INDD01 DD DSN=DOESTAX.&LVLNODE..VSAM.OLA,DISP=SHR, 00600000
|
|
// AMP=('BUFNI=5,BUFND=30') 00610000
|
|
//OUTDD01 DD DSN=DOESTAX.&LVLNODE..&BCKNODE..OLA&BKUPGEN., 00620000
|
|
// DISP=(,CATLG,DELETE), 00630000
|
|
// UNIT=CART, 00640000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0160.SORTOUT), 00650000
|
|
// LABEL=(7,SL), 00660000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00670000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRONE),DISP=SHR 00680000
|
|
//********************************************************************* 00690000
|
|
//STEP0180 EXEC PGM=SORT, REF BACKUP 00700000
|
|
// COND=(0,LT) 00710000
|
|
//SYSOUT DD SYSOUT=* 00720000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.REF,DISP=SHR, 00730000
|
|
// AMP=('BUFNI=5,BUFND=30') 00740000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..REF&BKUPGEN., 00750000
|
|
// DISP=(,CATLG,DELETE), 00760000
|
|
// UNIT=CART, 00770000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0170.OUTDD01), 00780000
|
|
// LABEL=(8,SL), 00790000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00800000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00810000
|
|
//********************************************************************* 00820000
|
|
//STEP0190 EXEC PGM=SORT, WRK BACKUP 00830000
|
|
// COND=(0,LT) 00840000
|
|
//SYSOUT DD SYSOUT=* 00850000
|
|
//SORTIN DD DSN=DOESTAX.&LVLNODE..VSAM.WRK,DISP=SHR, 00860000
|
|
// AMP=('BUFNI=5,BUFND=30') 00870000
|
|
//SORTOUT DD DSN=DOESTAX.&LVLNODE..&BCKNODE..WRK&BKUPGEN., 00880000
|
|
// DISP=(,CATLG,DELETE), 00890000
|
|
// UNIT=CART, 00900000
|
|
// VOLUME=(,RETAIN,REF=*.STEP0180.SORTOUT), 00910000
|
|
// LABEL=(9,SL), 00920000
|
|
// DCB=(SYS3.MODEL,RECFM=VB,LRECL=4096,BLKSIZE=32760) 00930000
|
|
//SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSSCOPY),DISP=SHR 00940000
|
|
//********************************************************************* 00950000
|