How to run a procedure with a parameter?

[freak]

Using 9.1d...

I need to call a procedure whose name is stored in a variable. I also need to send along a parameter. This doesn't work. Any tips?

def var progname as char init 'myprog.p' no-undo.

find first mytable where mytable.myvalue=1 no-lock no-error.

if available mytable then
run value(progname + '(mytable.myvalue)').

 

[freak]

Found the answer at progress support... P122176

 

[mrobles]

def var progname as char init 'myprog.p' no-undo.
find first mytable where mytable.myvalue=1 no-lock no-error.
if available mytable then
run value(progname) (mytable.myvalue).