midrange.com code scratchpad
Name:
What IFS objects are flagged as not to save
Scriptlanguage:
Plain Text
Tabwidth:
4
Date:
07/18/2018 03:24:30 pm
IP:
Logged
Description:
List IFS objects flagged as not to save.
Code:
  1. select 
  2.     QEZDIRIDX,  -- The parent directory index
  3.     QEZOBJNAM,  -- The object name
  4.     QEZOBJTYPE, -- The object type
  5.     QEZNONSAV,  -- Object can be saved or not
  6.     QEZALCSIZE, -- Number of bytes allocated for the object
  7.     QEZDTASIZE, -- Size in bytes of the data in the object
  8.     QEZPCSYS,   -- Object is a system file
  9.     QEZTMPOBJ,  -- Object is temporary or not
  10.     QEZSYSRSSV, -- System restricts save or not
  11.     d.qezdirnam1
  12. from routines.QAEZD0022O o,
  13. lateral (select qezdirnam1 from routines.qaezd0022d where qezdiridx=o.qezdiridx) as d (qezdirnam1)
  14. where ((QEZNONSAV = '1') or (QEZSYSRSSV = '1'))
  15. order by QEZDIRIDX asc
  16. ;
  17.  
© 2004-2019 by midrange.com generated in 0.008s valid xhtml & css