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



The point John's making is if you have a lot of LF's keyed the same and
having a series of select/omits, it may be possible to eliminate some LF's
by using a composite key, (if in batch) OPNQRYF, or some properly-coded SQL
statements.

Also, if you have LF1 keyed on FLDA and create LF2 keyed on FLDA and FLDB,
LF1 and LF2 will share LF2's access path (assuming there are identical
select/omits).

-----Original Message-----
From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
Behalf Of jpcarr@tredegar.com
Sent: Friday, February 08, 2002 9:05 PM
To: rpg400-l@midrange.com
Subject: Re: PF with lotsa LFs


>> LF1    key   FLDA    Select only   field CODE = 'C'
>> LF2   key   FLDA    Select only   fleld  CODE = 'O'
>> LF3  key   FLDA    select  only  field  CODE = 'D'
>>
>> instead of
>>
>> LFx  key   CODE, FLDA    (in RPG reading Equal on keylist)


>...But, what if the file (LF) had to be in FLDA sequence?
>Capt.j



Capt j,

<chuckle>   Think about it.  If you use LF1 the only records you are going
to get is those with CODE = 'C' and those would be in FLDA order.

Now with LFx   keys   CODE, FLDA...

Now I could have a keylist like

     EVAL   CODE  = 'C'
CODE      Setll     LFx
CODE Reade     LFx

I will get the SAME results.  Only CODE 'C's  in FLDA order !!
But then using THE SAME LFx  I could

     EVAL   CODE  = 'O'
CODE Setll     LFx
CODE Reade     LFx


ALL  Using the Same LFx

John

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
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 ...

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.