You also need the INVITE keyword at the record level in the display file.
You also can not use EXFTM but rather need to do a WRITE followed by a READ of the display with an indicator for the error condition.
Andy Renk
Chambers & Owen, Inc
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx on behalf of Willie J. Moore
Sent: Fri 4/18/2008 5:28 PM
To: rpg400-l@xxxxxxxxxxxx
Cc:
Subject: Auto ending a program
We have a program that lets users update a fileA. Dunning our nightly processing we copy the fileA data to a history file and then clear fileA. If the user has the update program active, the clear will not run. I want to change the program so that if the enter/update key is not entered after X minutes the program would end.
I have compiled the display file with WAITRCD = 120 and added to RPGLE the 'F' spec for the display file MAXDEV(*file). Every thing compiles, but still does not timeout.
Any help or examples would be appreciated.
William Moore
--
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.
midrange.com
