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



>From your statement about the goal, I wonder if what you want is a
multiple record format logical file.  To do this you just put a line in
for each record format with the associated PFILE keyword for the
physical file. Then just after each record format you enter the keys.
What is really interesting is that if one file has a key that another
does not you can use *NONE in place of the missing key.  The program
will have to detected each record format with record indicators and
these indicators will have to be set off just before each read.  This is
the only way that I know of to detect which record format was just read.

I hope this will help you.  

Marvin


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Rusling, John B.
(Alliance)
Sent: Wednesday, May 04, 2005 10:22 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Join 2 files with 1 key from each file.

I have 2 files I want joined and indexed on 1 key from each of the 2
files.

The 2 files are named s1 and s3, both have the common field of Order#
(on) in them

s1 JOIN s3 ON s1on = s3on .

I want the joined file indexed by s1name, then s3itno

ORDER BY s1name, s3itno .


I'm using embedded sql in rpg and everything works fine except the
response
time on one of our production machines gets to be 5+ minutes.!

---->
I want to have a prebuilt, index or logical so that when this program is
used, the response time will fall into the acceptable range.

I've built most every combination of logical file (using dds) to this
end
but the response time is still horrid.

The s1 file has 2.25 million records and the s3 file has about 2.8
million.

Can anyone give me some guidance on this please?  I've tried everything
I can think of for the last day or 2 and response time is still crappy.


Thanks for any help at all,

John B.

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


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.