I previously acknowledged that the data looks OK. No, it is not an attempt to "extend" a block. It is to write a lump of data which, once the "correction" has been done (else the data can't be read as a VB anyway) will appear to be a VB "block", but which will start with binary zeros. Someone had commented that they didn't know how a BDW with zero length could be created. It wasn't done in this case, but here's a way it could be done. Not by *really* writing a block with a zero BDW, but sticking in a lump of data which will later *look like* a block (very superficially) but will presumably cause something weird to ensue.
Requires deliberation, or accidental use of wrong LRECL/RECFM (other than expected) with DISP=MOD and then the "fix" (correctl LRECL/RECFM) with DISP=MOD and add at least one more record). A variation of the "corrupt a loadlib by writing a source to it". ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN