获取AS400/ISERIES服务帐户触摸的文件和程序列表

Question

我正在尝试获取程序的列表（RPG/CL/SQL），并在iSeries上触摸了一个服务帐户。这个想法是，拥有此列表，我们可以将特定的权限（我知道这确实会使事物复杂化）与用户帐户联系起来，以实现更安全的应用程序特定的服务帐户。有什么办法可以做到这一点，也许可以通过运行命令获得报告。也许有一个SQL语句？

请原谅，如果我的条款不合适，我还是iSeries的新手。

Answer 1

审核日记将具有您要寻找的内容。

http://pic.dhe.ibm.com/infocenter/iseries/v7r1m0/topic/rzarl/rzarluessecjnl.htm

最新的7.1 TR包含存储过程，以简化阅读期刊。https://www.ibm.com/developererworks/community/wikis/home/wiki/wiki/wiki/wiki/ibm I Technology Updates/page/display_journal

charles

Answer 2

因此，尽管查尔斯的回答可能是应该设置一个详尽报告的答案。我按照我的一个同龄人建议进行以下操作。

请注意，我的目标虽然无法正确解释，但是为程序创建特定应用程序/服务帐户。这是为了避免使用具有许多特权的人并获得一些安全性。

1.浏览源代码（在我的情况下，经典ASP），然后记下该程序使用的过程的所有名称。
2.创建一个CL程序，该程序将程序引用到显示文件。然后在必要时将文件的内容导出到Excel和按摩。

PGM 
DSPPGMREF  PGM(MYLIB/PGM001) OUTPUT(*OUTFILE) OUTFILE(MYLIB/DSPPGMREF) OUTMBR(*FIRST *REPLACE)
DSPPGMREF  PGM(MYLIB/PGM002) OUTPUT(*OUTFILE) OUTFILE(MYLIB/DSPPGMREF) OUTMBR(*FIRST *ADD)
ENDPGM

我被告知，DSPPGMREF无法显示服务程序参考。因此，为这些做到了以下内容。

PGM                                                                                             
ADDLIBLE LIB(ABSTRACT) POSITION(*LAST)                                                          
MONMSG MSGID(CPF0000)                                                                           
WRKOBJR OBJ(SRVPGM01) OBJTYPE(*SRVPGM) OUTPUT(*OUTFILE) OUTFILE(MYLIB/WRKOBJR) MBROPT(*REPLACE)
WRKOBJR OBJ(SRVPGM02) OBJTYPE(*SRVPGM) OUTPUT(*OUTFILE) OUTFILE(MYLIB/WRKOBJR) MBROPT(*ADD)    
WRKOBJR OBJ(SRVPGM03) OBJTYPE(*SRVPGM) OUTPUT(*OUTFILE) OUTFILE(MYLIB/WRKOBJR) MBROPT(*ADD)    
ENDPGM   

感谢您的所有帮助。抱歉，我的答案比我的问题更具体，但最终这是我想实现的目标，我必须概括地提出问题。我以为我会发表我的答案，以便将来它可以帮助某人。