Re: How to break up a LARGE physical file

[Bob Larkin <blarkin@xxxxxx>]

Pete Hall wrote:
> 
> >>
> Basically he wants to divide his data by year, and requires both
> lookup and update of ANY record. He had tried breaking the file
> up and then using logicals with joins to see the whole base when
> required. Lookups are fine but updates die. He didn't have the msg
> handy when he called just something about not being allowed. <<
> 
> Kirk,
> 
> Joins are not updatable on the AS/400. This process is probably better
> suited to a multiple format logical anyway. One generally thinks of
> multiple format logicals as being analagous to the old
> header-followed-by-detail kind of transaction data, however, there is
> absolutely no reason that all of the records can't be identical. The
> only problem is the "no changes" requirement. If he is willing to accept
> "small" changes, then you may be able to do something. You will need to
> make the record names unique (perhaps incorporating the year) and
> updates (and writes as well) will need to specify the appropriate record
> name. For updates, the record name can be determined from the file
> information data structure, but for writes, you'll need logic to
> determine what the correct value is, and in RPG at least, the names must
> be literals, so some maintenance would need to be done annually. Perhaps
> you could use "CurrYear" as the record name for the current year if only
> current year data must be updated. Then the record names would have much
> less significance.
> 
> Pete
> 
> --
>  - Pete Hall peteh@earth.inwave.com
> http://www.inwave.com/~peteh/
> 
Here might be proof that you should not drink and surf at the same time!
Read against a dummy file with a trigger or exit program that would read
the multiple files, then move the data into the dummy file. On update,
the process would be reversed? Only problem, I don't know if you can
trigger or attach Exit program on the read of a file.
-- 
Bob Larkin
Larkin Computer Consulting
blarkin@wt.net
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *