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