× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



You may want to test this.  From what I remember (which is sometimes very
little), RPG and other HLL's on the AS400 cannot return multiple result
sets.  To return multiple sets, you would need to write the stored procedure
in the SQL language.

Schadd

----- Original Message ----- 
From: <rob@xxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, February 25, 2004 7:14 AM
Subject: RE: SQL Result Sets


> Maybe it is. I'm still interested on how Charles learned it.
>
> Rob Berendt
> -- 
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> "Haas, Matt" <Matt.Haas@xxxxxxxxxxx>
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 02/24/2004 05:21 PM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
>
>
> To
> "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
> cc
>
> Fax to
>
> Subject
> RE: SQL Result Sets
>
>
>
>
>
>
> Rob,
>
> I'm pretty sure that this is in one of the SQL programming books. The
> information was pretty scattered in the V4 books. I haven't looked at the
> V5 books to see if they're any better.
>
> Matt
>
> -----Original Message-----
> From: rob@xxxxxxxxx [mailto:rob@xxxxxxxxx]
> Sent: Tuesday, February 24, 2004 5:02 PM
> To: RPG programming on the AS400 / iSeries
> Subject: RE: SQL Result Sets
>
>
> I have to ask:  How did you figure that one out?
> - Some DB class in college?
> - Experience from other databases?
> - Standard DB2 iseries manuals?
> - Third party book on DB2 on the iSeries?
> - Someone else's code at your site?
> - This list?
>
> Rob Berendt
> -- 
> Group Dekko Services, LLC
> Dept 01.073
> PO Box 2000
> Dock 108
> 6928N 400E
> Kendallville, IN 46755
> http://www.dekko.com
>
>
>
>
>
> CWilt@xxxxxxxxxxxx
> Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> 02/24/2004 04:55 PM
> Please respond to
> RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
>
>
> To
> rpg400-l@xxxxxxxxxxxx
> cc
>
> Fax to
>
> Subject
> RE: SQL Result Sets
>
>
>
>
>
>
> Do you have the DYNAMIC RESULTS SETS 2 specified on the create procedure
> statement?
>
> CREATE PROCEDURE ASSEMBLY_PARTS (IN ASSEMBLY_NUM INTEGER,
> OUT NUM_PARTS INTEGER,
> OUT COST DOUBLE)
> LANGUAGE C
> PARAMETER STYLE GENERAL
> DYNAMIC RESULT SETS 2
> FENCED
> EXTERNAL NAME ASSEMBLY
>
> HTH,
> Charles
>
>
>
> > -----Original Message-----
> > From: Dave Boettcher [mailto:DBoettch@xxxxxxxxxxxxxxxx]
> > Sent: Tuesday, February 24, 2004 3:23 PM
> > To: rpg400-l@xxxxxxxxxxxx; RPGIV@xxxxxxxxxxxxxxx
> > Subject: SQL Result Sets
> >
> >
> > Perhaps someone out there knows how we can do this.  Thanks in advance
> > for the help.
> > We have searched GOOGLE and the archives on the Midrange and RPGIV
> > sites.  The question appears a few times all the way back to 1998, but
> > we have not seen an answer posted even though several posts said they
> > might  try it out.  :>)
> >
> > We want to return two result sets from an RPGIV program.
> > We get only the last one back to the calling PHP program.
> > the RPGIV SQL code to return the result sets is below:
> >
> >  c/exec SQL
> >  c+  Set Result Sets Array :TaxDta for :TaxNdx rows
> >  c/end-exec
> >
> >  c/exec SQL
> >  c+  Set Result Sets Array :AssmtDta for :AssmtNdx rows
> >  c/end-exec
> >
> > Does anyone know if this should work?  OR do you know of
> > another way to
> > accomplish the same thing.
> >
> > Any response is appreciated, especially "yes" or "it will never work
> > and here's why"
> >
> > TIA,
> >
> > Dave Boettcher
> > _______________________________________________
> > This is the RPG programming on the AS400 / 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.
> >
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / 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.
>
>


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.