如何使用lminit读取pds成员的大小，lmmfind ..？

Question

我想读一下pds成员的大小 例如： -

my pds name is - my.pds.cics
If i browse this pds I will find details like below:
     name     prompt size     created ..............
____PDS1             0051e   25/03/2016
____PDS2             006be   25/03/2016
____PDS3             0078e   25/03/2016
____PDS4             0051g   25/03/2016

我想读取此pds的所有成员的大小并将其存储在变量中。 ex. var1 = 0051e

请帮我怎么做。我试过用lmmfind。任何人都可以帮我解决REXX中的代码。

Answer 1

您是否查看了LMMFIND

中可用的变量

如果是加载模块，ZLSIZE应该保持大小

如果是FB文件且设置了ispf统计信息，则ZLCNORCE将保留记录数。和

 size = NumberOfRecord * RecordLength

如果是VB，你就被塞满了。

另一个选项是将文件视为recfm = u并编写程序并读取原始数据。您应该能够从成员开始/结束位置计算大致的大小。有IBM手册记录了格式。