Re: Scanning from the right

[PaulMmn <PaulMmn@xxxxxxxxxxxxx>]

>Is it possible to scan a string from the right in RPG?
>
>I need to find the end of a character string that may have
>embedded blanks in it.  It seems like the best way to do
>that is to scan from the right for the first non-blank
>character.
>
>Any ideas?
>
>jte
>
>--
>John Earl
>PowerTech Toolworks
>johne@toolnet.com
>253-858-7388
>
>Riley Nichole Earl, Born 7/6/98 - 8lb 11oz.  Already an
>AS/400 fan!


As an Old(er) Fogey, I come from the school where you had to code your own
scan routines:

In general, you MOVEA your character variable to an array of 1-byte alpha
elements.  Set the index to the last element in the array, and compare for
blank.  Decrement the index, and repeat until you find a non-blank
character, or you run out of array.

Even once IBM came out with scanning opcodes in CL and RPG I often found it
easier to code my own rather than try to find the manual and figure out the
calling sequence.  I guess I've gotten lazy, however... I use the op codes
now.  (:

--Paul E Musselman
PaulMmn@ix.netcom.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
+---