Как звонить, отправлять и получать информацию с/на панель (ISPF) в COBOL

У меня есть панель ISPF с именем MYPANEL, созданная с двумя переменными: одна для ввода с именем INV (заполняется пользователем) и одна для вывода с именем OTV (заполняется программой). Что мне нужно, так это пример с программой COBOL, как вызвать панель, как получить переменную INV и как отправить переменную OTV со значением INV + 'выход'.


panel mainframe cobol ispf
person Higinio Fuentes    schedule 15.02.2019    source источник
comment
Попробуйте использовать команду ispf edit model (в командной строке редактирования spf). Это создаст пример кода + содержит справочную информацию о различных вызовах ISPF.   -  person Bruce Martin    schedule 15.02.2019
comment
Вы используете службу display (ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/), чтобы отобразить панель   -  person Bruce Martin    schedule 15.02.2019
comment
Вы используете VDefine (ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/) для определения переменных. В rexx это намного проще   -  person Bruce Martin    schedule 15.02.2019
comment
Чтобы уточнить первый комментарий Брюса Мартина, 1) убедитесь, что вы редактируете профиль COBOL (надеюсь, PDS с квалификатором последнего уровня COBOL); 2) на панели МОДЕЛЬ вы хотите посмотреть на V1, V2, V3 и D1, и вам также понадобится W1.   -  person zarchasmpgmr    schedule 16.02.2019

Ответы (1)


arrow_upward
3
arrow_downward

Много лет назад у ISPF было руководство с примерами. Вот ссылка на пример COBOL из руководства ISPF 4.2 (примерно 1995 год или около того).

https://www.ibm.com/support/libraryserver_os390/handheld/BOOKS/ISPEXM01/1.2.10.2?SHELF=ez239700&DT=19950613095341&CASE=

При использовании VDEFINE в COBOL (или любом другом языке) следует помнить, что это определяет хранилище для ISPF. ISPF ожидает, что хранилище останется до тех пор, пока не будет выполнено VDELETE или не исчезнет пул функций, созданный службой SELECT. Поэтому будьте осторожны при вызове подпрограммы для выполнения VDEFINES и последующем возврате к программе. Хранилище вызываемых подпрограмм, которое было VDEFINE, все еще должно принадлежать основной программе COBOL, иначе вы можете получить 0C4.

person Marv Knight    schedule 18.02.2019