Re: Stored Procedure

[Glenn Hopwood <ghopwood.list@xxxxxxxxx>]

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
>