RE: Loop code

Thx Paul,

But:  For the same reason that a CHAIN, or a READ, or a READE, or a READC
sets the indicator(s) on or off.  Iow, every single one of these opcodes
either sets an indicator on or off.  (And, not coincidently, it works the
same way if you're using the < indicator for errors on these opcodes, and in
fact, every single opcode I can think of off the top of my head.)  To me,
intuitively, it would make as much sense to leave %EOF *unchanged* after
code is executed, as it would to leave the indicator specified on a LOOKUP
*unchanged*, unless there was a match and ONLY THEN you set the indicator
on.  Otherwise it just stays the same it was.  Now THAT makes no sense to me
(and I would suspect most-all everybody who has actually used RPG, although
there will be exceptions 'course).

So I'm afraid I don't see a close relationship at all between how a FILE
POINTER is used, but a great deal of relationship (like near-identical)
between indicators and the %EOF built-in.  Except that's not how the %EOF
works.  So, as far as making "perfect sense", very obviously this is not the
case.  And I'm not even sure it makes even a LITTLE sense, from the
discussion I've seen so far.

(Btw, I never found out if you can set these built-ins, like you can
indicators, in DBG??)

| -----Original Message-----
| [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Paul Tuohy
| Sent: Monday, March 29, 2004 5:07 PM

| Sorry jt, but I think this makes perfect sense.
|
| If a CHAIN is successful, it means you got a record, so you are
| not at EOF,
| so %EOF(filename) is set off.
|
| If a CHAIN is unsuccessful, the file pointer is left where it was, so
| %EOF(filename) is unchanged.
|
| An unsuccessful chain does not position the file pointer at EOF - so why
| would it set on %EOF?
|
| Paul Tuohy
|
| ----- Original Message -----
| From: "jt" <jt@xxxxxx>
| Sent: Friday, March 26, 2004 7:35 PM

| > This part seems ENTIRELY UNintuitive.  Is there some benefit or
| Reason WHY
| > it would NOT change??  What logic went into this decision, if I may ask?
| > (Obviously, I may ask, but it might never get posted nor answered, of
| > course...;-)
| >
| > | -----Original Message-----
| > | [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Paul Tuohy
| > | Sent: Friday, March 26, 2004 12:37 PM
| >
| > | "The following operations, if successful, set %EOF(fielname)
| off. If the
| > | operation is not successful, %EOF(filename) is not changed."