Чт, 28.03.2024, 21:53
Приветствую Вас Гость | RSS
Главная | Куча вопросов от новичка. - Страница 2 - Форум | Регистрация | Вход
Форма входа
Логин:
Пароль:
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Форум » Технические форумы » Hercules » Куча вопросов от новичка.
Куча вопросов от новичка.
XOpenДата: Вт, 26.07.2011, 19:27 | Сообщение # 16
Генерал-майор
Группа: Администраторы
Сообщений: 325
Репутация: 4
Статус: Offline
Ну тогда вот:

10.7 ISPF considerations

z/OS provides sample ISPF primary option menus with SDSF and other elements and
features already added, as described in the program directory. If you want to add SDSF to
your own customized ISPF menu, you should add text to the body for the SDSF menu
option, for example:

S SDSF System Display and Search Facility

and update the ZSEL statement in the PROC section, as shown in the following except. The
lines added for SDSF are shown in bold.

.
.
.
7,'PGM(ISPYXDR) PARM(&ZTAPPLID) SCRNAME(DTEST) NOCHECK'
8,'PANEL(ISRLPRIM) SCRNAME(LMF)'
9,'PANEL(ISRDIIS) ADDPOP'
10,'PGM(ISRSCLM) SCRNAME(SCLM) NOCHECK'
11,'PGM(ISRUDA) PARM(ISRWORK) SCRNAME(WORK)'
S,'PANEL(ISFSDOP2) NEWAPPL(ISF) SCRNAME(SDSF)'
X,EXIT
SP,'PGM(ISPSAM) PARM(PNS)'
' ',' '
*,'?' )
IF (&ZCMD = 'S')
&ZSEL = 'PGM(ISFISP) NOCHECK NEWAPPL(ISF) SCRNAME(SDSF)'
IF (&ZCMD = 'S.')
&ZSEL = 'PGM(ISFISP) NOCHECK NEWAPPL(ISF) SCRNAME(SDSF)'

If you want to be able to invoke SDSF as a command from within ISPF, you can add SDSF
to the ISPF command table. For example, you could add this entry:

Verb T Action
SDSF 0 SELECT PGM(ISFISP) NEWAPPL(ISF) SCRNAME(SDSF)
 
akostДата: Вт, 26.07.2011, 19:29 | Сообщение # 17
Admin
Группа: Администраторы
Сообщений: 617
Репутация: 5
Статус: Offline
Quote (Sha_Lun)
Кстати, админу. Мне кажется, будет лучше если в http://s390soft.org.ru/.s/src/css/341.css в блок .codemessage начинающийся с 322 строки, добавить:
font-family: Courier, "Courier New", monospace;
Если, конечно, движок юкоза позволяет править файлы, я просто не в курсе.
Сорри за оффтоп.

Админ не будет порицать за оффтоп, поскольку у админа просто не доходили руки это сделать. Хотя не всем моноширинный шрифт может понравится, мы же не только фрагменты консолей приводим. В общем, сделал. Посмотрим.
 
XOpenДата: Вт, 26.07.2011, 19:30 | Сообщение # 18
Генерал-майор
Группа: Администраторы
Сообщений: 325
Репутация: 4
Статус: Offline
Люди напомните где лежит ISR@PRIM панель которую человеку поправить и надо?
 
akostДата: Вт, 26.07.2011, 19:34 | Сообщение # 19
Admin
Группа: Администраторы
Сообщений: 617
Репутация: 5
Статус: Offline
а ежели просто так
=6 (переход в среду команд)
SDSF

А?
 
akostДата: Вт, 26.07.2011, 19:35 | Сообщение # 20
Admin
Группа: Администраторы
Сообщений: 617
Репутация: 5
Статус: Offline
Quote (XOpen)
Люди напомните где лежит ISR@PRIM панель которую человеку поправить и надо?

у меня лежит в ISP.SISPPENU
 
XOpenДата: Вт, 26.07.2011, 21:37 | Сообщение # 21
Генерал-майор
Группа: Администраторы
Сообщений: 325
Репутация: 4
Статус: Offline
Quote (akost)
а ежели просто так
=6 (переход в среду команд)
SDSF

