Question & Answer
Question
This informational apar documents a method that may be used to move VGNENERAL and VSPECIFIC VOLCATs to a new device.
Answer
1. Quiesce tape library management with console command V SMS,LIBRARY(libname),ALL,OFFLINE for each library sharing the volume catalog to be moved.
2. Verify the integrity and structure of the volume catalogs by running the EXAMINE and DIAGNOSE commands.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXAMINE NAME(SYS1.VOLCAT.VGENERAL) ITEST NODTEST ELIMIT(99)
.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXAMINE NAME(SYS1.VOLCAT.VGENERAL) DTEST NOITEST ELIMIT(99)
.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//DIAGDD DD DSN=SYS1.VOLCAT.VEGNERAL,DISP=SHR
//SYSIN DD *
DIAGNOSE -
ICFCATALOG -
INFILE(DIAGDD)
3. Export the volume catalog to a temporary file. //IDCAMS EXEC PGM=IDCAMS
2. Verify the integrity and structure of the volume catalogs by running the EXAMINE and DIAGNOSE commands.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXAMINE NAME(SYS1.VOLCAT.VGENERAL) ITEST NODTEST ELIMIT(99)
.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXAMINE NAME(SYS1.VOLCAT.VGENERAL) DTEST NOITEST ELIMIT(99)
.
//IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//DIAGDD DD DSN=SYS1.VOLCAT.VEGNERAL,DISP=SHR
//SYSIN DD *
DIAGNOSE -
ICFCATALOG -
INFILE(DIAGDD)
3. Export the volume catalog to a temporary file. //IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//EXPORTDS DD DSN=hlq.VOLCATMV.EXPORT,DISP=(NEW,CATLG),
// UNIT=SYSALLDA,SPACE=(TRK,(15,15),RLSE)
//SYSIN DD *
EXPORT 'SYS1.VOLCAT.VGENERAL' +
OUTFILE(EXPORTDS) TEMPORARY
4. Disconnect the volume catalog from the master catalog. //IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXPORT 'SYS1.VOLCAT.VGENERAL' DISCONNECT
//EXPORTDS DD DSN=hlq.VOLCATMV.EXPORT,DISP=(NEW,CATLG),
// UNIT=SYSALLDA,SPACE=(TRK,(15,15),RLSE)
//SYSIN DD *
EXPORT 'SYS1.VOLCAT.VGENERAL' +
OUTFILE(EXPORTDS) TEMPORARY
4. Disconnect the volume catalog from the master catalog. //IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
EXPORT 'SYS1.VOLCAT.VGENERAL' DISCONNECT
5. Import the volume catalog. //IDCAMS EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//EXPORTDS DD DSN=hlq.VOLCATMV.EXPORT,DISP=SHR
//SYSIN DD *
IMPORT INFILE(EXPORTDS) +
OUTDATASET('SYS1.VOLCAT.VGENERAL') +
OBJECTS(('SYS1.VOLCAT.VGENERAL' VOLUMES(NEWVOL)))
[{"Product":{"code":"SWG90","label":"z\/OS"},"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Component":"5695DF105 - DFSMS\/MVS CATALOG (ICF VSAM CVOL)","Platform":[{"code":"PF035","label":"z\/OS"}],"Version":"1.1;1.10;1.11;1.12;1.13;1.2;1.3;1.4;1.5;1.6;1.7;1.8;1.9;2.1;2.2;2.3","Edition":"","Line of Business":{"code":"LOB56","label":"Z HW"}}]
Was this topic helpful?
Document Information
Modified date:
03 September 2021
UID
isg3S1001551