Re: Question on using the EVAL op code...

[Chuck Lewis <clewis@xxxxxxxxxx>]

Jon Buddy !

How've you been ?

Thanks SO much ! I'll give this a shot. This adds SO much more power and
flexibility to what used to be a nightmare of IFEQ OREQ ANDEQ, etc., eh ? !

Hope you folks have a nice Thanksgiving !

Thanks again.

Chuck

Jon.Paris@halinfo.it wrote:

> You don't want  Eval - you want IF
>
> like so (but the IF may need to be over two lines):
>
>    If        (Field1 = 'C') And (Field2 = *Blank) And (Field3 <> Field4)
>    Eval      Field2 = 'L'
>    Update..............
>    EndIf
>
> +---
> | 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
> +---

+---
| 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
+---