Re: TESTN

Sign, sign, everywhere a sign...

Rob Berendt

==================
Remember the Cole!


                                                                                
                                       
                    Lurton Keel                                                 
                                       
                    <LKeel@UNARCORACK        To:     "'RPG400-L@midrange.com'" 
<RPG400-L@midrange.com>                 
                    .com>                    cc:                                
                                       
                    Sent by:                 Subject:     TESTN                 
                                       
                    owner-rpg400-l@mi                                           
                                       
                    drange.com                                                  
                                       
                                                                                
                                       
                                                                                
                                       
                    10/31/00 12:28 PM                                           
                                       
                    Please respond to                                           
                                       
                    RPG400-L                                                    
                                       
                                                                                
                                       
                                                                                
                                       




Here is a program.
C                   MOVEL     '12G'         SIN               3
C                   TESTN                      SIN                  81
c                    eval          *inlr = *on
indicator 81 is in pos 71-72.
My problem is that in the above example, indicator 81 is on even though
there is a "G" in the field.
The RPG reference says.
"Positions 71 and 72: Either the result field contains numeric characters,
or it contains a 1-character field that consists of a letter from A to R."
What's up

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