You have a problem here. If you use TESTN, it will identify certain
alphabets also as numeric. This is because the system stores the  negative
sign as an alphabet. So if your value is '123J'  TESTN will return it as
numeric.  You can check this by entering ( -1...to -9) to a physical file
and then use DSPPFM to view the file. The alphabets that you see in this
view if used at the end of a number, TESTN will return it as numeric.

Email : <vijosha@alfuttaim.co.ae>

        -----Original Message-----
        From:   Steven Easton [SMTP:seaston@ionet.net]
        Sent:   Saturday, July 10, 1999 4:37 AM
        To:     Nick_Runnalls@burmahcastrol.com; MIDRANGE-L@midrange.com
        Subject:        Re:Numeric Validation

        In rpg3 or rpg4 do TESTN, then do a move if it is numeric
        +---
        | This is the Midrange System Mailing List!
        | To submit a new message, send your mail to
MIDRANGE-L@midrange.com.
        | To subscribe to this list send email to
MIDRANGE-L-SUB@midrange.com.
        | To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
        | Questions should be directed to the list owner/operator:
david@midrange.com
        +---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact [javascript protected email address].