zOs/REXX/WSTTY

$@=[
with inp (db, ts) as (
select 'WU99A1P','A997A'
 from sysibm.sysdummy1
union all
select 'CD01A1P','A998A'
 from sysibm.sysdummy1
)
,    deps as
(
 select distinct(dname) from sysibm.syspackdep
 join inp on bqualifier = db
)
select * from deps
$]
$|
$** call sqlwshini
 call sqlConnect 'RZ2/DBOF','w'
 call sqlStmts $** , , , , o
$** $@. sqlRdr()
$#out                                              20160906 13:45:24