Существует ли команда TSO, написанная в REXX или CLIST, которая может определить, что ВОЗ поставила в очередь набор данных?

Question

Мне нужно написать REXX Exec или Clist, чтобы определить, что ВОЗ поставила в очередь набор данных, и отобразить удобное для пользователя сообщение в диалоговом приложении ISPF. Из-за проблем с конфигурацией системы команда% WHOHAS недоступна. Однако я также знаю, что сам ISPF (опция 3.4) имеет проприетарные хуки в мэйнфрейме zos для отображения информации о ресурсах в очереди, которая мне нужна - так что информация может быть получена. К сожалению, я не знаю, как получить доступ к этим данным извне ISPF 3.4, используя REXX Exec или CLIST. Есть предложения?

Answer 1

При первом чтении я подумал, что это будет довольно просто раскапывать. Не совсем!

В ISPF вы можете получить панель для отображения того, кто держит набор данных набрав в командной строке следующее:

TSO ISRDDN ENQ 'Имя набора данных'

Команда ISRDDN документирована по адресу: http://publibz.boulder.ibm.com/cgi-bin/bookmgr/FRAMESET/ispzug50/G.0?ACTION=MATCHES&REQUEST=isrddn&TYPE=FUZZY&SHELF=ispzpm50&DT=20060621022939

Вызов ISRDDN возможен из программы REXX, но я не знать, как записать вывод в переменную ствола, где вы могли бы разобрать и выдать сообщение. Я не смог найти командную строку интерфейс к ISRDDN, который позволяет захватывать выходные данные.

Есть еще одна утилита по адресу: http://www.sillysot.com/mvs/index.htm?queryenq.htm который утверждает, что делает это также, я никогда не пробовал это так не могу комментируйте дальше.

Я гуглил твой вопрос, и похоже, что несколько человек использовали команда MVS

D GRS, RES = (*, dsname)

, чтобы определить, кто держит набор данных. Однако для этого требуется консольный доступ, поэтому не будет подходит для большинства пользователей. Если доступ к консоли разрешен, вы можете запустить консоль сессию под REXX и довольно легко перехватить вывод, см .: http://www.redbooks.ibm.com/redbooks/pdfs/sg244626.pdf.

Последнее место для поиска - ленты CBT (бесплатная программа для Мэйнфреймы IBM). Здесь вы можете найти несколько реализаций WHOHAS Команда ISPF.

Извините, но это лучшее, что я могу сделать.

Answer 2

Это оказалось очень простым исправлением. Ничего фантастического. Если в clist используется CONTROL NOFLUSH, он не прервется, если не удастся определить местоположение набора данных. У нас также есть установленный продукт под названием TSOPLUS, который отформатирует сообщение для терминала, определяющее, кто выделил набор данных в случае неудачного выделения. Отключив FLUSH и затем отправив systrapping сообщение TSOPLUS, я смог извлечь нужную информацию.