RE: Eval with two equals?

["Jon Paris" <Jon.Paris@xxxxxxxxxxxxxx>]

 >> A nice feature that it also sets the indicator *Off if the evaluation is
not true (should it be previously *On)

 >> This has been available for a while, but I'm not sure of exactly when
either...

It has been available forever - or at least as long as RPG IV has existed.
It was in the very first release.

Since you mention it's ability to turn the indicator off if it is already
on, it is probably worth extending your example to _preserve_ the current
state of the indicator. e.g.

*In50 = (RRN1 > *Zero) or *In50

Of course we shouldn't be using nasty numbers anyway now should we <grin> -
so a better example might be:


Where SubfileDisplay is a named constant with a value of 50.  If we have
used the INDDS keyword to name our indicators, then it becomes even cleaner
because it could read like this:

SubfileDisplay = (RRN1 > *Zero) or SubfileDisplay


P.S. Just realized that if people aren't familiar with this use of EVAL to
set an indicator, they may not be familiar with the indicator shorthand I
just used.  Since RPGIV understands that an indicator is a boolean
true/false you don't need the "= *On" or "= '1'" <shudder!>.  So "If
*In(SubfileDisplay)" is equivalent to "If *In(SubfileDisplay) = *On" - and
"If Not *In(SubfileDisplay)" is equivalent to "If *In(SubfileDisplay) =
*Off"


Jon Paris
Partner400

www.Partner400.com
www.RPGWorld.com