Is there a valid function to move Dynam/T controlled volumes from one vault to another in the Dynam Catalog ?

Document ID : KB000044722
Last Modified Date : 14/02/2018
Show Technical Document Details

Question:

Is there a valid function to move Dynam/T controlled volumes from one vault to another in the Dynam Catalog ?

Answer:

To be able to do this either through BATCH or via ONLINE CUI do the following Steps.

EXAMPLE:

to move volume number GL0001 to a new VAULT Location "X": 

1 - defined the new vault "X" with program DYNCAT
// EXEC DYNCAT,SIZE=256K 
VAULT VLTLOC=X DESC='Test' 
(online in CUI with command): 
DYNCAT VAULT VLTLOC=X DESC='Test' 

2 - alter the volser to put it in vault "X" with program DYNCAT 
// EXEC DYNCAT,SIZE=256K 
ALTER 'the.DSN.name’ VER=001 PERM=YES EXP=PERM VLT=X 
(PERM and EXP should be used as needed by customer) 
(online in CUI with command): 
DYNCAT ALTER 'the.DSN.name' VER=001 PERM=YES EXP=PERM VLT=X 

after that GL0001 looks like: 
Volser: GL0001 Volseq: 1 
Files: 1 Vault: X 

Data Set: the.DSN.name 

        Version  Vol     Initial       Create        Create  
Cmd Number Seq   Volser       Date           Time Job Name Expires Vlt 
___   00001   0001 GL0001(V) 21/04/2016 07:37 FAVER2    PERM   X 

3 - run TDYNVLT MOVEMENT, VERIFY which creates the following reports: 
// EXEC TDYNVLT,SIZE=256K 
MOVEMENT 
VERIFY 
CA L O C A T I O N M O V E M E N T E X C E P T I O N R E P O R T 
----------------------------------------------------------------------------------------------- 
LOC 
DATA SET NAME VRS VOLSER V SLOT EXCEPTION DESCRIPTION 
----------------------------------------------------------------------------------------------- 
the.DSN.name        1     GL0001   X           VERSION PERMANENT 
*** TOTAL VOLUMES 1 

followed by INVENTORY which now shows: 
// EXEC TDYNVLT,SIZE=256K 
INVENTORY 

VAULT A 
----------------------------------------- 
LOC 
VOLSER VOLSQ V SLOT DATA SET NAME 
----------------------------------------- 
GL0000      1        A             the.DSN.name 
GL0002(V)  1        A             the.DSN.name 
GL0003(V)  1        A             the.DSN.name 
*** TOTAL VOLUMES VAULT A 3 

VAULT X     TEST 
---------------------------------------- 
LOC 
VOLSER VOLSQ V SLOT DATA SET NAME 
---------------------------------------- 
GL0001(V) 1        X         the.DSN.name

*** TOTAL VOLUMES VAULT X 1