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

recovery of my lost PDS


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

New User


Joined: 21 Jun 2005
Posts: 22

PostPosted: Thu Aug 18, 2005 2:26 pm
Reply with quote

hi,

can anyone please help me to come out of this prob.

i had accidentally given the name of my pds instead of the loadlib name and what happens is that the structure of the pds has been changed completly after compilation.now i lost my programs which were the members in that pds.is it possible to recover my lost pds.the former pds was of recfm=fb, lrecl=80 and blksz=8000... now recfm is changed to u.
Back to top
View user's profile Send private message
Rupesh.Kothari

Member of the Month


Joined: 27 Apr 2005
Posts: 463

PostPosted: Thu Aug 18, 2005 3:12 pm
Reply with quote

Hi sushilchandran,

To recover your lost PDS, your mainframe admin can help if he/ she took backup.

In some mainframe, Admin is taking regularly backup of all PS and PDS.

Regards
Rupesh
Back to top
View user's profile Send private message
shivashunmugam Muthu

Active User


Joined: 22 Jul 2005
Posts: 114
Location: Chennai

PostPosted: Thu Aug 18, 2005 3:31 pm
Reply with quote

in ispf 6 give

hrecover <datasetname> (0)
Back to top
View user's profile Send private message
sushilchandran

New User


Joined: 21 Jun 2005
Posts: 22

PostPosted: Fri Aug 19, 2005 3:20 pm
Reply with quote

thanks.but can anyone explain how is this happening.i mean the change in the characteristics of pds
Back to top
View user's profile Send private message
elonics

New User


Joined: 05 Jul 2005
Posts: 49
Location: India

PostPosted: Mon Aug 22, 2005 12:05 pm
Reply with quote

hi Shiva,
i also faced similar kind of problem. i lost my pds members.
So as u said i gave the same command in ispf 6 .
Quote:
hrecover <datasetname> (0)
But it is giving the below message .

Quote:
DFSMSHSM NOT ACTIVE - REQUEST 00000005 QUEUED

I need someone help to resolve this.


Elo'nics.
Back to top
View user's profile Send private message
shivashunmugam Muthu

Active User


Joined: 22 Jul 2005
Posts: 114
Location: Chennai

PostPosted: Mon Aug 22, 2005 1:55 pm
Reply with quote

Quote:
DFSMSHSM NOT ACTIVE - REQUEST 00000005 QUEUED


It shows that Storage Management Subsystem not active in your environment. Check with system admin, is there any other support installed.
Back to top
View user's profile Send private message
senti

New User


Joined: 18 Aug 2005
Posts: 19

PostPosted: Mon Aug 22, 2005 5:14 pm
Reply with quote

Hi Sushilchandran,

Try this,

//STP0100 EXEC PGM=IEBGENER
//SYSOUT DD SYSOUT=*
//SYSUT1 DD DUMMY,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSUT2 DD DSN=Corrupted.PDS(New_member),DISP=SHR,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSIN DD DUMMY


Give the corrupted PDs memeber in SYSUT2.

I tried and am able to revert back.

Thanks, Senti
Back to top
View user's profile Send private message
senti

New User


Joined: 18 Aug 2005
Posts: 19

PostPosted: Mon Aug 22, 2005 5:27 pm
Reply with quote

Quote:
Give the corrupted PDs memeber in SYSUT2


Small correction to this

Give the corrupted PDS in SYSUT2
Back to top
View user's profile Send private message
elonics

New User


Joined: 05 Jul 2005
Posts: 49
Location: India

PostPosted: Tue Aug 23, 2005 12:34 pm
Reply with quote

Hi Senti,


Let me be clear about my requirement. i have given my pds name in the SYSPRINT . What happened is i lost all my pds members and also the DCB parametres had got changed.
I dont think ur way of procedure will recover my members back. U r just copying .

If i m wrong, Plz Correct me.


Elonics.
Back to top
View user's profile Send private message
senti

New User


Joined: 18 Aug 2005
Posts: 19

PostPosted: Tue Aug 23, 2005 12:46 pm
Reply with quote

Hey Elonics,

No, its not copying anything as input is dummy.

I presume, u are able to view the members of the PDS,but they are corrupted.Right..?

Code i provided above will change the DCB parameters and hence the contents of its memebers will be reverted to their original form (to cobol pgm etc.).

Regds, Senti
Back to top
View user's profile Send private message
Ravi gaur

New User


Joined: 12 Jul 2005
Posts: 38

PostPosted: Tue Aug 23, 2005 1:08 pm
Reply with quote

use this only need to put your corrupted DATASET name in the sysut2 and run,,,

//STP0100 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DUMMY,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSUT2 DD DSN=CS00688.CLRS.SYSOUT,DISP=SHR,
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSIN DD DUMMY
Back to top
View user's profile Send private message
sushilchandran

New User


Joined: 21 Jun 2005
Posts: 22

PostPosted: Wed Aug 24, 2005 10:08 am
Reply with quote

hi thanks all,

but am still in the same situation.can anyone please explain how is this happening.i mean the change in the characteristics of pds.
Back to top
View user's profile Send private message
senti

New User


Joined: 18 Aug 2005
Posts: 19

PostPosted: Wed Aug 24, 2005 10:27 am
Reply with quote

Hi Sushilchandran, Please let me know what you tried and whats the error you are getting.
Back to top
View user's profile Send private message
sushilchandran

New User


Joined: 21 Jun 2005
Posts: 22

PostPosted: Wed Aug 24, 2005 12:10 pm
Reply with quote

hi senthil,

i repeat my question.will you agree with me that the characteristics changes if you give any of your pds name instead of your load library,i just want to know how this happens internally.i mean the recfm changes to U and the blksize to 80 irrespective of what your pds characteristics is.


sushil
Back to top
View user's profile Send private message
senti

New User


Joined: 18 Aug 2005
Posts: 19

PostPosted: Wed Aug 24, 2005 12:49 pm
Reply with quote

Hey Sushil, I dont have a solid xplanation for it.But, was just wondering why the resolution which i gave didnt work..?

Thanks, Senti
Back to top
View user's profile Send private message
sushilchandran

New User


Joined: 21 Jun 2005
Posts: 22

PostPosted: Fri Aug 26, 2005 4:46 pm
Reply with quote

i didnt said that it didnt work k.i just want to know the internal functionality thats all k.no hard feelings senti
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 Recovery Routine/Abend exit to releas... PL/I & Assembler 14
No new posts DFSMShsm Dataset Recovery with B and ... JCL & VSAM 2
No new posts Need info with DBRC recovery IMS DB/DC 0
No new posts Currency lost in IDMS IDMS/ADSO 19
No new posts recovery from 904 ststus code DB2 2
Search our Forums:

Back to Top