I also would be interested in the code Alan
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Robert Rogerson
Sent: Thursday, November 08, 2012 9:01 AM
To: RPG programming on the IBM i / System i
Subject: Re: Best approach for Embedded SQL SELECT in V7R1
Hello Alan, I too would be interest in seeing your code.
Thanks,
Rob Rogerson
On 2012-11-06 11:08 AM, Alan Campin wrote:
I use SQL exclusively for I/O in screen programs and was pleasant surprised when I first used it that it actually made coding simpler and yes I always use a data structure or records array to read records and I almost always map to a user space. It makes it very, very fast.
If you are interested, I can send a module doing a single page load written using subfiles and SQL.
On Tue, Nov 6, 2012 at 7:37 AM, Michael Ryan [1]<michaelrtr@xxxxxxxxx> wrote:
Hi folks...looking for opinions/ideas here. I'm working with a program that declares a cursor, then does a FETCH NEXT to iterate through the result set and fill a subfile. It looks like this:
DECLARE C1 CURSOR FOR
Select * From Inventory
Where...<where and order by clauses> ...
Exec SQL
Fetch Next
From C1
Into :WkInventory;
Where WkInventory is an externally described DS based on the Inventory file. The data is then moved from WkInventory to the subfile, and the subfile is eventually displayed.
I *think* that performance would improve by FETCHing multiple rows into a MODS or an array in a data structure, rather than esentially performing RLA with SQL. Recently upgraded to V7R1, so I'm looking for the best approach at this OS level - I know I can do more than I could do in V5R4. My first thought is a MODS and specifying a number on the FETCH. But then I need to be concerned about 're-FETCHing' when I run out of rows for my subfile, right? Would an array make more sense than a MODS?
I want to use SQL where it makes sense and RLA where it makes sense. I need to work through this concept so I can use this technique as I go forward.
Ideas, opinions, code samples all welcome. Thanks in advance!
--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list To post a message email: [2]RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: [3]
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: [4]RPG400-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at [5]
http://archive.midrange.com/rpg400-l.
References
Visible links
1. mailto:michaelrtr@xxxxxxxxx
2. mailto:RPG400-L@xxxxxxxxxxxx
3.
http://lists.midrange.com/mailman/listinfo/rpg400-l
4. mailto:RPG400-L-request@xxxxxxxxxxxx
5.
http://archive.midrange.com/rpg400-l
--
This is the RPG programming on the IBM i / System i (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.
NOTICE: This message, including any attachment, is intended as a confidential and privileged communication. If you have received this message in error, or are not the named recipient(s), please immediately notify the sender and delete this message.
As an Amazon Associate we earn from qualifying purchases.