Copying ACF2 GSO records from one SYSID to another

Products

• ACF2 - z/OS

Issue/Introduction

Creating a new lpar and copying of the ACF2 database from one existing system with a different SYSID. How can the GSO records stored under one SYSID to copied to the SYSID of the new system?

 

Environment

Release : 16.0

Resolution

The ACF2 GSO records are stored in the ACF2 INFOSTG database based on SYSID. Section: "Understanding SYSIDs" discusses the use    
of the SYSID and GSO records.          

When copying the ACF2 databases from one lpar to another lpar with without a different SYSID the best approach would be to make copies of the GSO records stored under the from system's SYSID for example SYSA to the new lpar's SYSID for example SYSB. Then, make a copy of the databases from the one system and restore on the new lpar. When the new lpar is ipl'd with SYSB  the new copied GSO SYSB records will be used.

The following examples show how to copy GSO records from one SYSID to another.

 ACF                                                                      
 SET CONTROL(GSO) SYSID(new sysid)                                        
 INSERT USING(modelrecid) USYSID(old sysid) recid                         

Sample INSERT commands to copy the 2 SAFDEFs, 1 CLASMAP and 1 OPTS GSO  records from SYSID SYSA to SYSB:

 SET CONTROL(GSO) SYSID(SYSB)                                             
 INSERT USING(CLASMAP.CBND) USYSID(SYSA) CLASMAP.CBND                     
 INSERT USING(SAFDEF.JUNK)  USYSID(SYSA) SAFDEF.JUNK                      
 INSERT USING(SAFDEF.JUNK2) USYSID(SYSA) SAFDEF.JUNK2                     
 INSERT USING(OPTS) USYSID(SYSA) OPTS              

To copy all of the GSO records from one SYSID to another you can build a     
SYSIN file with the INSERT USING statements as follows.                      
                                                                             
1) First build a flat file of all of the current GSO records for the from    
   SYSID SYSA.                                                               
                                                                             
   //REPORT  EXEC PGM=ACFBATCH                                               
   //SYSPRINT DD DSN=PUBLIC.ACFBATCH.FLATFILE,                               
   //       DISP=(NEW,CATLG,DELETE),                                         
   //       DCB=(RECFM=FB,BLKSIZE=256,LRECL=256),                            
   //       VOL=SER=TEMP01,SPACE=(CYL,2)          
   //SYSOUT   DD SYSOUT=*                                                     
   //SYSIN  DD *                                                              
   SET CONTROL(GSO) SYSID(SYSA)                                               
   SET TERSE                                                                  
   LIST LIKE(-)                                                               
                                                                              
2) Edit the FLATFILE, issuing CHANGE commands to build the appropriate INSERT 
   USING commands to copy GSO records from SYSID(SYSA) to SYSID(SYSB):        
                                                                              
   For example two output lines:                                              
   SYSA / CLASMAP.ADM LAST CHANGED BY USER01 ON 03/18/09-13:36                
   SYSA / OPTS LAST CHANGED BY USER01 ON 09/26/08-17:29                       
                                                                              
   Change to:                                                                 
                                                                              
   SET CONTROL(GSO) SYSID(SYSB)                                               
   INSERT USING(CLASMAP.ADM) USYSID(SYSA) CLASMAP.ADM                         
   INSERT USING(OPTS)  USYSID(SYSA) OPTS