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


  • Subject: RE: Alphabetizing detail records to a header file
  • From: Buck Calabro <mcalabro@xxxxxxxxxxxx>
  • Date: Mon, 6 Dec 1999 10:23:04 -0500

Booth,
S/36-ish code would be to create a work file with header name and detail
information, sort it and off you go.
S/38-ish code would be to read the header by an alpha logical, SETLL/READ
the detail.
AS/400-ish code would be to create a join logical over the header and detail
and read that instead of the based-on physicals or use OPNQRYF to do the
same thing dynamically, performing the record selection as well as the
sequencing.
Platform-independent SQL would work basically the same way as an OPNQRYF
would.

Buck Calabro
Aptis; Albany, NY

> -----Original Message-----
> From: boothm@earth.goddard.edu 
> Sent: Sunday, December 05, 1999 1:39 PM
> To:   rpg400-l@midrange.com
> Subject:      Alphabetizing detail records to a header file
> 
> I also have an
> application with a small detail file for a  specialized application.  The
> small group is probably going to be about 300 records but certainly never
> over 1,000 records.  I've linked it logically with the Header File by the
> unique Header File I.D. number. To present an alphabetic subfile on the
> screen of that small grouping I have to read through the entire alpha
> logical on the Header File.  As you can imagine performance is horrid.
> 
> In the past I've loaded an *INZSR array, and I've denormalized the data.
> Neither method has felt right.  Is there some simple thing I've missed?
> 
> 
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


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.