Re: Bug or Feature or missing PTF? Parameter passed by constant reference gets cleared!

Looks to me like it is doing exactly what you would except. You are passing
the address of the variable and since you are passing the same variable it
is pointing at the same variable. When you clear it, you clear it. Again
what I said the other day. Lots of fun ways to bypass CONST. You just
tricked the compiler.


On Thu, Jun 13, 2013 at 11:00 AM, Mark S Waterbury <
mark.s.waterbury@xxxxxxxxxxxxx> wrote:

Hi, Birgitta:

Please show us what the line(s) of code that invokes this procedure
looks like?

It might also help to see what the " PR " definition - interface looks
like for this procedure.

Thanks,

Mark S. Waterbury

> On 6/13/2013 12:44 PM, Birgitta Hauser wrote:

Hi,

I just run in the following situation:
I call a procedure that expects an input parameter and an output

parameter.

(The output value is only the revised input value).
The first parameter is passed by constant reference.
In the caller I specify the same variable for Input and Output parameter.

First thing that is done in the called procedure is, the output

parameter is

cleard.
I expected the content of the input parameter (even though the same
variable/address was passed) stays untouched.
... but after the clear both input and output parameters are empty!

I'm currently working on an 7.1 system.

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training

them

and keeping them!"

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.