Re: Stored Procedure

You're mixing SQL CALL with RPG CALL.

If 'STR004SP' is an iSeries program then just do the call without the embedded SQL.

If you specifically want to call STR004SP as a store procedure you are using the wrong format in your embedded SQL. The parm separators should be ',' and the fields marked with a ':' will be treated as host variables.

Glenn

DLee@xxxxxxxx wrote:

Thanks Charles;

<You can't call a stored procedure with the RPG CALL/CALLP op-code.>
<You must use the SQL CALL statement.>
<exec SQL CALL STR004SP (....);>

I guess I don't know what you mean, or how to do it.
Here is what I did, but I just get invalid token errors on PSCOCD parm.
Probably because I'm still not calling the program correct?
I've never called a rpg program using sqlrpgle before, only done selects and updates.
Have looked thru the internet, but nothing comees up.

Can you be more specific on the call, or point me to a manual on how this works.

D GetPgm PR EXTPGM('STR004SP') D COCD 2 D AGNT 10 D POLM 10 D POLS 3 0 D COVC 3 0 D CANDT 8 0 D REF 9 2 D RTNCD 2
C/EXEC SQL C+ CALL STR004SP(PSCOCD:PSAGNT:PSPOLM:PSPOLS C+ :PSCOVC:$CANDT:PRMREF:RNCODE) C/END-EXEC
Appreciate your help.


Darrell Lee
Information Technology
Extension 17127