如何在REXX执行程序中堆叠ISPF命令以自动调用OMVS接口？

你可以通过以下两种方式实现需求：

方法1：在PARM参数中直接传递命令链 #

参考你手动在ISPF命令行执行的udlist ~;/逻辑，直接将包含命令分隔符的参数传递给isrdslst：

/* rexx */                              
address ispexec                         
"select pgm(isrdslst) parm('UDL ~;/')"

用单引号包裹参数，确保分号作为ISPF命令分隔符被正确解析——ISRDSSLST执行完UDL ~操作后，会自动执行后续的/命令打开OMVS接口。

方法2：使用ISPF SET CMD命令预定义后续执行命令 #

通过ISPF的SET CMD命令，指定当前程序退出后要执行的命令，这样ISRDSSLST启动完成后会自动触发/命令：

/* rexx */                              
address ispexec
"SET CMD('/')"                         
"select pgm(isrdslst) parm(UDL ~)"

为什么之前的VPUT ZCMD方法无效？ #

ZCMD变量主要用于ISPF命令行的输入捕获，而非程序启动后自动触发命令。ISRDSSLST启动后不会主动读取共享池中的ZCMD变量来执行命令，因此该方法无法达到预期效果。

内容的提问来源于stack exchange，提问作者Lionel B Dyck