Re: Bug in opcode TESTN!!!

[ilechr@xxxxxxxxxxxxxx]

The following shows an alterative method to TESTN for testing a character field 
for the presence of numeric characters.
I confess to having never used it personally though I have seen it employed in 
various programs.If any character in FIELD differs 
from any in the constant DIGITS the indicator 90 will be set on.

                                                    
 D Digits          C                   '0123456789'   
                                                                        
                        
 C     Digits        CHECK     FIELD                             90   
  *                                                                        

Robert Ilechuku



* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *