RE: How to know whether some field value is changed in a display file?

As someone else said, using data structures (before and after) can be used
to test for changes. I usually used that method, though, to determine if,
for an interactive update, I wanted to do the update at all.

That is, on the first CHAIN to the file I use CHAIN(N) so that, if the @#$%
user walks away before pushing Enter, the record doesn't get locked. Then
when the user presses the Enter key, retrieve the record again (just CHAIN)
and see if someone else came in before s/he finished. If so, redisplay
with
a message and the new data elements.

By the way, why would you not want to update the record if the display file
fields have not changed? Agreed it's a waste of time, but what's a couple
of microseconds? Figured there must be another reason.

Jerry C. Adams
IBM i Programmer/Analyst
Problems are the price you pay for progress. -Branch Rickey
--
Home Office: 615-832-2730
email: midrange@xxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Nisha Ramesh
Sent: Thursday, February 07, 2013 1:01 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: How to know whether some field value is changed in a display
file?

That will turn the indicator on if i reenter blanks on an already blank
field...
On Feb 7, 2013 12:25 PM, <Dirk.Marien@xxxxxxxxxxxxxxxxx> wrote:
--
This is the RPG programming on the IBM i (AS/400 and 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 IBM i (AS/400 and 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.