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

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
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.