You could try to open, write, and close the PDS with the original LRECL and
BLKSIZE, IEBGENER will do fine. Then you should be able to recover the
previous members. Of course, get a backup first.
Cliff McNeill
________________________________
From: IBM Mainframe Discussion List <[email protected]> on behalf of
????? ????????? <[email protected]>
Sent: Wednesday, June 15, 2016 10:39 AM
To: [email protected]
Subject: Re: Read a PDS (all members) like PS dataset
Always interesting, I am dealing this week with an error that I hoped would be
solved by the different solutions presented here, but after trying some of the
solutions presented herein have not recovered.
Background: In preparation for a system cutover, executed IDCAMS LISTC with
SYSPRINT to a PDS file containing very important cutover data. (thought that
was an efficient method of documentation :) - the laugh is on me).
The original file was a typical jcl type (80 lrecl) after running the LISTC and
updating the results, the PDS members which existed prior to the LISTC job
execution were unreadable - IO ERROR. Since the disk was a 'sandbox' type
disk, it wasn't backed up nor dumped. I have been trying various recovery
methods - many of them as advised on this discussion list to not avail. Any
ideas ? Would it be preferable for me to specify the actions I already did to
try to recover the file?
.
-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf
Of CM Poncelet
Sent: Wednesday, June 15, 2016 8:53 AM
To: [email protected]
Subject: Re: Read a PDS (all members) like PS dataset
Yes it works, although I used it with the STOW macro (afterwards) to
modify/update PDS directories. Use the List/Execute forms of the DCB
Macro/DSECT if it is to be modified (in getmained storage).
The FIND macro can then be used to locate the start of each PDS member returned
by the BLDL. From there, read each PDS member in turn (some Open/Read/Closes
might be needed).
BTW My correction: IEBUPDTE can write (but not read, AFAIK) a PS dataset to a
PDS. But IEBCOPY can read a PDS and write it to a PS - and vice versa.
Paul Gilmartin wrote:
>On Wed, 15 Jun 2016 04:14:04 +0100, CM Poncelet wrote:
>
>
>>I would suggest writing some assembler code that invokes the BLDL
>>macro to read the PDS directory, ...
>>
>>
>>
>Does that work?
>
>-- gil
>
>----------------------------------------------------------------------
>For IBM-MAIN subscribe / signoff / archive access instructions, send
>email to [email protected] with the message: INFO IBM-MAIN
>
>
>
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to
[email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
