AW: Selecting records using SQLRPGLE

Hi Jeffrey,

have you ever had a look on the following redbook:
Modernizing IBM eServer iSeries Application Data Access - A Roadmap
Cornerstone
http://www.redbooks.ibm.com/abstracts/sg246393.html?Open

In Chapter 7 (Embedded SQL) there are a lot of examples.
i.e. 7.5.3 you'll find examples how to fetch multiple rows.

Birgitta

-----Ursprüngliche Nachricht-----
Von: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]Im Auftrag von Jeffrey Young
Gesendet: Dienstag, 14. Juni 2005 17:34
An: RPG programming on the AS400 / iSeries
Betreff: RE: Selecting records using SQLRPGLE


Rick,
Can you elaborate on what needs to be defined to retreive multiple records
on a Fetch operation?
The SQL Manual was rather confusing on this.

Thanks,

Rick.Chevalier@xxxxxxxxxxxxxxx wrote:

Guy,

Try this link
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/ic2924/index.htm.
SQLSTT is the RPG equivalent of SQLSTATE. The possible values are listed
here.

Here's an example of how I use it.

d Success c '00000' Successful SQL oper
d EmptySet c '02000' No records returned

// Retrieve first set of records
csr1Fetch() ;

Select;

// Fetch returned an empty set
When SQLStt = EmptySet;

// Fetch returned a good record set
When SQLStt = Success;

// Fetch records until end of file
DoW SQLStt = Success;

// Read through returned records
For RowCnt = 1 to SQLER3 by 1;

// ---------------------------------------
// Insert record processing logic here
// ---------------------------------------

// Move to next record
RtnDtaSet@ = RtnDtaSet@ + %Size(RtnDtaSet);
EndFor; // RowCnt = 1 to SQLER3 by 1

// If end of table reached exit loop
If SQLER5 = 100;
Leave;
EndIf;

// Reset to beginning of data structure
RtnDtaSet@ = Mem@;

// Retrieve next set of records
csr1Fetch();
EndDo; // SQLStt = Success

EndSl;

Rick

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Guy Henza
Sent: Tuesday, June 14, 2005 6:04 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Selecting records using SQLRPGLE


Rick,

OK, I was looking at the IBM web page:

http://publib.boulder.ibm.com/iseries/v5r2/ic2924/index.htm

for the example that I use. They use SQLCOD. Where do I find a good
example of using SQLSST?

Guy

Privileged and Confidential. This e-mail, and any attachments there to, is
intended only for use by the addressee(s) named herein and may contain
privileged or confidential information. If you have received this e-mail in
error, please notify me immediately by a return e-mail and delete this
e-mail. You are hereby notified that any dissemination, distribution or
copying of this e-mail and/or any attachments thereto, is strictly
prohibited.

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



Jeff Young
Sr. Programmer Analyst
Dynax Solutions, Inc.
IBM  Certified Systems Exper - iSeries Technical Solutions V5R2
IBM  Certified Specialist-  i5Series Technical Solutions Designer V5R3











---------------------------------
Discover Yahoo!
 Get on-the-go sports scores, stock quotes, news & more. Check it out!
--
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.