А?

Лучше всего!! Можно только выдать на консоли D PROG,LNKLST чтобы убедиться что ISF.SISFLOAD в списке.

Кстати, уважаемый, следующее сообщение в выводе D A,L:
DB9GMSTR DB9GMSTR IEFPROC NSW S
намекает что вам уже поставили DB2 v9 и даже запустили.


Сообщение отредактировал XOpen - Вт, 26.07.2011, 21:42
 
andreДата: Ср, 27.07.2011, 01:22 | Сообщение # 22
Рядовой
Группа: Проверенные
Сообщений: 4
Репутация: 0
Статус: Offline
Как я вижу из скриншота, e IBMUSERA процедура загрузки ISPFPROC. Надо посмотреть, какие еще в системе существуют процедуры загрузки пользователей TSO. Возможно, в другой процедуре будет панель запуска SDSF. В SYS1.PROCLIB(JES2) см пар-р PROC01 DD - Библиотеки, где нужно искать процедуры пользователей.
=6 (Командная строка) SR CLASS(TSOPROC) - узнать, какие процедуры пользователей TSO
Затем в самой процедуре ISPFPROC Вы найдете DD, где описываются библиотеки панелей. Там и надо искать ISR@PRIM
 
AlexVДата: Ср, 27.07.2011, 11:09 | Сообщение # 23
Лейтенант
Группа: Проверенные
Сообщений: 58
Репутация: 0
Статус: Offline
SDSF запущен. Но в меню его, возможно, нет? Кстати, он может прятаться на втором и далее уровне... Желательно поискать по всем меню.

Другой путь. Но не исключает первого.
В ISPF/PDF введи команду TSO ISRDDN. Должен появиться экран "Current Data Set Allocations".
Там найди DDName ISPPLIB. Напротив имени введи "В". в новом экране введи команду "L ISF". Должен появиться список:
ISF@PRI4
ISFAACT
ISFAARR
ISFABKS и т.д.

Если есть - значит панели распределены. Ну а если нет... В колонке Lib заодно можно посмотреть, где в конкатенации лежат панельки.

Сам SDSF (точнее, связь ISPF с сервером) инициируется командой:
ACTION RUN(ISRROUTE) PARM('SELECT PGM(ISFISP) NOCHECK NEWAPPL(ISF)')
Она выдаётся из какой-то панельки. Если найти эту строку в библиотеке панелек, то можно будет определить, с какого экрана она даётся. Дело это хлопотное. Но как ещё найти, помимо первого пути, слёту в голову не приходит.
В помощь будет ещё одна команда ISPF - PANELID. Если ввести эту команду в каком-либо экране, в левом верхнем углу появится имя этого экрана. Далее - находим это имя в библиотеке панелей и смотрим содержимое.

Что бы наоборот, найти имя в тексте неизвестного раздела, используется Utilities-14. Search-For. (Хотя на мой взглят удобнее пользоваться SCANPDS, но для его использованияя нужно этот REXX скопировать к себе в SYSEXEC или SYSPROC).

Пока что примерно так...
Дальнейшее зависит от результатов.

Добавлено (27.07.2011, 10:28)
---------------------------------------------
Кстати, если в панельке "Current Data Set Allocations" ввести команду LINKLIST, то можно увидеть так же LINKLIST и LPALIB.

Добавлено (27.07.2011, 10:32)
---------------------------------------------

Quote (XOpen)
Люди напомните где лежит ISR@PRIM панель которую человеку поправить и надо?


Вообще-то она может лежать где угодно и называться тоже по-разному. Мы ж не знаем, кто и что делал на этих резидентах.
Имя панели можно узнать через PANELID. Потом - TSO ISRDDN, ищем DDName, Browse (View), Locate.

Добавлено (27.07.2011, 11:09)
---------------------------------------------
Ещё пара замечаний для Sha_Lun, если он надумает править панели.
Вообще-то это было бы самым радикальным и простым решением. Но для работы с панелями нуден некоторый опыт и знание некоторых нюансов.

