I think SQL, with three-part-naming would probably be a much better option here, and you could probably do everything in a single statement without any RPG if you wanted. Something like this:
insert into LCLLIB.LOCALE_FILE
select A.FLD1, A.FLD2, A.FLD3, B.FLD1
from REMOTE.RMTLIB.SRCFILEA A
join REMOTE.RMTLIB.SRCFILEB B
on A.FLD1 = B.FLD1
...where the first part of the three part qualified files names (REMOTE) is the machine name.
This would do the joins on the source system and only pull over the required columns and rows to the target system, which should be much more efficient (note, the files joined must reside on the same machine, you cannot join a remote file to a local file like this).
There is some config required to get three part names to work, I think it's done with WRKRDBDIRE.
Tim.
________________________________
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> on behalf of ~TA~ <tadair@xxxxxxxxxxxxxxxx>
Sent: 06 March 2020 22:08
To: midrange-l@xxxxxxxxxxxxxxxxxx <midrange-l@xxxxxxxxxxxxxxxxxx>
Subject: DDM file performance
I'm not sure if this is an RPG issue or not, so I plan to cross-post it.
I have an RPGLE program that reads a DDM file (Input Primary) and
outputs (write/update) to a local DB file. This has been working fine
for over a year. Now I need data from a second DDM file (same
location), so I added a chain to that file in the program.
Here's the problem - before, the job took a total of around 35 minutes.
Now, simply adding a chain to a 2nd DDM file has increased the run time
to almost 3 hours.
How can adding a single chain to another DDM file increase run time 5x ?
One DDM good, two DDM bad?
I'm also going to post this in Midrange in case it's not an RPG issue.
(Sorry David, I'm not sure.)
Thanks.
~TA~
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Flists.midrange.com%2Fmailman%2Flistinfo%2Fmidrange-l&data=02%7C01%7C%7C34f3ff35abc74ca064d208d7c212c0da%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637191258102605778&sdata=VAptUfsPO%2Bs08YBKTfCHu%2FAgfnpK7tB%2FaO6LpBWLYQ0%3D&reserved=0
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Farchive.midrange.com%2Fmidrange-l&data=02%7C01%7C%7C34f3ff35abc74ca064d208d7c212c0da%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637191258102615778&sdata=Kh%2BGZtQe%2FUu7aNcZyGJOa82Bn1wwBPs1meL4QwEjw%2Fw%3D&reserved=0.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://nam10.safelinks.protection.outlook.com/?url=https%3A%2F%2Famazon.midrange.com&data=02%7C01%7C%7C34f3ff35abc74ca064d208d7c212c0da%7C84df9e7fe9f640afb435aaaaaaaaaaaa%7C1%7C0%7C637191258102615778&sdata=S8QLL68yeUQgaCN8905NwCUNTM%2FyJGzoqucpBj90ebQ%3D&reserved=0
midrange.com
