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

This mailing list archive is Copyright 1997-2015 by MIDRANGE dot COM and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available here. If you have questions about this, please contact