On Tue, Apr 20, 2021 at 01:35:08PM -0500, Paul Gilmartin wrote:
> On Tue, 20 Apr 2021 18:14:30 +0000, Seymour J Metz wrote:
> 
> >The sample I saw ...
> >
> Aw, gee.  Please include enough headers that readers can refer
> to it without a tedious search.  E.g. (I'm guessing):

Sorry about that.  The original message had "vertical" hex which I find
about impossible to read so I reformated it.

> Date: Mon, 19 Apr 2021 07:41:14 +0200
> SUBJECT: Re: Format PDS unloaded on an CD
> Message-ID: 
> <CAJ=dL-fn3X=La=vejtybfwulzcluky8xo7_cicndh5uqiop...@mail.gmail.com>
> FROM: Hilario Garcia <[email protected]>
> 
> > ...included what looked like valid BDWs and RDWs. If it is not missing 
> > records then it should work with a DCB override.
> >
> A little more than that.  Reblocking according to the RDWs, then a
> DCB override.

There's no BDW/RDW in front of the start of the directory dump either:

00000150: 0000 0000 0008 0100 c4c5 c6c1 c4c1 c340  ...............@
00000160: 00fe c1c4 c1c7 c4c5 c640 0000 110f 0107  .........@......
00000170: 0009 0097 007f 0000 046f 0834 0025 0024  .........o.4.%.$
00000180: 0000 d7c4 4040 4040 4040 4040 c1c4 c1c7  ....@@@@@@@@....
00000190: e2c5 e340 000b 050f 0115 0057 0000 046f  [email protected]

I think that the "0000 0000 0008 0100" is a DASD CCHHRKDD where the 08
is the PDS directory key for this block and 0100 is the block length
and the next 8 bytes are the key for this directory block.

*If* the BDW/RDWs are all that's missing, likely the data from the iebcopy
unloaded files could be recovered with a bit of programming and using
the count field lengths.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to