ibm-midrange - 枚举 QSYS.LIB 内所有库中的对象

标签 ibm-midrange qsys ibm-ifs

有关表(PF 包括 PF-SRCLF 等)的详尽信息位于 QSYS2.SYSTABLES 中.

但是,当涉及到枚举所有对象时(例如,包括 PGMSRVPGMDTAQDTAARA 和等等)在某个图书馆中是否存在单一信息源?

我想知道如果只需要找出文件名和类型,是否可以在没有授予*ALLOBJ权限的情况下查询此类信息?

现在唯一想到的是依赖SYSTABLES并枚举与PF + LF相关的所有对象。然后确定这些对象的编译源(如果有),并祈祷其余对象也是从这些源编译的。

但是,如果只有源代码(例如仅 PGM),这将无济于事。

有什么想法吗?

最佳答案

查看 OBJECT_STATISTICS UDTF。

查找 MJATST 库中的所有期刊。

SELECT * FROM TABLE (QSYS2.OBJECT_STATISTICS('MJATST ','JRN') ) AS X;

SELECT * FROM TABLE (QSYS2.OBJECT_STATISTICS('MJATST ','*JRN') ) AS X ;

查找 MJATST 库中的所有期刊和期刊接收者。

SELECT * FROM TABLE (QSYS2.OBJECT_STATISTICS('MJATST ','JRN JRNRCV') ) AS X;

SELECT * FROM TABLE (QSYS2.OBJECT_STATISTICS('MJATST ','*JRN *JRNRCV') ) AS X ;

查找 MYLIB 库中的所有程序和服务程序。使用*ALLSIMPLE快速返回列表,省略详细信息。

SELECT * FROM TABLE (QSYS2.OBJECT_STATISTICS('MYLIB','PGM SRVPGM', '*ALLSIMPLE') ) AS X;

关于ibm-midrange - 枚举 QSYS.LIB 内所有库中的对象,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/50563079/

相关文章:

db2 - AS400 DB2 期刊搜索

java - AS400 编程和动态类路径

ibm-midrange - 如何从 ILE 程序中读取 liblist? (最好是RPG或CL)

syntax - IBM iSeries 的 DB2 : IF EXISTS statement syntax

linux - 更改 Qsys 设计以运行最新版本的 uClinux

c++ - 使用 _Ropen 打开物理文件时出错

shell - 为 IBMi IFS 上的目录中的每个文件递归搜索目录