Как получить пользовательские библиотеки в Rexx-интерфейсе для SDSF

Интерфейс rexx для SDSF отлично работает для получения информации о spoolfiles. Я пытаюсь перечислить использование пользовательских библиотек для выходных файлов. И выполните «ISFEXEC O», а затем (в цикле)

ISFACT O TOKEN(..) PARM(NP ?) (PREFIX JDS_ DELAYED DELAYED2

Затем во внутреннем цикле я могу просмотреть каждый файл JDX_xxxx. переменная. Все идет нормально. Но как мне получить информацию о userlib нет. 2,3,4...? JDS_ODUSRLIB. дает мне первую пользовательскую библиотеку. Но как мне получить остальные 7 пользовательских библиотек?

Я безуспешно пытался найти какой-либо пример, и документация не очень ясна по этому вопросу.


person Per Beliing    schedule 05.03.2018    source источник


Ответы (1)


Вы пробовали JDS_ODUSRLIB. корень? Что-то вроде

  do jx=1 to JDS_DDNAME.0   /* loop for all rows returned */
    say "UsrLib for " JDS_DDNAME.jx " is " JDS_ODUSRLIB.jx                          
  end                                                       
person Fritz    schedule 18.03.2018
comment
Привет. Спасибо за ответ. Да, я использую это. Проблема в том, что на одно DDNAME может быть до 8 пользовательских библиотек. JDS_ODUSRLIB содержит только первый. Я не знаю, как получить остальные 7. Руководство не очень ясно об этом - по моему скромному мнению. - person Per Beliing; 19.03.2018
comment
Привет, мне интересно, видите ли вы остальные 7 на своих панелях SDSF. Если вы этого не видите, я бы предположил, что информация недоступна. Может быть, вы можете найти информацию, используя PARM(NP Q) вместо NP? - person Fritz; 23.03.2018
comment
Если у вас отсутствует столбец UserLib на панели OD (запрошенный с помощью NP Q), вы должны использовать параметр ALTERNATE на ISFEXEC. - person Fritz; 23.03.2018
comment
Да, я вижу все 8 пользовательских библиотек на панелях SDSF (используя форму ALTERNATE). Но я не могу понять, как получить их в REXX. Базовая переменная ODUSRLIB имеет только одно значение для каждого набора данных задания. Он не может содержать 8 различных значений для каждого набора данных задания. - person Per Beliing; 10.04.2018
comment
Обнаружено, что, к сожалению, NP Q не разрешен (см. " rel="nofollow noreferrer">ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/). Похоже, где нет шансов получить его через SDSF REXX API. - person Fritz; 10.04.2018
comment
RGEN Никогда не пробовал, но может быть вам будет интересно: ibm.com/support/knowledgecenter/en/SSLTBW_2.3.0/ - person Fritz; 10.04.2018
comment
Да, действительно кажется, что нет способа получить больше, чем первую пользовательскую библиотеку из SDSF в REXX-код. ... И я попробовал RGEN. Он не предоставляет никакого примера кода для доступа к полям на панелях дескриптора вывода. Так что я думаю, что здесь заканчивается обычное: это не ошибка, это функция. Я надеюсь, что кто-то из IBM также слушает эту тему и, возможно, подготовит PTF для реализации этой функции. - person Per Beliing; 13.04.2018