|
Yeah, I remember that "back in the day" stuff. The problem is that many
people, once told something, never change. There are still people that
believe that. There are still people leery of each LF they add because of
performance considerations (granted I'm not advocating 100LF's on 1 PF
but let's not swing to the other extreme). And a lot of other items that
were true "back in the day".
And a coworker here just wrote a V5R4 recursive SQL statement to explode
MBM that blew the socks off of traditional RPG logic.
with Exploded(Parent, Child, Qty, LVL, TopParent) as
(select BPROD, BCHLD, BQREQ, 1, BPROD
from MBM
union all
select BPROD, BCHLD, BQREQ*Exploded.Qty, LVL+1, TopParent
from MBM, Exploded
where BPROD=Child)
select * from Exploded
order by TopParent
For this to work in our database, the QAQQINI file must have setting
IGNORE_DERIVED_INDEX='*YES'
Rob Berendt
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.