RE: Z-ADD or Eval?

["Mark A. Manske" <mmanske@xxxxxxxxxxxxxxxxxx>]

IMHO I would take it one step further "if" at all possible; your last
example is the best; however; see
"if" you can even eliminate the *IN99; IE if it is used for file i/o
validation, use the %found, %eof and the like - if *in99 is on because of a
value, say the old statement was      a      comp    12          99; then
try

if a = 12
eval isvalueofa12 = 'Y'
endif

depending on your application, ILE has really opened the door to self
documented code; be creative, be logical,
experiment, but most of all; have fun learning just how far you can push
yourself.

HTH

Mark A. Manske
[mailto:mmanske@minter-weisman.com]
Sr. Project Lead
Minter-Weisman


-----Original Message-----
From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On
Behalf Of Jim Langston
Sent: Tuesday, August 22, 2000 2:22 PM
To: RPG400-L@midrange.com
Subject: Z-ADD or Eval?


I am trying to use all Evals in my programming just because it is much
easier to read and understand.

My question is, however, should I be converting Z-ADDs to Evals?  I
understand we use(d) Z-ADD
instead of MOVE because Z-ADD was more effiecient.  We could of used MOVE,
but we used Z-ADD.
Now, if I have a statement (and I do):

      C   99              Z-ADD     *ZERO         EQSIZE

and I want to convert this to "modern" programming, should it become:

      C                   If       *IN99
      C                   Z-Add     *Zero         EqSize
      C                   EndIf

or should it become:

      C                   If       *IN99
      C                   Eval      EqSize = *Zero
      C                   EndIf

Any comments on this are appreciated.

Regards,

Jim Langston


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---