- ISPPROF определен, и LISTA STATUS его показывает
- в трассе нет ни SVC 19 (OPEN), ни SVC 22 (OPEN TYPE=J), то есть программа даже не пытается открывать ISPPROF.
Если не распределять ISPPROF и удалить набор PDF.PROF.TSOUSER, то при старте ISPF выдает следющий замечательный текст:
Код: Выделить всё
Mы paды пpивeтcтвoвaть Bac в зaмeчaтeльнoм пpoдykтe ISPF/PDF
Пo вoпpocaм, cвязaнным c aдaптaциeй eгo в cиcтeмe SVS 7.1 пpocьбa oбpaщaтьcя
к B.Б.Жopницкoмy, г.Mocквa, Teл. 262-15-68
A тeпepь нaжмитe "BBOД" и пpиcтyпaйтe к paбoтe
Код: Выделить всё
Дaннaя вepcия пpeдпoлaгaeт иcпoльзoвaниe SPF/PDF coвмecтнo
c пaкeтoм "CEPBИC/TSO". (cepвиcнaя пpoгpaммa IKJDAIR и
cepвиcныe имeнa cиcтeмныx pecypcoв). Ecли Bы xoтитe пpимeнять
SPF/PDF бeз пaкeтa "CEPBИC/TSO" (a зpя !!), тo oбpaтитecь к
paзpaбoтчикy.
P.S. Я убрал часть этих доморощеных модификаций, а именно, удалил STC IHAVEDD и привел процедуру LOGON в нормальный вид, с EXEC PGM=IKJEFT01 (монитор команд TSO) вместо EXEC PGM=ADDTIOT (которая, по идее, копирует элементы DD из IHAVEDD и затем стартует IKJEFT01), но это ничего не изменило, т.е. без VM рабоает, а под VM - нет. Я понимаю, как работает эта конструкция (STC IHAVEDD + ADDTIOT), но совершенно не понимаю, зачем нужно было тратить усилия на изобретение этого трехколесного велосипеда? Неужели не было других занятий?