Наличие источника во всех доступных библиотеках AS400

Question

Как проверить наличие источника во всех доступных библиотеках AS400.Я хочу знать, в каких библиотеках доступна программа pgmxxxx.Есть ли возможный способ?

Answer 1

Запрашивая SYSTABLES, вы можете получить список всех исходных файлов в системе, вам нужно запросить SYSPARTITIONDISK, чтобы получить список членов-источников.

Вот как это будет выглядеть:

select table_schema as library,
       table_name as file,
       table_partition as member 
from qsys2.syspartitiondisk
where table_partition = '<your source member name>'

Вы можете значительно ускорить это, ограничив имя файла или библиотеку, используя table_name или table_schema соответственно.

Answer 2

Все таблицы типа источника на iseries aka as400 aka poweri.

SELECT * FROM QSYS2/SYSTABLES WHERE FILE_TYPE = 'S'