No, I'm not the same person who asked a similar question earlier. :-)
DRDSS seems to be an OK way to copy groups of files. For example...
//COPY1 JOB CLASS=A,MSGCLASS=X,NOTIFY=&SYSUID
//STEP01 EXEC PGM=ADRDSSU,REGION=4080K
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
COPY DATASET( -
INCLUDE(DRDMVS.PROD.DEMAND.DMDMTC, -
DRDMVS.PROD.DDASAV.CRMEMO) -
) -
RENAMEU( -
(DRDMVS.PROD.**, FJS.TEST.**) -
) -
REPLACEU
/*
This will copy the two files in the INCLUDE clause, renamed with FJS.TEST as
the first two nodes, defining the files if they do not already exist.
This works fine for just a regular VSAM cluster. It works even for those
defined NOREUSE. In other words, there is no need to delete the cluster
before copying to it (which is my goal).
I am having a problem doing it with a CLUSTER that has an AIX.
ADR439E (001)-PREVS(07), A PREALLOCATED DATA SET WITH NEW NAME
DRDMVS.CVSC.CVSPAF WAS FOUND FOR DATA SET PROD.CVSC.CVSPAF BUT
WAS UNUSABLE, 08
Where "08 An alternate index (AIX) is defined over the preallocated cluster."
So what am I to do? The only thing I've been able to do is delete the entire
cluster (including AIX and PATH) before I restore the cluster, and then
redefine the AIX and PATH afterward. Pain in the neck! Do I have an
alternative that I have missed?
Thanks,
Frank
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
