ibm-midrange - 如何从除 Q* 之外的所有库中找出系统中的 Last Used 对象

Question

先感谢您！！但问题是我正在寻找系统中的所有对象，除了 Q* 库，它们在 2018 年 12 月 31 日在过去 2 年中使用。是否有任何查询可以显示大约 2 年前最后使用的对象，并且可以省略 Q* 无系统库的所有对象。

问候， 迪帕克·曼格拉

Answer 1

您可以使用 DSPOBJD 命令并直接输出到输出文件。ODUDAT 和 ODUCEN 字段包含上次使用的日期。

DSPOBJD OBJ(QGPL/*ALL) OBJTYPE(*ALL) OUTPUT(*OUTFILE) OUTFILE(QTEMP/DSPOBJD)  

然后使用SQL查看outfile的内容：

select   a.odlbnm, a.odobnm, a.odobtp, a.odobat,
         a.oducen, a.odudat, a.odcdat, a.odobtx 
from      qtemp/dspobjd a                         

从那里你应该能够选择最后使用的日期。