Your inclinations assume that:
(a) DCBDSORG will change during OPEN, and
(b) the data will appear in his program without an error.
I don't believe (a) ever happens.
I think he already has the error before he sees the data.
From: Paul Gilmartin <[EMAIL PROTECTED]>
Reply-To: IBM Mainframe Discussion List <[email protected]>
To: [email protected]
Subject: Re: Reading Variable record with bad BDW/RDW?
Date: Mon, 24 Apr 2006 13:35:55 -0600
In a recent note, Thomas David Rivers said:
> Date: Mon, 24 Apr 2006 15:18:39 -0400
>
> So - I suppose - what's the best way to ask "Hey - is this at
> all a reasonable thing to be trying a VB-read on?"
>
My inclination would be to verify:
o DSORG != PO in the DCB after OPEN. (But DON'T try to enforce
DSORG == PS, because that is not set if DDNAME is allocated to
a UNIX file.)
o BDW consistent with BLKSIZE, and no invalid flag bits set.
o RDW consistent with LRECL (and with BDW), and no invalid
flag bits set.
(most of which QSAM does NOT verify) If all tests pass, then
give the user what he asked for. If any fail, indicate an
I/O error.
Now, suppose the user attempts to open for OUTPUT? Wnat's a
good way to avoid trashing the PDS directory?
-- gil
--
StorageTek
INFORMATION made POWERFUL
----------------------------------------------------------------------
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
_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today - it's FREE!
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/
----------------------------------------------------------------------
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
