I have been working with two levels of ADCD z/OS system, Z24C and Z25D. I want to be able to use VSAM files from the z24C level system on the z25D system.
With non VSAM files, it is easy. I can define an alias for a high level qualifier such as my userid COLIN which points to the user catalog with my data sets in it. It is a bit harder with VSAM files, especially where there is a file with the same name of both systems (such as CSF.CSFCKDS).
A VSAM PATH is an alias for VSAM files.
Conceptually the first step is
//IBMDEFP JOB 1,MSGCLASS=H
//S1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEF PATH -
(NAME(COLINQ.AUT420.AUT420D.CSI.Z24C) -
PATHENTRY( AUT420.AUT420D.CSI ) -
) -
CATALOG( USERCAT.Z24C.PRODS )
/*
File AUT420.AUT420D.CSI is in catalog USERCAT.Z24C.PRODS
The above JCL will create a name COLINQ.AUT420.AUT420D.CSI.Z24C which points to the file AUT420.AUT420D.CSI in catalog USERCAT.Z24C.PRODS. The entry COLINQ.AUT420.AUT420D.CSI.Z24C is put in the same catalog.
If you use ISPF 3.4 it will not find the dataset.
Create an alias for the High Level Qualifier
//IBMUSERT JOB 1,MSGCLASS=H
//S1 EXEC PGM=IDCAMS,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEFINE ALIAS (NAME(COLINQ) RELATE('USERCAT.Z24C.PRODS'))
/*
The above JCL will create an alias COLINQ, and says to find any datasets beginning with COLINQ go and look in catalog USERCAT.Z24C.PRODS.
To import the catalog into the current system
//IBMIMPC JOB 1,MSGCLASS=H
//S1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//CAT DD DISP=SHR,DSN=ADCD.LIB.JCL,VOL=SER=C4SYS1,
// UNIT=3390
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
IMPORT -
OBJECTS -
((USERCAT.Z24C.PRODS -
VOLUME(C4SYS1) -
DEVICETYPE(3390))) -
CONNECT -
CATALOG(CATALOG.Z25D.MASTER)
/*
//
The above JCL says import the catalog USERCAT.Z24C.PRODS on volume(C4SYS1), type (3390) into the (master) catalog CATALOG.Z25D.MASTER.
If the system needs to find USERCAT.Z24C.PRODS, it has enough information to be able to find it.
What you actually do
Now that you understand the process, the process you should follow is
- Import the catalog into the current system.
- Define an High Level Qualifier alias to point to the catalog. I might pick COLIN4C ( for the z24C system).
- Create a path using COLIN4C as the high level qualifier of the data set, for each VSAM file.
You should then be able to see your data set in ISPF 3.4
To access the Z24C /u ZFS files system on the Z25D system I used
IMPORT -
OBJECTS -
((CATALOG.Z24C.MASTER -
VOLUME(C4SYS1) -
DEVICETYPE(3390))) -
CONNECT -
CATALOG(CATALOG.Z25D.MASTER)
DEFINE ALIAS (NAME(Z24CMAST) RELATE('CATALOG.Z24C.MASTER'))
DEFINE PATH -
(NAME(Z24CMAST.ZFS.USERS ) -
PATHENTRY( ZFS.USERS )) -
CATALOG(CATALOG.Z24C.MASTER)
In Unix I created a directory
mkdir /u/old
The mounted the file system in ISPF option 6 TSO
mount filesystem('Z24CMAST.ZFS.USERS') mountpoint('/u/old') type(ZFS)
mode(read)
I could then access the files from /u/old/…