RE: Scanning from the right

["Stone, Brad V (TC)" <bvstone@xxxxxxxxxxxxxx>]

Richard,

I think you meant %size(%trim(field)).  %len alone should work in place of
this, though.

Bradley V. Stone        
bvstone@taylorcorp.com
http://prairie.lakes.com/~bvstone/
"Closing my mouth before I scream.  No one can shake my self-esteem."  -YJM


> -----Original Message-----
> From: Richard Baird [SMTP:rbbaird@premsys.com]
> Sent: Wednesday, August 19, 1998 4:21 PM
> To:   MIDRANGE-L@midrange.com
> Subject:      Re: Scanning from the right
> 
> John,
> 
> look at the CHECKR opcode. With a search argument of ' ', it checks
> for the first position that DOESN'T contain the search argument.
> 
> also, in rpgiv, %len(%trim(field)) will return the last non-blank
> position in a string.
> 
> hth,
> 
> Rick
> 
> John Earl wrote:
> > 
> > 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!
> > --
> > 
> > +---
> > | 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 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
+---