Re: Service program file access?

Thanks for your help/reply.

I tried the same code again this morning and it is working correctly now. Could there be an issue with activation groups? Or maybe something to do with the warning message in the compile: "Files should be closed explicitly when NOMAIN is specified the Control specification." Right now I am not manually opening and closing the file in the program.


----- Original Message ----
From: Simon Coulter <shc@xxxxxxxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Sent: Monday, July 7, 2008 7:16:11 PM
Subject: Re: Service program file access?


On 08/07/2008, at 7:01 AM, Brian Neifert wrote:

I'm having trouble accessing a file in a service program. Are there
any tricks? It seems the ER and EOF indicators are not coming on
when the record is not found. I also tried the %bifs of $eof and %
found and they didn't work either. Any sugesstions?

Also, after a successful chain, the field values are all blank or
null.

No tricks. Using files in service programs works so the problem is in
your code.

Usual cause is forgetting that file fields (generally) have global
scope and providing local variables of the same name (e.g., via a
data structure) thus "overriding" them.

If that's not the cause you'll have to post a code sample that
manifests the problem.

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------