On 4/17/2013 3:46 PM, CRPence wrote:

...and in other languages [e.g. RPG] the equivalent
assignment will often effect blank padding which means blanks would
likely overwrite unexpected portions of automatic storage in the
invoking program... which could lead to all sorts of problems.

In RPG, you would code %SUBST on the left-hand-side.

%subst(rtnval : 1 : len) = something;

It will do blank padding only up to "len" bytes, and not touch rtnval for the bytes following "len" bytes.





Return to Archive home page | Return to MIDRANGE.COM home page