Re: sqlcblle - pointer error on select into?

I have no idea what you are doing wrong Jay - but using Richard's code as a base I was able to create a service program and call it multiple times from an RPG test program with zero failures.

I ran the SrvPgm as *Caller and allowed the RPH to default the AG.

Everything worked as it should.

You need to show us the CRT commands for the SP and the RPG caller. What AGs are being used? How does the COBOL return - Exit Program or ... ?


Jon P

On Apr 11, 2023, at 7:59 AM, Jay Vaughn <jeffersonvaughn@xxxxxxxxx> wrote:

Tried the changes...

still the pointer error when the SQLCBLLE is a *module in a *srvpgm, and
called from an SQLRPGLE.

Jay

On Mon, Apr 10, 2023 at 8:15 PM Jay Vaughn <jeffersonvaughn@xxxxxxxxx>
wrote:

Awesome.
Thanks.
I’ll try these changes out.

Jay

On Apr 10, 2023, at 7:11 PM, Richard Schoen <richard@xxxxxxxxxxxxxxxxx>

wrote:

Looks like you also don't need the comma in this statement:

PROCEDURE DIVISION USING INCOMING-VALUE1, OUTGOING-VALUE1.

I changed it to:
PROCEDURE DIVISION USING INCOMING-VALUE1,
OUTGOING-VALUE1.

Didn't know that would solve it but it seemed to.

Also looks like this becomes your subproc ID for service program:

PROGRAM-ID. CBL00000M_PGM1.

Proc is: CBL00000M_PGM1

Regards,
Richard Schoen
Web: http://www.richardschoen.net
Email: richard@xxxxxxxxxxxxxxxxx

-----Original Message-----
Thanks Richard,

So my parameters error (pointer) error was occurring on the exec sql

statement of the sqlcblle.

Funny thing, if you were in debug, and viewed the :outgoing-value1 just

before the exec sql statement it was initialized and referenceable. But as
soon as you stepped on the exec sql you would get the pointer error.

Also my sqlclble was a *module accessed from a srvpgm, not just a stand

alone *pgm.

--
This is the COBOL Programming on the IBM i (AS/400 and iSeries)

(COBOL400-L) mailing list

To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.

--
This is the COBOL Programming on the IBM i (AS/400 and iSeries) (COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.