Re: Editing for special characters

[Pete Hall <pbhall@xxxxxxxxxx>]

At 14:10 08/08/2000 , Dan Rasch wrote:

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

How about something like this:

   D Std               C       'abcdefghij...ABCDEFGHIJ ...0123456789 etc...
   D ToBlank           C       ' an equal number of blanks

   C   Std:ToBlank     xlate   myvar      tstvar
   C                   if      tstvar <> *BLANKS
   C  ... failed
   C                   endif

or, using the same type of processing, but translating the special 
characters themselves to whatever you'd like them to be. Are you trying to 
do URLEncode or HTMLEncode or something? That's a little different because 
the output length is different than the input length...
Pete Hall
pbhall@execpc.com
http://www.execpc.com/~pbhall/
+---
| 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
+---