RE: Force EOF in a Subfile -- RPG400-L

I'm not an expert, but my personal opinion is that READC and its
associated keywords are somwhere between an abomination and a crime
against nature.


That's a little strong :)

In 12 years of RPG I think I've used READC four or five times for verysimple data entry, never in "real" apps.

I use it to determine if the user has made any changes to the subfile, butI don't use it for actually reading records for validation or saving to afile.

Since most of my subfile programs involve allowing the user to change awhole list of items, I don't typically want ENTER to advance to the nextscreen of the program. That would make it impossible to put updatedtotals on the screen or warning messages, since the program would advanceand you wouldn't see them.

Instead, I typically have the user make changes, and then it displays thescreen again. Only when the user doesn't make any changes does it advanceto the next screen.

And the only way that I know of to determine if any subfile records havechanged is by using the READC opcode.

When I validate the records before updating the file or whatever I'mintending to do, I always chain to every record. (If I used SFLNXTCHG itwould prevent me from detecting if something has changed, and if I onlyused READC, I'd only get the records that changed since the LAST timesomeone hit enter instead of all of the changes since the subfile wasloaded... so reading every single record works the best for me.)

However....it's in the language and if you use it correctly, it works.
I still think it's a waste of time learning how to do it.

Is there another way to determine if something has changed in a subfile?For some reason (and I can't remember why at this point, I've been doingthings this way forever) I don't think the CHANGE keyword works with asubfile.