RE: Dynamic call with procedure pointers

["Bartell, Aaron L. (TC)" <ALBartell@xxxxxxxxxxxxxx>]

Thanks Barbara!  That looks like it is exactly what I need.  Here are the
Reference pages for the archives :

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/apis/qleact
bp.htm (QleActBndPgm)
http://publib.boulder.ibm.com/iseries/v5r1/ic2924/index.htm?info/apis/qleget
exp.htm (QleGetExp)

I will see if I can wrap these with some service programs and get them back
to the group for anyone else that needs them.

Aaron Bartell

-----Original Message-----
From: Barbara Morris [mailto:bmorris@xxxxxxxxxx]
Sent: Monday, August 11, 2003 11:35 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Dynamic call with procedure pointers


"Bartell, Aaron L. (TC)" wrote:
> 
> >From all of the documentation I have read this morning it looks as though
I
> need to define the procedure's prototype in the calling program at
> compile-time.  Is there any way around this?  I would instead like to go
out
> to a file and get the procedure name during run-time.
> 

Aaron, the prototype is necessary to define the parameters and possible
return value.  You can code a procedure pointer in the EXTPROC keyword,
and set the procedure pointer at runtime.

It sounds like you probably know at compile time the possible names you
might want, so you can set the procedure pointer with %PADDR. If not,
there's a way to get a procedure pointer given a service program and
procedure name - search for QleActBndPgm and QleGetExp.

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