Как прочитать размер члена pds с помощью lminit,lmmfind..?

Я хочу прочитать размер членов 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.


person uz_support    schedule 25.03.2016    source источник
comment
Вы должны взглянуть на почти дублирующийся вопрос здесь Прочитайте размер члена pds   -  person MikeT    schedule 25.03.2016


Ответы (1)


Вы просмотрели переменные, доступные в LMMFIND

если это загрузочный модуль, ZLSIZE должен содержать размер

если это файл FB и установлена ​​статистика ispf, ZLCNORCE будет хранить количество записей. и

 size = NumberOfRecord * RecordLength

если это VB, вы набиты.

Другой вариант — обработать файл как recfm=u, написать программу и прочитать необработанные данные. Вы должны быть в состоянии рассчитать приблизительный размер по начальным/конечным позициям участника. Существуют руководства IBM, в которых документирован этот формат.

person Bruce Martin    schedule 25.03.2016
comment
Хотя это не обязательно так эффективно, вы не набиты, если это VB. Вы можете купить VB или FB, чтобы получить список каталогов, используя любой LMMLIST, а затем прочитать все записи через EXECIO, который может обрабатывать VB (получение и накопление длин записей). - person MikeT; 26.03.2016