Re: sqlcblle - pointer error on select into?

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

thanks Jon... yes, no OPM is in play here.

I'd love to see if you can confirm this behavior or overcome it.
If you can confirm it, I'll get something to IBM.

thanks

Jay

On Mon, Apr 10, 2023 at 11:49 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

Sounds like it may be a problem for IBM to sort out.

As far as the run unit is concerned (and it could have an impact) ILE
COBOL run units map to the AG and - perhaps more importantly - the run unit
cannot be shared by OPM and Ile COBOL.

STGMDL is, I suspect, a red herring.

So, if you use a named AG and BOTH the COBOL and the RPG run in that AG I
would expect it to work. If I have time later I'll have a play but I'd
report it to IBM. At the very least if it is a limitation it should be
documented.


Jon P.

On Apr 10, 2023, at 11:32 AM, Jay Vaughn <jeffersonvaughn@xxxxxxxxx>

wrote:

Jon,

this is basically what I've narrowed it down to...

SQLCBLLE *PGM can do SQL no problem

A SQLRPGLE that calls *SRVPGM with SQLCBLLE *module cannot do SQL

(pointer

error)
- have not been able to find out why (run unit concept?)
- even when run under named actgrp and stgmdl(*snglvl)

A SQLRPGLE that calls *SRVPGM with SQLCBLLE *module without SQL works

fine.

Jay



On Mon, Apr 10, 2023 at 11:32 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx>

wrote:

This would normally indicate that you didn't pass the required number of
parameters - 2 in this case.

What does your call look like?


Jon P.

On Apr 10, 2023, at 8:43 AM, Jay Vaughn <jeffersonvaughn@xxxxxxxxx>

wrote:

I have a simple cobol sql pgm.

I have the following pieces...

WORKING-STORAGE SECTION.
01 WS-MESSAGE PIC X(50).

LINKAGE SECTION.
01 INCOMING-VALUE1 PIC X(5).
01 OUTGOING-VALUE1 PIC X(50).

**************************************************************
PROCEDURE DIVISION USING INCOMING-VALUE1, OUTGOING-VALUE1.
**************************************************************
main-proc.
exec sql
select 'Row count from CBL00000M_PGM1 SQL: ' concat
char(count(*))
into :ws-message
from xxx.zzz
end-exec.
move ws-message to outgoing-value1.
EXIT PROGRAM.

I am getting a pointer error when it tries to exec the sql under

main-proc.

Why is that?

tia

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

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

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