RE: right$

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

%trimr() followed by the evalr would do the same thing.  You could also scan
for blanks from the right side of the field and build parms for
substringing, but that would involve actual work.  <g>  What neets to happen
if there are fewer than ten non-blank characters?

> -----Original Message-----
> From: rob@dekko.com [mailto:rob@dekko.com]
> Sent: Monday, June 10, 2002 11:42 AM
> To: rpg400-l@midrange.com
> Subject: right$
>
>
> This is a multipart message in MIME format.
> --
> [ Picked text/plain from multipart/alternative ]
> MYVAR='   thisisseveralcharacters   '
> I want store the right 10 nonblank characters into a new variable.
> %trim will get rid of the leading, and trailing, blanks.
>
> Nearest way I can figure to do this is to use a 10 character
> field as a
> work variable and evalr the %trim of MYVAR into this.  Any other
> suggestions?
>
>
> Rob Berendt
> --
> "They that can give up essential liberty to obtain a little temporary
> safety deserve neither liberty nor safety."
> Benjamin Franklin
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>