Во-первых, никогда не нужно править оригинальные коды. Всегда нужно использовать перекрытие. Потому, следует завести свою библиотеку панелей и включить её в список панелей первой. Скопировать туда нужную панель и потом уже править копию. Правильность написания панелей лучше всего проверять - 7 Dialog Test, 2 Panels.

Во-вторых. Язык описания панелей хоть и вылитый CLIST, но имеет особенность - ошибка на одну позицию может привести к тому, что оператор IF будет работать совсем не так, как предполагалось. Каждая строка тела IF должна быть смещена относительно оператора на одинаковое число позиций. Если тело состоит из одной строки - проблем нет, но в общем случае такую ошибку бывает очень сложно найти.

В-третьих. В самой панели используются часто неотображаемые символы, влияющие на представление и интерпретацию данных. Поэтому лучше всего было бы скопировать подходящую строку и поправить её, нежели писать её руками с нуля. (Для посмотреть такие символы используется команда редактора HEX/HEX OFF).

В-четвёртых. Панели как правило кэшируются. Поэтому не всегда изменения в панелях приводят к видимому результату. А иногда дело кончается абендом. Так что если после правки панели изменений не видно - лучше всего перелогонится.

Пока что это вспомнилось.

 
XOpenДата: Ср, 27.07.2011, 12:05 | Сообщение # 24
Генерал-майор
Группа: Администраторы
Сообщений: 325
Репутация: 4
Статус: Offline
Quote (AlexV)
Вообще-то она может лежать где угодно и называться тоже по-разному. Мы ж не знаем, кто и что делал на этих резидентах.
Имя панели можно узнать через PANELID. Потом - TSO ISRDDN, ищем DDName, Browse (View), Locate.

Имелось в виду, что у него стандартный демо билд в котором еще не ступала нога сиспрограммиста. У меня то панель и лежит абы где, а него все шансы быть в стандартной либе.
 
AlexVДата: Ср, 27.07.2011, 12:27 | Сообщение # 25
Лейтенант
Группа: Проверенные
Сообщений: 58
Репутация: 0
Статус: Offline
Скорее всего это так и есть. Но в любом случае (мало бы что!) не мешает знать, как в общем случае решать такие проблемы.
 
Sha_LunДата: Ср, 27.07.2011, 13:05 | Сообщение # 26
Рядовой
Группа: Проверенные
Сообщений: 12
Репутация: 0
Статус: Offline
Quote (akost)
а ежели просто так
=6 (переход в среду команд)
SDSF

Работает! ))

Quote (andre)
=6 (Командная строка) SR CLASS(TSOPROC) - узнать, какие процедуры пользователей TSO

Code
BBOPROC  
DBSPROC  
DBSPROC8
DBSPROC9
DYNISPF  
IKJACCNT
ISPFLITE
ISPFPROC
OMVSPROC


Quote (andre)
В SYS1.PROCLIB(JES2) см пар-р PROC01 DD - Библиотеки, где нужно искать процедуры пользователей.

В SYS1.PROCLIB нету JES2, там есть JES2O и JES3CIO
Code
//PROC01   DD  DSN=VENDOR.PROCLIB,DISP=SHR
//         DD  DSN=SVTSC.PROCLIB,DISP=SHR  
//         DD  DSN=LVL0.PROCLIB,DISP=SHR   
//         DD  DSN=SYS1.PROCLIB,DISP=SHR  

Добавлено (27.07.2011, 13:05)
---------------------------------------------
Попробовал залогиниться как SYSADM:

Code
ICH70001I SYSADM   LAST ACCESS AT 02:58:57 ON WEDNESDAY, JULY 27, 2011
IKJ56455I SYSADM LOGON IN PROGRESS AT 02:59:28 ON JULY 27, 2011        
IKJ56457I LOGON FAILED JCL ERROR IN LOGON PROCEDURE                    
IKJ56470I SYSADM LOGGED OFF TSO AT 02:59:28 ON JULY 27, 2011           
IKJ56400A ENTER LOGON OR LOGOFF-                    

SYSOPR аналогично.
Кстати, я тормоз, в =M есть SDSF. В общем попасть туда можно через =M.5
Но вот DB2 я не нашел.
 
