IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Restoration of Multi volume GDG from Physical Dump Backup


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
umasankartt

New User


Joined: 14 Jul 2012
Posts: 10
Location: India

PostPosted: Thu Sep 27, 2012 6:28 pm
Reply with quote

Hi All,

Please help on restoring the Multivolume GDG DS. I have used below jcl


//RESTGDG JOB 'DUMP',CLASS=A,NOTIFY=&SYSUID,
// REGION=0M
//REST EXEC PGM=ADRDSSU PARM='TYPRUN=NORUN'
//TAPE3 DD UNIT=/890,VOL=SER=yyy134,
// DSNAME=DUMPFULL.xxx289,LABEL=(36,SL),
// DISP=OLD
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
RESTORE DATASET(INCLUDE(VPP1.CMS.GDG.HNT2.G0625V00)) LVOL(xxx289) -
INDDNAME(TAPE3) RENAMEU(BACKAMSL) ODY(yy123E) SPHERE


We getting below Error code msg:
ADR497E (001)-CATLG(07), A CATALOG ERROR OCCURRED WHILE DELETING DATA SET xxxxxxx.gdg REASON CODE IS EG-042

ADR415W (001)-TDDS (02), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY

The mentioned GDG is present in 3 volumes while trying to restore 2 volumes are restored successfully and last throwing error. so that its not catalog after completion.


Regards,
Umasankar
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Thu Sep 27, 2012 7:03 pm
Reply with quote

You appear to have mangled the message too badly for further analysis to take place; it should end
Code:
RETURN CODE IS return_code, REASON CODE IS {reason_code | NOT PROVIDED}                                 

Please go back to the job sysout and cut and paste the message enclosing it in Code tags as I have done.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2455
Location: Hampshire, UK

PostPosted: Thu Sep 27, 2012 7:28 pm
Reply with quote

And I bet it did not THROW an error.
Back to top
View user's profile Send private message
umasankartt

New User


Joined: 14 Jul 2012
Posts: 10
Location: India

PostPosted: Fri Sep 28, 2012 12:48 am
Reply with quote

RC 08.. I have mentioned the Error codes along with log
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Fri Sep 28, 2012 1:12 am
Reply with quote

Although you refuse to post the actual error message, a return code of 08 and a reason code of 42 ADR497E suggests:
Quote:
Explanation: The catalog record for the requested entry could not be found.

Programmer Response: Ensure that the entry name specified on the access method services command is in the catalog specified.

Is that sufficiently clear?
Back to top
View user's profile Send private message
Pete Wilson

Active Member


Joined: 31 Dec 2009
Posts: 582
Location: London

PostPosted: Fri Sep 28, 2012 5:09 pm
Reply with quote

You're going to have fun with this. Phsyical restores should be avoided where possible as they can be so problematic. Normally you have to go and do a DEFINE RECATALOG for all the data after the restore and may need all the volsers coded in sequence.

If this is a physical restore you would need to specify three output volumes in the ODY to match the source dataset if that was using 3 volumes, and they must be the same capacity and geometry . So you'd also need to specify all the volsers in LVOL that the source dataset was on as well I would have thought.

You could delete the target file BACKAMSL.CMS.GDG.HNT2.G0625V00 from the target volumes first and try again. an IDCAMS job with
DELETE BACKAMSL.CMS.GDG.HNT2.G0625V00 NVR
should get rid of the DSCB and NVR entries from the volumes.
Back to top
View user's profile Send private message
umasankartt

New User


Joined: 14 Jul 2012
Posts: 10
Location: India

PostPosted: Mon Oct 01, 2012 12:42 am
Reply with quote

I have used this jcl and it works fine.... while i am trying to rename the HLQ only it shows error.. Now its works fine after successfull restoration of 3 volumes recataloged and i had renamed the dataset as req. means BACKAMSL.CMS.GDG.HNT2.G0625V00

Code:
//RESTGDG JOB 'DUMP',CLASS=A,NOTIFY=&SYSUID,                       
//       REGION=0M                                                 
//REST   EXEC PGM=ADRDSSU PARM='TYPRUN=NORUN'                     
//TAPE1  DD UNIT=/890,VOL=SER=B08122,                             
//          DSNAME=DUMPFULL.VWM099,LABEL=(62,SL),                 
//          DISP=OLD                                               
//SYSPRINT DD SYSOUT=*                                             
//SYSIN   DD *                                                     
 RESTORE DATASET(INCLUDE(VPP1.GUI.GDG.WWOL.G0613V00))-           
 RENAMEU(VPP1.GUI.GDG.WWOL.G0613V00,BACKAMSL.FILE) -               
 ODY(FC1240)INDDNAME(TAPE1)                                       
/*                                                                 
//*RC-08


Thanks for all your responses... hope i choosen a correct site to explore my ideas and doubts icon_smile.gif
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Mon Oct 01, 2012 1:57 am
Reply with quote

Hello,

Quote:
hope i choosen a correct site to explore my ideas and doubts
I believe you have icon_smile.gif

I suspect that if the restore did not work, the rename would also have problems . . .

Possibly i misunderstand.

Also, the editor does not support Bold within the Code tags (i'll change).
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Rotate partition-logical & physic... DB2 0
No new posts Data Backup suggestions DB2 5
No new posts Convert single row multi cols to sing... DFSORT/ICETOOL 6
No new posts Volume chain using DFSORT DFSORT/ICETOOL 17
No new posts Code Multi Row fetch in PL1 program PL/I & Assembler 1
Search our Forums:

Back to Top