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



What does your SQL statement look like?

On Thu, Aug 27, 2009 at 10:44 AM, Christen, Duane <Duane.Christen@xxxxxxxxxx
wrote:

Michael;

I do this type of thing quite often:
D data DS Qualified
D Dim(100)
D Based(dataBase)
D entryId 20I 0
D field1 10A
D field2 10A
D field... 10A
D fieldN 10A
D processName 25A

D example DS Qualified
D Dim(100)
D entryId 20I 0
D field Like(data.field1)
D Dim(N)
D processName 25A

In your code initialize the dataBase pointer dataBase = %Addr(example),
fetch into the data structure and you can access the fields like
example(x).field(y). SQL represents data as a record, but you can redefine
the representation anyway you need with an appropriate structure.

Duane Christen

--


Duane Christen
Senior Software Engineer
(319) 790-7162
Duane.Christen@xxxxxxxxxx

Visit PAETEC.COM


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Koester, Michael
Sent: Thursday, August 27, 2009 10:55 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: SQL select into [array]?

I am looking for an elegant way to code an embedded SQL statement that
selects into, where the host target is an array.

As in:

Select Field1, Field2, Field3
into :MyArray(1), :MyArray(2), :MyArray(3)
From *libl/MyTable

Where Key1 = :MyKey;



... or even

Fetch from MyCursor
into :MyArray(1), :MyArray(2), :MyArray(3);



Apparently SQL syntax does not know about using "(1)", "(2)", and "(3)"
to designate the target array elements. Is there a way to code that to be
acceptable to SQL and to the V5R4 pre-compiler?



I'm hoping not to have to dump the results into a data structure, because I
ultimately need to reference the results by an index, and it would be great
to get them to load directly into the array if possible.



If only I knew the trick...



Thanks
Michael Koester





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

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



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
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.