There have been many "good" replies to this note in IBM-MAIN and I would
certainly agree with those that suggest checking for "97" as well as "00" as
a "good" file status value. In fact, you may want to check for "97" or ANY
value starting with "0". (Certainly, you need to check for other "0x" values
in other I/O operations than OPEN.)
The "97" value has been a long outstanding problem ("issue"). It is my
opinion that IBM is not ANSI/ISO conforming in using a "9x" file status code
to indicate a SUCCESSFUL I/O operation. There is an existing SHARE
requirement:
SSLNGC0413615 Optional (ISO 2002) "0x" file-status code for current "97"
to which IBM has responded "recognize". However, until (if ever) IBM
actually provides that, allowing "97" to be treated like "00" is your best
recourse.
"McKown, John" <[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> I don't like what we are doing, but since when did that matter?
>
> We have a COBOL batch program which reads a VSAM file which is OPEN to
> cics. I am told that when we ran the program on the same z/OS image as
> the CICS region, that the OPEN got a FILE STATUS code of 00. We have
> split our single system into two images, in a basic sysplex. The program
> is now getting a FILE STATUS code of 97. I would have expected this even
> in a single system, if the file were open to another job in UPDATE mode.
> In any case, I am asserting that all COBOL programs should check for
> both 00 and 97 on OPEN and proceed in either case. It has been so very
> long since I have looked at this that I want to be sure that I'm not
> blowing smoke. The VSAM SHAREOPTIONS are 2,3.
>
> --
> John McKown
> Senior Systems Programmer
> HealthMarkets
> Keeping the Promise of Affordable Coverage
> Administrative Services Group
> Information Technology
----------------------------------------------------------------------
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
