更新 CICSTART 成员
hlq.CICSTS56中的 CICSTART 成员。REXX.SCICEXEC 数据集包含 REXX/CICS® 环境的缺省定义。 CICSTART 在 CICS 系统启动后发出第一个使用 CICS/REXX 程序的事务时运行。
- 初始化
使用将伪会话方式设置为 off (伪 OFF) 的初始化语句,并检查 RLS 目录 (RLS CKDIR) ,如提供的 CICSTART 成员的开头所示。
- 定义 RFS 文件池提供的 CICSTART 成员定义了两个文件池:
'FILEPOOL DEFINE POOL1 RFSDIR1 RFSPOOL1 (USER' IF RC ¬= 0 THEN EXIT RC 'FILEPOOL DEFINE POOL2 RFSDIR2 RFSPOOL2 (USER' IF RC ¬= 0 THEN EXIT RC如果在步骤 创建 RFS 文件池期间更改了任何文件池名称或添加了任何文件池,请在 CICSTART exec 中对文件池定义进行相应的更改。
- 授权用户标识
提供的 CICSTART 成员授权用户标识 RCUSER。 确保 CICSTART exec 包含用于授权组织中需要它的用户的命令。
包含需要访问以格式化文件池的任何用户; 否则, FILEPOOL FORMAT 命令将失败,返回码为-4.
对于已关闭 CICS 安全性的区域 (即, SIT 参数 SEC=NO) ,请在 CICSTART 中针对 CICS 缺省用户标识包含 AUTHUSER 命令。 例如,如果区域的缺省用户标识为 SYSA ,请包含以下命令:'AUTHUSER SYSA' - 根据需要将 CICS 事务标识与 REXX 执行程序相关联
CICSTART 必须包含 DEFTRNID 语句,这些语句将 CICS 事务标识 (由 CICS DEFINE TRANSACTION 命令定义) 与它们要调用的 REXX 执行程序相关联。 提供的 CICSTART 成员将 REXX , EDIT 和 FLST 事务分别与 CICRXTRY, CICEDIT和 CICFLST execs 相关联。 这些 CICS 事务在 CICRDOR 和 CICRDOD JCL 文件中定义。 请参阅 创建资源定义。
对于为运行 REXX/CICS 事务而定义的任何 CICS 事务, CICSTART exec 必须包含 DEFTRNID 语句。
- 设置运行 REXX execs 的缺省值
包括环境所需的 SETSYS 命令。 例如,您可以设置用于在安装中运行 REXX/CICS execs 的语言,检索 PF 键和伪会话设置。
缺省情况下,伪会话方式处于开启状态 (尽管 CICSTART exec 本身必须以会话方式运行)。 有关伪会话方式的更多信息,请参阅 伪 和 与用户一起处理对话框。
- 定义帮助路径提供的 CICSTART 成员为当前帮助实用程序定义帮助路径
HELPPTH2,并为兼容性定义先前帮助工具的帮助路径HELPPTH:HELPPATH = 'POOL2:\BOOK' 'RLS VARPUT HELPPATH \SYSTEM\DEFAULTS' IF RC ¬= 0 THEN EXIT HELPPTH2 = 'POOL2:\HELP' 'RLS VARPUT HELPPTH2 \SYSTEM\DEFAULTS' IF RC ¬= 0 THEN EXIT RC对于未安装先前帮助工具的新安装,您可以除去定义
HELPPTH的三个语句。 - 根据需要使用 EXECLOAD 来预装入 Execs
可以包含用于预装入 execs 的 EXECLOAD 语句。 预装入 execs 时,可以提高性能,因为不需要为每个用户装入 exec ,并且需要更少的存储空间,因为所有并发用户都可以共享同一副本。
您可以在提供的 CICSTART 成员中使用 EXECLOAD 命令的列表,也可以将 EXECLOAD 命令用于所需的执行程序。
提供的 CICSTART 成员包含 CICEDIT, CICESVR和 CICEPROF execs 的 EXECLOAD 命令。 这些 execs 是 REXX/CICS 文本编辑器的组件,您可以在开发自己的 REXX 程序时使用这些组件,并且仅是 REXX 开发系统的一部分。 如果您的安装使用 REXX/CICS 文本编辑器,那么可以包含这些 EXECLOAD 命令。
有关更多信息,请参阅 EXECLOAD。