Re: RPG Program as a Stored Procedure

[THarteau@xxxxxxxxxxxxxxxxxx]

Hi,
        I tried prompting it first, but I did not see a place to enter the 
parameters (IN), so I just typed it all in. Is there a way to enter a list 
of parameters?

<===================================================>

Terri Harteau
Felker Brothers Corporation
****************
Practice random acts of kindness and senseless acts of beauty
-Anonymous
****************



From:   Alan Campin <alan0307d@xxxxxxxxx>
To:     RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Date:   08/07/2019 02:56 PM
Subject:        Re: RPG Program as a Stored Procedure
Sent by:        "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx>



As an aside, do you know that you can do a STRSQL, type CREATE and F4 and
you can select option 4 and it will give a fill in the blanks for building
a stored procedure call? I always use the system tools when I can.

Also as an aside, you can create stored procedures as a service program.
You can export one or more procedures from a service program and then each
can be made into a external stored procedures. Don't hold me but about 20%
faster.

Also, if you are going to create the stored procedure as a program create
it as a Main program (No RPG Cycle). Again makes it run quicker. Normally
you want a stored procedure to run as quick as possible.

On Wed, Aug 7, 2019 at 12:34 PM <THarteau@xxxxxxxxxxxxxxxxxx> wrote:

> Hi,
>         I did this back in 2005 and it has been working fine ever since. 
I
> need to set up a similar RPGLE program and create an external stored
> procedure, and I keep getting a token error. All the IN and INOUT are
> defined as input parameters in my program, and it compiled successfully.
> CREATE PROCEDURE V64BPCSUSR/SVLBRTEST
> IN @pTransactionNum float,
> IN @pRevisionDate varchar(25),
> IN @pNRBDX float,
> INOUT @pIsOK float,
> INOUT @pErrorMessage varchar(255),
> IN @pEmployeeId varchar(8),
> IN @pDownNote varchar(255)
> language RPGLE
> specific V64BPCSUSR/SVLBRTEST
> not deterministic
> modifies SQL
> external name V64BPCSUSR/SVLBRTEST
> parameter style general
>
> The error I am getting is
> Token @PTRANSACTIONNUM was not valid. Valid tokens: :.
>
> Can anyone tell me what I am missing? Thanks!
>
> <===================================================>
>
> Terri Harteau
> Felker Brothers Corporation
> ****************
> Practice random acts of kindness and senseless acts of beauty
> -Anonymous
> ****************
> --
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related
> questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate
> link: https://amazon.midrange.com