RE: Help with parameter passing

["Bob cozzi" <cozzi@xxxxxxxxx>]

Hans,

Have you (i.e., IBM) posted the list of proposed enhancements yet?
I'd like to see them.


Bob Cozzi
Cozzi Consulting
www.rpgiv.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Hans Boldt
Sent: Tuesday, October 14, 2003 8:57 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Help with parameter passing

cozzi@xxxxxxxxx wrote:

> Hans,
> 
> How would we pass a parameter to a proc written in RPG IV like we
> can with some of the programs we call.
> For example, if I want to allow a parm to be anything, numeric,
> character, date, etc.  And then tell the proc on a subsequent parm
> what that value is, do I code the parm as a pointer or what?
> 
> .....D myFunct        PI
>      D  anytype                     *
>      D   nLen                     10I 0
>      D   nDec                     10I 0
>      D   type                     10I 0
> 
> Could I call myFunct and pass a characte field, or a numeric field
> or a data field?  If so, could I avoid using %ADDR to do it, or do I
> need to wrap the variable in %ADDR?
> 
> My guess is that I would need to do pass %ADDR(CustNo), but is that
> allowed when I may want to change the data in the called proc? 
> (i.e, I don't want to use CONST).
> 
> Thanks!
> 

Hi Bob! Scott has already said most of the things I would have said 
in response to your note. Use VALUE parms, and consider the 
complexity of the code to handle the different expected data types.

I'll just add that we do have procedure overloading in our "proposed 
enhancements" file. That is, allowing the coding of multiple 
procedures overloaded with the same name. For example, with the 
appropriately coded prototypes, you could have CALLP PROC(123) call 
real procedure PROCNUM and CALLP PROC('ABC') call real procedure 
PROCCHAR. But as always, it will still have to be prioritized 
against several dozen other worthy proposed enhancements.

Cheers! Hans


_______________________________________________
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.