Re: Result sets in SQLRPGLE

On 7/18/2024 3:09 PM, stefan@xxxxxxxxxx wrote:

Just started playing with result sets in rpg.

I declare a ds dbt dim(10 000);

Then I declare, prepare ,open and fetch from a cursor.

When reaching eof I do:

exec sql
set result sets array :dbt
for :rowsreturned rows
;

How to deal with a situation when I get more than 10 000 rows? Previous fetch is then overlaid with new data ....

Hi Stefan,
Using a DS is one way to return a smallish result set.
Another way is to open a cursor and leave it open:

exec sql declare myCursor cursor for...
exec sql open myCursor;
exec sql set result sets cursor myCursor;
*inlr = *on;

...the CREATE PROCEDURE shouldn't need to change:
CREATE PROCEDURE myProcedure (
IN...)
DYNAMIC RESULT SETS 1
LANGUAGE RPGLE...

https://www.ibm.com/docs/en/i/7.4?topic=statements-set-result-sets