//***** 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