I once repaired a PDS with a damaged directory.

I opened it (with an ASSEMBLER program) as a normal sequential file
and wrote every line to another PDS with member namens like M0000001, 
M0000002, and so on. On every end-of-file condition, I stopped the current 
member in the target PDS and started a new one (until SYNAD signaled the 
"true" end-of-file of the PDS). 

This way I was able to restore all the members in the damaged PDS. 
But two problems remained: 

- I got the deleted members, too

- I had to find a way to restore the original member names by examining the 
contents (this was the difficult part of the task). 

But the PDS was very important: it contained all the program descriptions of 
the last 10 years. The problem was: there were two departments, and each of 
them believed that the other one does the daily backup. In fact, no backup 
was done :-( 

Kind regards

Bernd



Am Donnerstag, 28. Juli 2005 15:24 schrieben Sie:
> > Is there a way to repair this PDS?

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

Reply via email to