We are trying to use DFSMSdss that provides dump and restore services that 
can be used on DB2 data sets. 
(We are trying to avoid coding of image copies or table unloads that will take 
up coding effort and a lot of space to hold the data. We want the tapes to be 
used efficiently and so to pack many tables into one tape.)

Currently we've only dumped tablespace, indexspace from the DB(dump & 
restore jobs RC=0). After restore job complete, we got DB2 -904 error when 
we want to access those table spaces.(-904 means the table space is no 
longer available.)  

So my questions are: Does DFSMSdss dump/restore equire any other 
components of the table space be dumped and restored together to keep db2 
happy?
Anything else I've missed? What's the exact process  if we want to use 
DFSMSdss to dump/restore DB2 data sets?

Any ideas, thanks in advance!

The dump job:
                                                                    
//S01     EXEC PGM=IKJEFT01,DYNAMNBR=20                                 
//STEPLIB  DD DSN=SYS1.DSNDB2T.RUNLIB.LOAD,DISP=SHR                     
//         DD DSN=SYS1.DSNDB2T.SDSNLOAD,DISP=SHR                        
//SYSTSPRT DD  SYSOUT=*                                                 
//SYSPRINT DD  SYSOUT=*                                                 
//SYSUDUMP DD  SYSOUT=*                                                 
//SYSTSIN  DD  *                                                        
  DSN SYSTEM(DB2T)                                                      
    -STO DB(xxxDDV1) SPACENAM(xxxSCCO)                                  
    -STO DB(xxxDDV1) SPACENAM(xxxSCCR)                                  
    -STO DB(xxxDDV1) SPACENAM(xxxXCCO1)                                 
    -STO DB(xxxDDV1) SPACENAM(xxxXCCO2)                                 
    -STO DB(xxxDDV1) SPACENAM(xxxXCCR1)                                 
    -STO DB(xxxDDV1) SPACENAM(xxxXCCR2)                                 
                                                                        
  END                                                                   
//*****************************************************
//DUMPPAR  EXEC PGM=ADRDSSU                                    
//SYSPRINT DD  SYSOUT=*                                        
//DUMPDS   DD  DISP=(NEW,CATLG,DELETE),                        
//             DSN=Txxx.F.DV.ARCHIVE.VSAM.BACKUP,              
//             UNIT=(3390,59),SPACE=(CYL,(20,300),RLSE)        
//SYSIN    DD  *                                               
  DUMP DATASET(  -                                             
       INCLUDE(  -                                             
               TxxxDB2T.DSNDB*.xxxDDV1.xxxSCCO.I0001.A001, -   
               TxxxDB2T.DSNDBC.xxxDDV1.xxxXCCO1.I0001.A001, -  
               TxxxDB2T.DSNDBC.xxxDDV1.xxxXCCO2.I0001.A001, -  
               TxxxDB2T.DSNDBC.xxxDDV1.xxxXCCR1.I0001.A001, -  
               TxxxDB2T.DSNDBC.xxxDDV1.xxxXCCR2.I0001.A001, -  
               TxxxDB2T.DSNDB*.xxxDDV1.xxxSCCR.I0001.A001 -    
               )) -                                            
       OUTDDNAME(DUMPDS)   
//*****************************************************
//S02     EXEC PGM=IKJEFT01,DYNAMNBR=20                
//STEPLIB  DD DSN=SYS1.DSNDB2T.RUNLIB.LOAD,DISP=SHR    
//         DD DSN=SYS1.DSNDB2T.SDSNLOAD,DISP=SHR       
//SYSTSPRT DD  SYSOUT=*                                
//SYSPRINT DD  SYSOUT=*                                
//SYSUDUMP DD  SYSOUT=*                                
//SYSTSIN  DD  *                                       
  DSN SYSTEM(DB2T)                                     
    -STA DB(xxxDDV1) SPACENAM(xxxSCCO) ACCESS(RW)      
    -STA DB(xxxDDV1) SPACENAM(xxxSCCR) ACCESS(RW)      
    -STA DB(xxxDDV1) SPACENAM(xxxXCCO1) ACCESS(RW)     
    -STA DB(xxxDDV1) SPACENAM(xxxXCCO2) ACCESS(RW)     
    -STA DB(xxxDDV1) SPACENAM(xxxXCCR1) ACCESS(RW)     
    -STA DB(xxxDDV1) SPACENAM(xxxXCCR2) ACCESS(RW)     
  END                             

The Restore job: 

//S01     EXEC PGM=IKJEFT01,DYNAMNBR=20                
//STEPLIB  DD DSN=SYS1.DSNDB2T.RUNLIB.LOAD,DISP=SHR    
//         DD DSN=SYS1.DSNDB2T.SDSNLOAD,DISP=SHR       
//SYSTSPRT DD  SYSOUT=*                                
//SYSPRINT DD  SYSOUT=*                                
//SYSUDUMP DD  SYSOUT=*                                
//SYSTSIN  DD  *                                       
  DSN SYSTEM(DB2T)                                     
    -STO DB(xxxDDV1) SPACENAM(xxxSCCO)                 
    -STO DB(xxxDDV1) SPACENAM(xxxSCCR)                 
    -STO DB(xxxDDV1) SPACENAM(xxxXCCO1)                
    -STO DB(xxxDDV1) SPACENAM(xxxXCCO2)                
    -STO DB(xxxDDV1) SPACENAM(xxxXCCR1)                
    -STO DB(xxxDDV1) SPACENAM(xxxXCCR2)                
                                                       
  END                                                  
//*****************************************************
//RESTPAR  EXEC PGM=ADRDSSU,COND=(04,LT)                   
//SYSPRINT DD  SYSOUT=*                                    
//DUMPDS   DD  DISP=SHR,DSN=Txxx.F.DV.ARCHIVE.VSAM.BACKUP  
//SYSIN    DD  *                                           
 RESTORE  DATASET( -                                       
            INCLUDE( ** -                                  
               )) -                                        
          INDD(DUMPDS)                            -        
          REPLACE -                                        
          CATALOG -                                        
          TGTGDS(ACTIVE)                                   
//*      
//S02     EXEC PGM=IKJEFT01,DYNAMNBR=20              
//STEPLIB  DD DSN=SYS1.DSNDB2T.RUNLIB.LOAD,DISP=SHR  
//         DD DSN=SYS1.DSNDB2T.SDSNLOAD,DISP=SHR     
//SYSTSPRT DD  SYSOUT=*                              
//SYSPRINT DD  SYSOUT=*                              
//SYSUDUMP DD  SYSOUT=*                              
//SYSTSIN  DD  *                                     
  DSN SYSTEM(DB2T)                                   
    -STA DB(xxxDDV1) SPACENAM(xxxSCCO) ACCESS(RW)    
    -STA DB(xxxDDV1) SPACENAM(xxxSCCR) ACCESS(RW)    
    -STA DB(xxxDDV1) SPACENAM(xxxXCCO1)  ACCESS(RW)  
    -STA DB(xxxDDV1) SPACENAM(xxxXCCO2)  ACCESS(RW)  
    -STA DB(xxxDDV1) SPACENAM(xxxXCCR1)  ACCESS(RW)  
    -STA DB(xxxDDV1) SPACENAM(xxxXCCR2)  ACCESS(RW)  
  END

--------------------------------------------

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to