Re: passing char/num variable to a subproc question

You would love overloading which is what many other languages like Java
have. Methods/subprocs are unique not only by their name but also the parms
they pass.

Obviously that doesn't help you, but thought I would let others know what it
is called in other circles.

Aaron Bartell
http://mowyourlawn.com

On Fri, Aug 29, 2008 at 11:53 AM, tim <tim2006@xxxxxxxxxxx> wrote:

Hello,



I have a the following coded subproc:





P WriteDiff b

D WriteDiff pi

d fieldchange 10 const

d value 80 const



/free



lgfldch = fieldchange;

lgvalue = %trim(value);

write rlog;



/end-free



P WriteDiff e



Is there a way to do this that no matter if I pass a character or numeric
defined field, the subproc would work.



So, both of these would work.



D NUMBER 10S 0

D TEXT 20





/free

Writediff('number' : number);



Writediff('Text' : text);

/end-free



I am thinking that I would pass a pointer rather then the value, but not
sure how I would code this.



Thanks.

--
This is the RPG programming on the AS400 / 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.