Question

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

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

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

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

 %option_name

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

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

Answer 1

在ISPF面板中，任何8个字符的rexx变量都可以使用＆amp; var。格式显示，或者在前面加上字段定义字符（对于输入字段说_）。 e.g。

的Rexx：

 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服务显示表格。
注意：对于表格显示面板，您必须包括a）表格中数据的模型部分

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

的示例

同样适用于complicated example ISPF Table

查看question

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

我们可以将REXX SQL输出值拉入ISPF面板吗？

1 个答案: