RE: How to find error messages for open(), etc.

[<Matt.Haas@xxxxxxxxxxx>]

Glen,

There are API's for this. Here's some sample code:

D@__errno         PR              *   ExtProc('__errno') 
                                                         
Dstrerror         PR              *   ExtProc('strerror')
D errnum                        10I 0 value              

When one of the Unix type API's fails, calling %str(strerror(errno)))
will return an explanation of the error in human readable format.

Matt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Glenn Gundermann
Sent: Thursday, May 24, 2007 9:35 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: How to find error messages for open(), etc.

Hi folks,

In my RPG program:

When there is a failure using open(), write(), etc. to access IFS files,
I
don't see any error messages in the joblog.

When there is a problem, does anyone know if there is a way to determine
what the error might be?

I found my bug by trial and error.  My open() wouldn't work when I used
the 'Exclusively Create' flag but it does now that I use the 'Create
File
if not exist' flag.

Tks,

Glenn Gundermann
ggundermann@xxxxxx
(647) 272-3295