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

Question

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

Answer 1

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

Answer 2

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

В разделе 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, но я не знаю, как записать выходные данные в переменную stem, где вы могли бы проанализировать их и выдать сообщение.Я не смог найти командную строку интерфейс к 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.

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