Ibm midrange 检索DFRWRT编译参数

我想检索AS400上的

DSPF

（显示文件）是否已使用

DFRWRT（*否）

关键字编译。我尝试了

QDFRTVFD

API（检索显示文件描述），但该API没有返回适当的信息。有其他方法获取此信息吗？

我找不到API，但您可以使用

TYPE（*ATR）

和

OUTPUT（*OUTFILE）

运行

DSPFD

命令。延迟写入标志将位于字段

DSWTPT

中

如果您运行类似这样的操作：

DSPFD FILE(DFLIB/*ALL) TYPE(*ATR) OUTPUT(*OUTFILE) FILEATR(*DSPF) OUTFILE(MYLIB/DFATR)

select * 
  from mylib/dfatr
  where dswtpt = 'N'

然后，您可以使用SQL查找所有显示文件，其中包含

DFRWRT（*NO）

，如下所示：

DSPFD FILE(DFLIB/*ALL) TYPE(*ATR) OUTPUT(*OUTFILE) FILEATR(*DSPF) OUTFILE(MYLIB/DFATR)

select * 
  from mylib/dfatr
  where dswtpt = 'N'

---

当然，更改库以匹配您的系统；-）

这是一个非常好的问题，对于熟悉

ibmi

和IBM中端技术的人来说非常清楚。它被错误地搁置了。