panel - 如何在 COBOL 中从面板 (ISPF) 呼叫、发送和接收信息

Question

我有一个名为 MYPANEL 的 ISPF 面板，它使用 2 个变量创建：一个用于名为 INV 的输入（由用户填充），另一个用于名为 OTV 的输出（由程序填充）。我需要的是一个带有 COBOL 程序的示例，关于如何调用面板、如何接收变量 INV 以及如何发送值为 INV +“输出”的变量 OTV。

Answer 1

许多年前，ISPF 曾经有一个示例手册。这是 ISPF 4.2 手册（大约 1995 年左右）中 COBOL 示例的链接。

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

在 COBOL（或任何语言）中使用 VDEFINE 时要记住的一件事是，它定义了 ISPF 的存储。ISPF 期望存储一直存在，直到 VDELETE 完成或 SELECT 服务创建的函数池消失。因此，在调用例程执行 VDEFINES 然后返回程序时要小心。VDEFINE 的调用例程存储必须仍由主 COBOL 程序拥有，否则您可以获得 0C4。