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

Question

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

Answer 1

Много лет назад у 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.