Re: Is there an OP-Code to determine if a Numeric Field is Negative?

Although IF constructs are the preferred method, you CAN do something
different without it:

    C      NBR        COMP    *ZERO                99
    C   99            MOVE    'Y'        NEGTIV  1
    C  N99            MOVE    'N'        NEGTIV


From: <Gwecnal@aol.com>
> You still have to code an IF (or select) to actually do anything different
> once you determine it is negative, so why make life harder?

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


__________________________________________________
Do You Yahoo!?
Talk to your friends online with Yahoo! Messenger.
http://im.yahoo.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
+---