zOs/SQL/CATPKGDQ

with p (col, pkg) as
(           select 'PC  ',   'YPCSPER' from sysIbm.sysDummy1
  union all select 'PC  ',   'YPCTECH' from sysIbm.sysDummy1
  union all select 'PC01',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC02',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC03',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC04',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC05',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC06',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC07',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC08',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC09',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC10',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC12',   'YPC0680' from sysIbm.sysDummy1
  union all select 'PC13',   'YPCLOCA' from sysIbm.sysDummy1
  union all select 'PC13',   'YPC0680' from sysIbm.sysDummy1
)
select bType, char(bQualifier, 8) cr, char(bName, 12) tb, count(*)
    from sysibm.syspackdep d
    where dLocation = ''
      and (dCollid, dName) in (select * from p)
    group by bType, bQualifier, bName
    order by bType, bQualifier, bName,1,2,3
;;
select bType, char(bQualifier, 8) cr, char(bName, 12) tb,
       dType, substr(dCollid, 1, 8) col,
              substr(dName  , 1, 8) pkg, d.*
    from sysibm.syspackdep d
    where (dCollid, dName) in (select * from p)
    order by bType, bQualifier, bName,1,2,3
;;