Re: AW: Returning Multiple Result Sets from RPG with External Stored Procedure

Did you try returning all result sets witin a single SET RESULT SET
statement?

Exec SQL Set Result Sets with return to client
Array :allOsDs for :allIndex Rows,
Array :favOsDs for :allIndex Rows
Array :dptOsDs for :allIndex Rows;

BTW cursors are returned as result set by opening them and not closing them
before the procedure is left (ends).

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"


-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] Im
Auftrag von Ricky Thompson
Gesendet: Thursday, 03.10 2013 19:50
An: rpg400-l@xxxxxxxxxxxx
Betreff: Returning Multiple Result Sets from RPG with External Stored
Procedure

I am trying to return multiple result sets from RPG to a java client. I
only get one result set. Can you return multiple result sets from an RPG.
I have something like the following. What's even stranger is I get the
one in the middle. Not the one at the beginning or end. I have checked and
the Array has records in it. The external stored procedure has RESULT SETS
3.



Exec SQL Set Result Sets with return to client
Array :allOsDs for :allIndex Rows;

Exec SQL Set Result Sets with return to client
Array :favOsDs for :allIndex Rows;

Exec SQL Set Result Sets with return to client
Array :dptOsDs for :allIndex Rows;

Just wondering if I'm missing something.

Thanks
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.