Re: Dynamic 'callp'

Hello Peter,

Yes, you are right, that is exactly what is happening & I am just
correcting the statement.

Thanks again
Ewart









Peter.Colpaert@xxxxxxxxx
Sent by: rpg400-l-bounces+ewart.desouza=sandvik.com@xxxxxxxxxxxx
08/07/2007 03:32 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>

To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Dynamic 'callp'





Ewart,

I think you'll find that this doesn't work as you expect it to.

In fact, what you're doing is calling the program with parameter
"SCINPUT", not the contents of the field or data structure SCINPUT in your
RPG program!

To achieve that, you need to code

cmd = 'CALL ' + %trim(varpgmnm) + ' PARM(' + '''' + scinput + '''' + ')';

(I didn't check this on our system, but I think the syntax is OK)

HTH,

Peter Colpaert
Application Developer
PLI - IT - Kontich, Belgium
-----
Yoda of Borg are we. Futile is resistance, assimilated will you be.
-----



ewart.desouza@xxxxxxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
07/08/2007 11:56
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Re: Dynamic 'callp'






Hello Peter,

Thanks a lot. I have modified the statements as below & it works fine now.



cmd = 'call '+%trim(VARPGMNM)+' PARM(SCINPUT)';
callp(e) qcmdexc(cmd:%len(%trim(cmd)));

Ewart

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