zOs/WK/PKGUSEC2
with pc as
(
select count(*) vers, collid, name
from sysibm.syspackage k
where collid like 'AV%'
group by collid, name
)
, p as
(
select sum(vers) vers
, count(*) col
from pc
group by name
)
select count(*) "pkgs",
sum(col) "colPkgs",
sum(vers) "colPkgVers"
from p
with ur
;
with v as
(
select substr(strip(k.collid) || '.' || k.name, 1, 16) nm
, (select count(*)
from sysibm.sysPackage r
where r.collid = k.collid and r.name = k.name) "versCnt"
, (select max(lastUsed)
from A540769.tPkgUsd u
where u.pkg = k.name) "lastAllCo"
, p.*, k.*
from sysibm.syspackage k
left join A540769.tPkgUsPdb p
on p.col = k.collid and p.pkg = k.name
where k.collid like 'AV%'
and k.pctimestamp = (select max(r.pctimestamp)
from sysibm.sysPackage r
where r.collid = k.collid and r.name = k.name)
-- fetch first 100 rows only
)
select *
from v
order by name, collid
with ur