Wayne Boyer writes:

> The only "downside" to EVALUATE is that a big mess of nested IFs don't
> automagically convert themselves to a single EVALUATE!

Actually, they can. :)

IIRC, I saw this technique in the manual.

Instead of

> EVALUATE FIELD-A
>   WHEN ANSWER-1 PERFORM ABC
>   WHEN ANSWER-2 PERFORM XYZ
>   WHEN ANSWER-3 PERFORM LMN
>   WHEN OTHER
>       EVALUTE FIELD-B
>           WHEN VALUE-1 PERFORM MORE-CODE
>           WHEN VALUE-2 PERFORM OTHER-CODE
>       END-EVALUATE
> END-EVALUATE.

you can use

  EVALUATE TRUE
    WHEN FIELD-A = ANSWER-1   PERFORM ABC
    WHEN FIELD-A = ANSWER-2   PERFORM XYZ
    WHEN FIELD-A = ANSWER-3   PERFORM LMN
    WHEN FIELD-B = VALUE-1    PERFORM MORE-CODE
    WHEN FIELD-B = VALUE-2    PERFORM OTHER-CODE
  END-EVALUATE.

--Glenn, not trying to say it's better

* To join/leave the list, search archives, change list settings, etc *
*     please visit http://raven.utc.edu/archives/hp3000-l.html       *