1

我创建了一个 REXX 程序来从表中获取 3 列。

我保留了临时变量来保存 SQL 值（根据输入采用自动数据类型）它就像：

 ADDRESS DSNREXX "EXECSQL FETCH C1 INTO :IN, :CR, :TN"

现在我已经创建了一个面板，但我只知道我们分配了选项。这就像给予

 %option_name

但是还没有任何书籍或在线论坛关于如何将这些 REXX 程序变量显示到屏幕上。

有些论坛仅用于调用具有自己功能的面板。

4

1 回答 1

3

在 ISPF 面板中，任何 8 个字符的 rexx 变量都可以使用&var 显示。格式或在其前面加上字段定义字符（例如 _ 表示输入字段）。例如

雷克斯：

 v1 = '...'
 v2 = '..'
 v3 = '.'

ISPF 面板：

)body
+  V1 = &v1.        Display the value (... will be displayed)  
+  v2 :_V2     +    Allow the user to update v2

请参阅http://publib.boulder.ibm.com/infocenter/zvm/v5r4/index.jsp?topic=/com.ibm.zvm.v54.dmsa3/ispfpan.htm

示例 ispf 面板定义

)BODY
%---------------------------  EMPLOYEE RECORDS  ------------------------------
%COMMAND ===>_ZCMD
%
%EMPLOYEE SERIAL: &EMPSER
+
+   TYPE OF CHANGE%===>_TYPECHG  +  (NEW, UPDATE, OR DELETE)
+
+   EMPLOYEE NAME:
+     LAST   %===>_LNAME          +
+     FIRST  %===>_FNAME          +
+     INITIAL%===>_I+
+
+   HOME ADDRESS:
+     LINE 1 %===>_ADDR1                                    +
+     LINE 2 %===>_ADDR2                                    +
+     LINE 3 %===>_ADDR3                                    +

如果显示多于 1 行，您可能会发现它很有用

  • 将返回的行添加到ISPF 表
  • 使用TBDISPL服务显示表。
  • 注意：对于表格显示面板，您必须为表格中的数据包含一个 )Model 部分

如果您想使用 ISPF 表，请参阅http://rexxpertise.blogspot.com.au/2011/11/ispf-tables-defining-and-building.html以获取TBCREATE和TBADD的示例

还有一个复杂的例子 ISPF 表

看看问题

一般 ISPF 信息可在以下网址获得：

于 2014-09-12T02:50:58.360 回答