ADRDSSU是DF/DSS工具中的一员,是DASD DATA和SPACE的管理工具,常用来BACKUP,RESTORE DATASETS和VOLUME
参数说明:
DUMP DATASET表示要DUMP的是DATASET
OUTDDNAME表示把文件DUMP到哪里
SPHERE带有VSAM文件时指定
COMPRESS压缩
ALLDATA()copy所有被allocated的space(文件不为空)
ALLEXCP:copy所有被allocated的space(文件可以为空),一般和ALLDATA互相作用,组合使用
TOLERATE(ENQF)即使要处理的datasets被适用也可以COPY,和FULL,TRACKS冲突
OPT(1)默认指定,一次读一track,(2)一次读2track,(3)一次读5track,(4)一次读一cylinder
ADMIN移动高权限的文件时指定
PROCESS(SYS1)COPY SYS1时指定
BYPASSACS(*) NULLSTORCLAS回避SMS rules
REPLACE,PURGE都可以用来覆盖目标卷已经存在的同名文件
DELETE移动后uncataloged
JCL1:
STEP00 如果用来备份得文件存在,则先删除
STEP01 备份VSAM文件(STJI.MJA.VE025.TESTVS)到文件(STJI.MJA.VE025.TESTVS.BAK)中
//JOBCARD
//*===================================================================*
//* << FILE DELETE >>
//*===================================================================*
//STEP00 EXEC PGM=IEFBR14
//DD1 DD DISP=(MOD,DELETE),DSN=YOUR.LIB.BAK
//*===================================================================*
//* << BACKUP >>
//*===================================================================*
//STEP01 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//INPUT DD DSN=YOUR.LIB.BAK,
// SPACE=(CYL,(1,0),RLSE),UNIT=SYSDA,
// DISP=(,CATLG),DCB=(DSCB)
//SYSIN DD *
DUMP DATASET(INCLUDE( -
YOUR.VSLIB -
) -
) -
OUTDDNAME(INPUT) -
SPHERE -
COMPRESS -
ALLDATA(*) ALLEXCP -
TOLERATE(ENQFAILURE) -
OPT(1)
/*
JCL2:
恢复被dump的dataset
//JOBCARD
//*====================================================================*
//* VSM -> DASD RESTORE
//*====================================================================*
//STEP01 EXEC PGM=ADRDSSU
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//INDD DD DSN=YOUR.LIB.BAK,
// DISP=SHR
//SYSIN DD *
RESTORE INDDNAME(INDD) -
DATASET(INCLUDE( -
YOUR.VSLIB)) -
CATALOG -
REPLACE -
SPHERE -
TOL(ENQFAILURE) -
/*
JCL3:
把文件从一个卷XXX1,COPY到另一个卷XXX2
//JOBCARD
//*********************************************************************
//* ADRDSSU
//*********************************************************************
//STEP02 EXEC PGM=ADRDSSU,REGION=2M
//FROMVOL DD UNIT=3390,DISP=SHR,VOL=SER=XXX1
//TOVOL DD UNIT=3390,DISP=SHR,VOL=SER=XXX2
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
COPY DATASET(INCLUDE(YOUR.LIB.*)) -
INDD(FROMVOL) OUTDD(TOVOL) -
ALLDATA(*) -
DELETE
//