Select all current versions of PDSE data sets that are on the VTOC image of SSL805, and recover them (and if necessary, scratch them) to volume SSL801.
//jobname JOB (acct,info),etc. // EXEC FMS //SYSIN DD * SCAN DSNINDEX
SELECT VTOC,VOL=SSL805,CRI=(DSORG,EQ,PO,OR,DSORG,EQ,POE) EXCLUDE CRI=(ARCTYPE,NE,BACKUP,AND,VERSION,NE,0)
RECOVER SCRATCH,TOVOL=SSL801
|
Copyright © 2015 CA Technologies.
All rights reserved.
|
|