zOs/SQL/GBGRSEXB

set current path oa1p;
  select substr(t.dbName, 1, 8) db
      , substr(t.Name, 1, 8) ts
      , smallint(partition) part
      , lastDataChange lastCha
      , fQzFmtbin7(real(t.nActive) * t.pgSize * 1024)  actUsed
    from OA1P.TQZ006GBGRTSSTATS t
    where current timestamp >= validBegin
      and current timestamp <  validEnd
      and rz = 'RZ2' and dbSys = 'DVBP'
      and dbName like 'XB%'
      and lastDataChange >= '2016-01-01-00.00.00'
      order by real(t.nActive) * t.pgSize desc
      fetch first 100 rows only