AlexVДата: Ср, 27.07.2011, 13:16 | Сообщение # 27
Лейтенант
Группа: Проверенные
Сообщений: 58
Репутация: 0
Статус: Offline
Quote (Sha_Lun)
а ежели просто так
=6 (переход в среду команд)
SDSF

Работает! ))


Отож. Только вот я заметил, что работает с ограничениями. У меня в частности не работает KEYS, а значит нельзя переназначать клавиши. Хотя, наверное, можно, но не так просто. Весьма возможно, что есть ещё какие-либо ограничения. Скорее всего это потому, что SDSF запускается не как ISPF приложение. Но могут быть и другие причины, просто это первое, что пришло в голову.

Так что всё-равно придётся либо искать, где зарыт вызов SDSF, либо самому править панель.

Добавлено (27.07.2011, 13:11)
---------------------------------------------

Quote (Sha_Lun)
Кстати, я тормоз, в =M есть SDSF. В общем попасть туда можно через =M.5
Но вот DB2 я не нашел.


DB2 скорее всего не кастомизировали. В инструкции по установке должно быть написано как в ISPF вставить все причиндалы.

Относительно ошибок JCL - это нужно смотреть логи. Вероятно тоже ничего не настроено - не хватает каких-либо наборов данных или что-то вроде.

Добавлено (27.07.2011, 13:13)
---------------------------------------------
Кстати, раз уж SDSF запускается, найди свою логон-процедуру, там в JESYSMSG (вроде бы) должно быть написано, из какой библиотеки она стартует.

Добавлено (27.07.2011, 13:16)
---------------------------------------------
Прошу пардону, я хотел сказать про JES2. Из JESYSMSG можно узнать, откуда запускается.

 
stas9132Дата: Ср, 27.07.2011, 14:12 | Сообщение # 28
Сержант
Группа: Проверенные
Сообщений: 24
Репутация: 0
Статус: Offline
Quote (Sha_Lun)
Но вот DB2 я не нашел.


А что искал? SPUFI?

Ссылка на документацию с DB2

https://www-304.ibm.com/support/docview.wss?uid=swg27011656

В Installation Guide описан процесс установки и кастомизации ISPF панелей.
Мне непонятно одно адресное пространство,
на 9.1. всегда получалось минимум 4 если не ошибаюсь,
может какая-то жутко урезанная или старая версия.
Так что советую переставить DB2, ну или создать ещё один инстанс.

Если есть какие-нибудь тулзы, документация здесь

https://www-304.ibm.com/support/docview.wss?uid=swg27020910
 
Sha_LunДата: Ср, 27.07.2011, 16:06 | Сообщение # 29
Рядовой
Группа: Проверенные
Сообщений: 12
Репутация: 0
Статус: Offline
Я просто скачал ADCD с торрентов, ничего я там не устанавливал и не менял.
Quote (AlexV)
JESYSMSG

Это что вообще и где его искать?
 
AlexVДата: Ср, 27.07.2011, 16:27 | Сообщение # 30
Лейтенант
Группа: Проверенные
Сообщений: 58
Репутация: 0
Статус: Offline
Quote (Sha_Lun)
JESYSMSG

Это что вообще и где его искать?


В SDSF каждое задание представлено отдельной строкой. Если напротив имени задания ввести "?", то задание будет представлено DD карточками (для каждой своя строчка). Теперь можно ввести "S" и смотреть. В принципе, это можно рассматривать средство фильтрации. Что бы не смотреть весь вывод от задания, можно вопросиком "раскрыть" его и смотреть только то, что действительно интересует.
Для каждого задания есть как минимум три DD карты:
JESMSGLG - это системный вывод, т.е. что задание выводит на консоль а также сообщения системы, касаемые данного задания.
JESJCL - это обработанный JCL.
JESYSMSG - здесь можно найти много интересного, в том числе какие н.д. распределялись и где, работа каждого шага и прочее.
Для каждой карты, определённой в задании, будет дополнительная строчка с именем этой карты. Здесь можно смотреть, что задание выводит на эту DD.

Добавлено (27.07.2011, 16:27)
---------------------------------------------
Глянь личные сообщения.

 
Форум » Технические форумы » Hercules » Куча вопросов от новичка.
Поиск: