Re: Alternative to MOVEA?

["Mike Naughton" <mnaughton@xxxxxxxxxxxx>]

Rick,

You're absolutely right -- this will probably work fine! I don't know why
I spaced out on %substr . . . . :-)

rpg400-l@midrange.com writes:
>try something like this:  - I could be wrong on %size() - might be
>%len()..
>
>eval $x = %scan('*':field)
>eval $y = %size(field)-$x
>eval %substr(field:$x+1:$y) = *all'X'


Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA  01376
413-863-4357 x444
mnaughton@juddwire.com