|
Presently, I am doing straight reads only in my RPG. But this is not an efficient way. My requirement is as follows : I have a database file that stores some date fields in my application. This database file typically has Lib+Filename, datefield name, its format and other info. I have another list of filenames. For each filename entry I am generating the DSPFFD outfile. For each filename entry in this list, there can be more than one record in the first database file. (if a file contains 3 date fields, my first database will have 3 records of this file). I will get the date field record from first database. Then I search for this Lib+File+Fld in the DSPFFD outfile. This search presently I am doing straight reads of the outfile. Instead, I am thinking of directly doing a CHAIN to the DSPFFD outfile with Lib+File+Fld as the keylist. So I tried to define the OPNQRYF with Keylist and then calling the RPG with 'K' specified in the F specs. But it is not getting around. If I go for straight reads of Dspffd Outfile, then imagine a situation wherein the date field is defined as the last field in the file. And if the file has around 100 fields, then I have to do 100 reads to get the correct dspffd record. The situation will be worse if the file has 100 fields, out of which 3 are date fields and are defined at the end. I will be doing lot of unnecessary Reads (first 100, next 99, next 98...so on). I want to avoid this. I can create an external LF for the QADSPFFD file. That means, I have to have this external LF object always with the program. This also I want to avoid. If there is no way around, then I may have to opt for this. Any help/suggestions are appreciated. Thx in advance. rgds, Vg +--- | This is the Midrange System Mailing List! | To submit a new message, send your mail to MIDRANGE-L@midrange.com. | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com. | To unsubscribe from this list send email to MIDRANGE-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 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.