如何通过 JCL 将参数传递给 REXX 程序

Question

我们可以将参数从 JCL 传递给 REXX 程序吗？

我想，JCL PARM 可以像我们用来向 COBOL 程序传递参数一样使用。请把你的想法放在这里......

Answer 1

您需要EXEC PGM=IRXJCL,PARM='member_name exec_args'。 SYSEXEC 应指向包含成员名称 的 PDS。 SYSTSIN 是 PULL 的输入，SYSTSPRT 是 SAY 的输出 DD

查看“使用TSO/E 和其他 MVS 地址空间中的 REXX”章节位于 “TSO/E Rexx 用户指南”一书 (SA22-7791) 了解完整示例。

Answer 2

补充说明：如果您的 REXX exec 使用 ISPF 服务，您可以使用 PGM=IKJEFTxx（xx 是变量后缀）批量运行它，并在作业步骤中分配 ISPxLIB。

Answer 3

如果参数连同 REXX 成员名称超过 100 字节，Ron Patterson 提到的方法将不起作用，因为 JCL 语法只允许最大参数长度为 100 字节。在这种情况下，我建议使用 IKJEFTxx（已由 Tony 发布）。然后，您必须将 REXX 程序名称作为流内数据传递给 SYSTSIN。该程序的参数可以简单地写在程序名称后面。当需要多行时，请使用连字符作为一行的最后一个字符来指示与下一行的连接。
例子：

//EXAMPLE  EXEC PGM=IKJEFT01,REGION=4096K,DYNAMNBR=30
//SYSPRINT DD  SYSOUT=*                              
//SYSEXEC  DD  DISP=SHR,DSN=YOUR.REXX.LIBRARY    
//SYSTSPRT DD  SYSOUT=*                              
//SYSTSIN  DD  *                                     
  SCHLABB PARAMETER1 PARAMETER2 PARAMETER3 -
          VERY_LONG_PARAMETER4             -
          LAST_PARAMETER5                                
/*                                                   
//                                                   

Answer 4

当我尝试运行 IRXJCL 时，我得到了基本 EXECIO、LIBDEF、命令的 RC (-3)。我希望有更好的文档来说明 IRXJCL 可以做什么和不能做什么。

最后按照以下链接中的方法，通过将值写入文件并从文件中读取来动态地将值传递给 REXX。 如何通过 IKJEFT01 实用程序运行动态 SQL ？