Generate a DSN1COPY TRANSLATE from an image copy using Recovery Analyzer
search cancel

Generate a DSN1COPY TRANSLATE from an image copy using Recovery Analyzer

book

Article ID: 246506

calendar_today

Updated On:

Products

Recovery Analyzer for DB2 for z/OS

Issue/Introduction

Recovery Analyzer for Db2 for z/OS (PRA) provides an interface to use DSN1COPY automatic translation features. DSN1COPY copies data sets and
translates them from one format to another (for example, from a Db2 image copy data set to a Db2 VSAM data set). The data sets to translate can be
defined along with an output data set and other copy parameters such as the old and new OBID's.

Recovery Analyzer reads the data sets and retrieves the DBID, PSID, and all OBIDs in the space, obtains the new DBID and all OBIDs, and then hands
processing over to the DSN1COPY utility with the XLAT parameters defined by the user.

A tablespace containing tables with rows of identical length cannot be automatically translated. Review the table row data to determine which table OBID
correlates to each image copy OBID, then enter the old and new OBIDs on the Image Copy Data Set Recovery screen.

Resolution

Start at the Recovery Analyzer main menu:

5) Special Recovery Services

then

2 - DSN1COPY XLAT and Recover


Enter the required fields:

1. Enter The Dataset Name To Translate 
2. VCAT name, Database and Tablespace name
3. Instance and Maximum Number of Pages to Process
4. Any other parms on the screen that are required for your task.


PRPD1CP         --------- Image Copy Data Set Recovery -------- yy/mm/dd hh:mm
COMMAND ===>
 ----------------------------------------------------------------------------
Input Parameters:                                | Enter your own xlat parms:
Enter The Dataset Name To Translate              | Optional   Old  New
==> AUTHID1.DBCORP.TSROLE.CPY.G0004V00__________ |  DBID ==> ____ ____
Unit => ________ Volume => ______ Label => ___   |  PGID ==> ____ ____
                                                 | Optional
Output Parameters:                               | OBIDs Old  New  Old  New
Enter The Dataset To Write Translated Rows To    |  ==> ____ ____ ____ ____
==> ____________________________________________ |  ==> ____ ____ ____ ____
Unit => ________ Volume => ______                |  ==> ____ ____ ____ ____
                                                 |  ==> ____ ____ ____ ____
Use Translate keyword   ==> Y                    |  ==> ____ ____ ____ ____
Vcat Name               ==> VCAT_             ----------------------------
Database                ==> DBCORP__
Table Space Name        ==> TSROLE__
Instance                ==> 1                    1 or 2
Partition Number        ==> ____
Check Data Integrity    ==> Y
Reset RBA On Data Pages ==> Y
Maximum Number of Pages to Process ==> 0_______  (0 For All Pages)

The next screen generates the JCL to a dataset(member) of your choice.


Recovery Analyzer Job Generation Options:

 Edit Dataset after Generation   ===> Y                 (Yes/No/no and Submit)
 XMESSAGE output direction       ===> W                 (Wto/Ptimsg/pRamsg)
 Dataset Name  ===> 'AUTHID1.XLAT.CNTL(DSN1XLAT)'

 Jobcard Specification:
=> //AUTHID1B JOB (xxxxxxxxx),'XLAT',CLASS=B,MSGCLASS=X,
  => //             NOTIFY=AUTHID1,REGION=0M,TIME=1440
  => /*JOBPARM SYSAFF=ssid
  => //*

The JCL contains the options chosen........


000082 //*
000083 //PRAREPRT DD  SYSOUT=*
000084 //SYSUT1   DD  DSN=AUTHID1.DBCORP.TSROLE.CPY.G0004V00,
000085 //             UNIT=3390,
000086 //             DISP=OLD
000087 //SYSUT2   DD  DSN=VCAT.DSNDBD.DBCORP.TSROLE.I0001.A001,
000088 //             UNIT=3390,
000089 //             DISP=OLD
000090 //SYSXLAT  DD  DSN=&&CNTLCRDS,UNIT=SYSDA,DISP=(NEW,PASS,DELETE),
000091 //             SPACE=(TRK,(1,5)),DCB=(RECFM=FB,LRECL=80,BLKSIZE=8000)
000092 //PRAMSG   DD  SYSOUT=*
000093 //PTIMSG   DD  SYSOUT=*
000094 // PEND
000095 //*
000096 //RECOVERY EXEC RECOVERY,COND=(4,LT)
000097 //*
000098 //SYSTSIN  DD  *
000099    ISPSTART PGM(PTLDRIVM) PARM(SUFFIX=00,CI=PRL#MAIN/ssid)
000100 /*
000101 //*
000102 //PRA#DATA DD  *
000103   IMAGE_COPY_TRANSLATE
000104     XLAT_DATA_BASE      = (DBCORP)
000105     XLAT_SPACE_NAME     = (TSROLE)
000106     XLAT_PART_NBR       = (0000)
000107     XLAT_MAX_READS      = (0)
000108     XLAT_CHECK_VALID    = (Y)
000109     XLAT_USE_OBIDXLAT   = (Y)
000110     XLAT_RESET_RBA      = (Y)
000111     XMESSAGE_DIRECTION  = (W)
000112 /*
000113 //*


When submitted the DSN1COPY utility can be seen in operation:

DSN1999I START OF DSN1COPY FOR JOB AUTHID1B ANALYZERRECOVERY
DSN1989I DSN1COPY IS PROCESSED WITH THE FOLLOWING OPTIONS:
            CHECK/NO PRINT/ 4K/FULLCOPY    /NON-SEGMENT/NUMPARTS=   0/   OBIDXLA
         DSSIZE=    G/PIECESIZ=    /       /
DSN1998I INPUT  DSNAME = AUTHID1.DBCORP.TSROLE.CPY.G0004V00          , SEQ
DSN1997I OUTPUT DSNAME = VCAT.DSNDBD.DBCORP.TSROLE.I0001.A001     , VSAM
DSN1994I DSN1COPY COMPLETED SUCCESSFULLY,  00000003 PAGES PROCESSED

READY
   ISPSTART PGM(PTLDRIVM) PARM(SUFFIX=00,CI=PRL#MAIN/ssid)
 AUTHID1.AUTHID1B.JOB91037.D0000106.? was preallocated (no free was done).
READY
END
PRL#XLAT               CONTROL CARDS GENERATED AND PASSED TO DSN1COPY
          4922,4922          DATABASE ID
          0057,0014          PAGE SET ID
          0058,0028          OBJECT ID
GENERATED PARM CARD TO BE PASSED TO DSN1COPY:OBIDXLAT,CHECK,RESET,FULLCOPY

Additional Information

Copy Data Sets Using DSN1COPY XLAT