Re: Editing for special characters

>  From:    drasch@mail.win.org (Dan Rasch)  
>  
>  Is there a simple way to SCAN for special characters?  I am writing a
>  front-end edit and currently coded up 20 or so SCAN blocks.  
>  
>  Seems like there must be an easier way . . . . 

If you know what it is you are looking for, then just put the entire string 
in one array of single characters (which I get from a field using a data 
structure overlay), then LOKUP & it returns the index address of where it is 
in the field or if this record does not have one.

More difficult if you are testing a field for any one of an unknown number of 
special characters.  Depending on what you want to do with your discovery, 
read each character of the string in a loop & use it to LOKUP your own list 
of valid characters & if no match then you have found something special.

If your front end screen is DDS there are ways to restrict data entry outside 
pure numeric & various other restrictions can be imposed.

Al Macintyre  ©¿©
MIS Manager Green Screen Programmer & Computer Janitor of BPCS 405 CD Rel-02 
running on AS/400 V4R3 http://www.cen-elec.com Central Industries of 
Indiana--->Quality manufacturer of wire harnesses and electrical 
sub-assemblies
+---
| 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
+---