zOs/SQL/CATVWDEP

with pa (cre, nam, typ, lev) as
  ( select bCreator, bName, bType, 1
        from sysibm.sysViewDep
        where dType = 'V'
              and dCreator = 'GDB9998' and dName = 'VWK210A2'
    union all select d.bCreator, d.bName, d.bType, p.lev+1
        from sysibm.sysViewDep d, pa p
        where d.dcreator = p.cre and d.dName = p.nam
             and d.dType = p.Typ and p.lev < 1000
    )
select typ, lev, strip(cre) || '.' || strip(Nam)
    from pa
    order by 2, 3
;
    where seqNo > 5   --reator = 'A540769' and name like 'VWK210%'
    order by creator, name, seqno