Stigers, Gregory - ANDOVER wrote:
>
> HPRC tells me that their definitions for the ANSI standard's
> 'implementor-defined' file status codes 9x are the same as FSERRs.
> Looking at some of the FSErrs, I am less than convinced. Is this in fact
> the case?

That is the case.   You can call FERRMSG passing it the second byte of
the status code (stick it in the low-order byte of an S9(4) COMP field)
to get the error message text that goes with the FSERR.  For most COBOL
programs, we check for a 9x status code and then call "PRINTFILEINFO"
passing the FD name as the only parameter.  This produces the normal
tombstone for the error.
--
Glenn A. Mitchell               mailto:[log in to unmask]
Director, Computer Technology   http://www.mmc.org
Maine Medical Center
Portland, ME  04101