UPDATE IMS 命令
使用 UPDATE IMS 命令来更新本地和全局 IMS 属性,其中包括 IMSplex 中的区域,数据库和事务的全局状态。 您还可以使用 UPDATE IMS 命令使 IMS 能够使用 IMSRSC 存储库。
要更改 IMSplex 中的全局 PLEXPARM 值,请使用 UPDATE IMS SET(PLEXPARM()) 命令。 要在 IMSplex 中的一个或多个 IMS 系统中更改本地 LCLPARM 值,请使用 UPDATE IMS SET(LCLPARM()) 命令。
子节:
环境
下表列出了可以从中发出 UPDATE IMS 命令和关键字的环境 (DB/DC , DBCTL 和 DCCTL)。
| 命令/关键字 | DB/DC | DBCTL | DCCTL |
|---|---|---|---|
| 更新 IMS | X | X | X |
| 集合 | X | X | X |
| 选项 | X | X | X |
语法
关键字
以下关键字对 UPDATE IMS 命令有效:
- LCLPARM ()
- 指定要修改的局部参数的值。 LCLPARM () 关键字与 UPDATE IMS SET() 命令中的 PLEXPARM () 关键字互斥。
UPDATE IMS SET(LCLPARM()) 命令可用于修改每个 IMS 系统上的本地参数,例如 FPBP64STAT 。
对于 UPDATE IMS SET(LCLPARM()) 命令,从 OM 接收该命令的所有 IMS 系统都会处理该命令。
指定下列其中一个选项:
- AUTOEXPORT (N)
- 指定应禁用系统检查点期间的自动导出处理。 AUTOEXPORT 关键字在具有或不具有 IMSRSC 存储库的 DRD 环境中有效。
对于启用了 RDDS 数据集的 DRD 用户,在成功迁移到存储库之后,可以使用 UPDATE IMS SET(LCLPARM(AUTOEXPORT(N))) 命令。 此命令可减少系统检查点自动导出的处理器使用率。
AUTOEXPORT (N) 如果同时启用了 IMSRSC 存储库 和 RDDS ,那么将关闭对这两个存储库的自动导出。 如果在 IMS 关闭期间自动导出到存储库期间发生错误,那么可以使用 UPDATE IMS SET(AUTOEXPORT(N)) 命令关闭自动导出到存储库,然后重试 IMS 关闭。
UPDATE IMS SET(AUTOEXPORT(N)) 命令所做的更改仅在 IMS 重新启动之前保持有效。 要永久更改 IMS中的 AUTOEXPORT 设置,请修改 DFSDFXXX PROCLIB 成员中的 AUTOEXPORT 设置。
发出带有 AUTOEXPORT (N) 关键字的 UPDATE IMS 命令后,可以在 EXPORT 和 IMPORT 命令上以及在自动导入期间继续使用系统 RDDS 数据集。 但是,在导入和自动导入期间,请确保 RDDS 包含当前数据,尤其是在关闭 AUTOEXPORT 时。
自动导出到 RDDS 和/或 IMSRSC 存储库可由 IMS 的冷启动启用,并且为 DFSDFxxx PROCLIB 成员指定了 AUTOEXPORT = RDDS | REPO | AUTO。
通过对 DFSDFxxx PROCLIB 成员指定 AUTOEXPORT = N ,然后启动 IMS,可以启用到 RDDS 的自动导出。
- FPBP64STAT
- 指定是否将从属区域的每个工作单元 (UOW) 的快速路径 64 位缓冲区使用情况统计信息写入 OLDS。 快速路径 64 位缓冲区使用情况记录在 X'5945 ' 日志记录中。
- N
- 不将 X'5945 ' 日志记录中从属区域的每个工作单元的快速路径 64 位缓冲区使用情况统计信息写入 OLDS。
- Y
- 将 X'5945 ' 日志记录中从属区域的每个工作单元的快速路径 64 位缓冲区使用情况统计信息写入 OLDS。
- 锁定时间
- 指定 IMS LOCKTIME 值。 可以通过下列关键字和参数的任意组合来指定 LOCKTIME 值:
- BMP (xx)
- 指定 IMS 在 BMP 区域的锁定请求超时之前等待的时间量。 BMP 区域包括 IMS BMP 和 JBP 区域。 该值表示时间 (以秒为单位) ,范围为 1-32767。
- BMPOPT (ABEND | STATUS)
- 指定 IMS 是异常结束超时任务 (ABEND) 还是向应用程序返回状态码 (STATUS)。
- MSG (yy)
- 指定 IMS 在对 MSG 区域的锁定请求超时之前等待的时间量。 MSG 区域包括 IMS MPP , JMP 和 IFP 区域以及 DRA 线程。 该值表示时间 (以秒为单位) ,范围为 1-32767。
- MSGOPT (ABEND | STATUS)
- 指定 IMS 是异常结束超时任务 (ABEND) 还是向应用程序返回状态码 (STATUS)。
更新 IMS LOCKTIME 值不会影响 IRLM中的锁定超时值。 要更改 IRLM中的锁定超时值,请使用现有 MODIFY IRLM 命令。
建议: 通常,对 IMS 和 IRLM使用相同的超时值。 在 IMS中使用两个值时,将 IRLM 超时值设置为两个 IMS 值中的较低值将允许 IMS 和 IRLM 一起操作。 向同一 IRLM标识多个 IMS 时,工作负载条件可能需要在整个 IMS 系统中使用不同的超时值。 在这种情况下,请注意以下事项:- 在 IRLM 中使用较低的超时值会导致锁定请求等待,直到等待时间等于最低的 IMS LOCKTIME 值。
- 在 IRLM 中使用更高的超时值会导致锁定请求等待超过 IMS 时间,因为在超过 IRLM 超时值之前, IRLM 不会调用 IMS 。
- REPO (Y)
- 使 IMS 能够使用存储库。
- REPOTYPE (IMSRSC)
- 要启用的存储库类型。 REPO (Y) 需要 REPOTYPE。
在命令处理期间, IMS 将连接到存储库服务的 RM ,以使 IMS 能够使用该存储库。 如果未启用 RM 以使用存储库,那么 UPDATE IMS 命令将导致错误。 必须首先通过发出 UPDATE RM 命令来启用 RM 以使用存储库。
要禁用存储库,必须冷启动 IMS 。
初始化 IMS 时,仅当在 DFSDFxxx PROCLIB 成员的 REPOSITORY 部分中定义了 REPOSITORY = (TYPE = IMSRSC) 语句时,才会启用存储库使用。 因此,成功处理 UPDATE IMS SET(LCLPARM(REPO(Y) REPOTYPE(IMSRSC)) 命令时,必须在任何 IMS 重新启动之前添加 REPOSITORY = (TYPE = IMSRSC) 语句,因为我们只能在 IMS 冷启动期间禁用存储库的使用。
在 IMS 重新启动期间,如果 IMS 日志记录指示在重新启动之前已启用 IMSRSC 存储库 ,并且未定义 REPOSITORY = (TYPE = IMSRSC) 语句,那么 IMS 将终止并返回 U0168 异常终止代码和 X’1C’ 错误代码。
对于 XRF 复合体,在 IMS 活动系统上输入命令会导致在 IMS 备用系统上处理该命令。 成功完成该命令需要 IMS 活动系统和备用系统都在其各自 DFSDFxxx PROCLIB 成员的 REPOSITORY 部分中添加 REPOSITORY = (TYPE = IMSRSC) 语句。
在 IMS 连接到 IMSRSC 存储库之后,如果在 IMS 初始化期间使用的 DFSDFxxx 成员中显式指定了 AUTOEXPORT = AUTO 或 REPO ,那么还会启用到 IMSRSC 存储库 的自动导出。
自动导出是根据 DFSDFxxx 成员中指定的 AUTOEXPORT_IMSID= 值完成的。 如果未在 DFSDFxxx 成员中指定 AUTOEXPORT_IMSID= ,那么针对自动导出将 AUTOEXPORT_IMSID 设置为 THIS_IMS。
如果您希望 AUTOEXPORT_IMSID=ALL ,那么必须修改 DFSDFxxx 成员以添加存储库部分,并且必须重新启动 AUTOEXPORT_IMSID=ALL 和 IMS 。
如果未在 DFSDFxxx 成员中显式指定 AUTOEXPORT = AUTO 或 REPO ,那么 UPD IMS 命令不会启用自动导出到 IMSRSC 存储库 。 必须修改 DFSDFxxx 成员以添加 AUTOEXPORT = AUTO 或 REPO 和 AUTOEXPORT_IMSID= 关键字并重新启动 IMS。
- ZHyperWrite
- 指定是否为 OLDS 或 WADS 启用 IBM zHyperWrite。
- OLDS
- 指定是否为 OLDS 启用 IBM zHyperWrite。
- Y
- IBM zHyperWrite 将用于OLDS。
- N
- IBM zHyperWrite 不能用于OLDS。
- WADS
- 指定是否为 WADS 启用 IBM zHyperWrite。
- Y
- IBM zHyperWrite 将用于WADS。
- N
- IBM zHyperWrite 不适用于 WADS。
如果你发布 UPDATE IMS SET(LCLPARM(ZHYPERWRITE()))命令为 OLDS 启用或禁用 zHyperWrite ,该命令只对 IMS 打开的后续 OLDS 有效,对已经打开的 OLDS 无效。 要迫使 IMS 打开新的OLDS,以便立即开始或停止使用 zHyperWrite ,请两次发送 /SWITCH OLDS 命令。
如果您发出 UPDATE IMS SET(LCLPARM(ZHYPERWRITE())) 命令来启用或禁用WADS zHyperWrite ,该命令IMS 下一次写入WADS时生效。
UPDATE IMS SET(LCLPARM(ZHYPERWRITE())) 命令可在不IMS 的情况下动态启用或禁用WADS和OLDS zHyperWrite。 但是,不会记录 UPDATE IMS SET(LCLPARM(ZHYPERWRITE())) 命令,这意味着如果 IMS 重新启动,那么您使用 UPDATE IMS SET(LCLPARM(ZHYPERWRITE())) 命令所做的任何更改都不可恢复。 如果希望更改在 IMS 重新启动之间持久存在,请更新 DFSDFxxx 成员的 LOGGER 部分中的 ZHYPERWRITE 参数。
建议 :如果您想更改此参数的值,并希望更改后的值在重启后仍保持不变,请在 DFSDFxxx 成员的 LOGGER 部分更新 ZHYPERWRITE 参数,然后发出 UPDATE IMS SET(LCLPARM(ZHYPERWRITE())) 命令以动态更改 zHyperWrite。 这样,如果 IMS 失败并且必须重新启动,那么将使用更新后的值重新启动该 IMS。
- PLEXPARM ()
- 指定要修改的全局参数的值。 LCLPARM 关键字与 UPDATE IMS SET() 命令中的 PLEXPARM 关键字互斥。
UPDATE IMS SET(PLEXPARM()) 命令可用于修改 IMSplex 中维护的区域,数据库和事务的全局状态。 如果该命令成功,那么将更新 RM 全局 PLEXPARM 条目中的值以及在每个 IMS 系统中维护的值。
对于 UPDATE IMS SET(PLEXPARM()) 命令, IMSplex 中的所有 IMS 系统都会接收该命令,但只有命令主 IMS 会处理该命令。 非主 IMS 系统不会处理从 OM 发送的命令。 相反,命令主 IMS 会在 IMSplex 中的所有 IMS 系统之间协调更改。
指定以下一个或多个资源:- GSTSAREA
- 指定如何在 IMSplex 中维护区域状态。
- N
- 没有为 RM 中的区域资源维护全局状态。 将删除区域资源的 RM 中的所有全局状态。
- Y
- RM 中的区域资源保持全局状态。 全局状态在后续 UPD AREA SCOPE(ALL) 命令或包含 GLOBAL 关键字的 type-1 区域命令上保持。
- GSTSDB
- 指定如何在 IMSplex 中维护数据库状态。
- N
- 没有为 RM 中的数据库资源维护全局状态。 将删除 RM 中数据库资源的所有全局状态。
- Y
- 为 RM 中的数据库资源维护全局状态。 全局状态在包含 GLOBAL 关键字的后续 UPD DB SCOPE(ALL) 命令或 type-1 数据库命令上保持。
- GSTSTRAN
- 指定如何在 IMSplex 中维护事务状态。
- N
- 没有为 RM 中的事务资源保留全局状态。 将删除 RM 中事务资源的所有全局状态。
- Y
- 为 RM 中的事务资源维护全局状态。 全局状态在后续 UPD TRAN SCOPE(ALL) 命令上保持。
- 选项 ()
- 指定 UPDATE IMS SET 命令的选项。
- CONTINUE
- 指示 IMS 应继续处理先前输入的 UPDATE IMS SET 命令,该命令在完成之前迂到错误。 该命令必须位于允许继续处理的位置,否则该命令将异常中止。
如果指定了 OPTION (CONTINUE) ,那么不能在 PLEXPARM 参数上传递任何参数。
- FORCE
- 当 UPD IMS 命令由于备用数据库未完成重新启动处理而失败时,可在 DBCTL 热备用环境中使用 OPTION (FORCE)。 如果指定了 OPTION (FORCE) ,那么即使 IMS 处于重新启动方式,也可以完成 UPD IMS 命令。 当指定 OPTION (FORCE) 时,处于重新启动方式的 IMS 不会参与并更新 UPD IMS 值; 此选项仅允许 UPD IMS 命令在其他 IMS 系统上完成。 DBCTL 备用数据库在重新启动以变为活动状态时重新读取全局条目,以获取当前 PLEXPARM 值。 如果在非 DBCTL 备用系统未完成重新启动时使用 OPTION (FORCE) ,那么结果可能与预期不符,因为 IMS 未运行 UPD IMS 命令。 这可能导致错误,因为 PLEXPARM 值不匹配。
使用说明
UPDATE IMS SET 命令是必须通过 OM API 发出的 type-2 命令。 该命令对 OM 定义为 ROUTE=ALL。 OM 将该命令路由到 IMSplex 中的所有 IMS 系统。 此命令不是可恢复命令。
只有在XRF备用系统上,才会从日志记录中处理命令,该系统读取XRF主系统的 X'220E' ,以便与XRF主系统保持同步。 即使在 XRF 环境中,如果发生接管并且需要重新启动 IMS (/ERE 或 /NRE) ,那么不会恢复该命令。 它要求更改 DFSDFxxx PROCLIB 成员以在 REPOSITORY 部分中包含 REPOSITORY = (TYPE = IMSRSC) 语句。 否则, IMS 将以 U0168 异常终止代码和 X’1C’ 错误代码终止。
通常,当接收到 UPDATE IMS 命令的非零返回码时,必须输入 UPD IMS SET(PLEXPARM()) OPTION(CONTINUE) 命令,这将指示 IMS 完成该命令或取消该命令并根据需要进行清除。 UPD IMS SET(PLEXPARM()) OPTION(CONTINUE) 命令的原因码可能指示原始 UPD IMS 命令的状态。 如果命令无法确定原始 UPD IMS 命令的状态,那么原因码指示该事实。 用户可以使用 QUERY IMS 命令来查找全局 IMSplex 参数的状态。
如果在 UPD IMS 命令处理期间迂到错误,那么在发出 UPDATE IMS SET(PLEXPARM()) OPTION(CONTINUE) 命令并成功完成之前,无法处理另一个新的 UPD IMS 命令。
如果未解决导致接收到 UPDATE IMS 命令的非零返回码的错误情况,那么 UPDATE IMS SET(PLEXPARM()) OPTION(CONTINUE) 命令将继续迂到相同的错误情况。 必须先解决错误情况,然后才能清除该命令并输入另一个 UPDATE IMS 命令。
此命令在 FDBR 系统或 XRF 备用系统上无效。 但是, FDBR 系统和 XRF 备用系统在内部维护全局 PLEXPARM 值,并使用 QUERY IMS SHOW (PLEXPARM) 命令报告其值。 FDBR 系统返回完成代码 ICC_NA 或 1。 允许 UPD IMS 命令在其他 IMS 系统上完成。
如果 IMS 正在重新启动,那么不允许使用 UPD IMS SET 命令。 该命令失败,返回码为 "B0"。 必须在 IMS 完成重新启动处理后发出 UPD IMS 命令。
指定 REPO (Y) 时,某些错误条件会导致 DFS3308E, DFS4400E, DFS4457E或其他错误消息作为命令应答中的消息输出发送。 这些消息可用于帮助诊断错误原因。
- zHyperWrite 必须在 z/OS®中启用。 使用 z/OS 命令 DISPLAY IOS,HYPERWRITE 查看 zHyperWrite 是否已为 z/OS启用。
- 主数据集卷和辅助数据集卷都必须处于由 HyperSwap®管理的 Metro Mirror 关系中。
- 必须将 OLDS 定义为扩展格式数据集。
输出字段
- 短标签
- 包含 XML 输出中生成的简短标签。
- 长标签
- 包含 XML 输出中生成的长标签。
- 关键词
- 标识导致生成字段的命令上的关键字。 对于始终返回的输出字段,将显示 N/A。 对于仅在发生错误时返回的输出字段,将显示 error 。
- Scope
- 标识输出字段的作用域。
- 含义
- 提供输出字段的简要描述。
| 短标签 | 长标签 | 关键词 | Scope | 含义 |
|---|---|---|---|---|
| 抄送 | 抄送 | 不适用 | 不适用 | 输出行的完成代码。 将始终返回完成代码。 |
| LPARM | LclParmName | LCLPARM | LCL | 要更改的本地参数的名称。 根据在命令中输入的内容,可能会更改此参数的多个子参数。 |
| MBR | MbrName | 不适用 | 不适用 | 构建输出行的 IMS 的 IMS 标识。 始终返回 IMS 标识。 |
| CCTXT | CCText | 不适用 | LCL | 返回完成代码文本以提供有关完成代码的更多信息。 CC 文本可以包含来自服务的返回码。 仅当完成代码非零时,才会返回 CC 文本。 |
| 参数名称 | ParmName | 参数名称 | LCL | 要更改的全局参数的名称。 根据在命令中输入的内容,可以更改此参数的多个子参数。 |
| REPOTP | RepositoryType | LCLPARM 和 REPO | LCL | 存储库的类型。 |
返回码,原因码和完成代码
可以作为 UPDATE IMS 命令的结果返回的返回码和原因码是通过 OM API 输入的所有命令的标准代码。
下表包含返回码和原因码以及代码的简要说明。 针对该命令返回的返回码或原因码还可能指示来自 CSL 请求的错误。
| 返回码 | 原因码 | 含义 |
|---|---|---|
| X'00000000 ' | X'00000000 ' | UPDATE IMS 命令已成功完成。 |
| X'00000004 ' | X'00001000 ' | 由于 IMS 系统不是命令主系统,因此未在 IMS 系统上处理 UPDATE IMS 命令。 未返回任何资源信息。 |
| X'00000004 ' | X'00001020 ' | UPD IMS OPTION(CONTINUE) 已完成清除,但状态未知。 用户必须重做或重新发出该命令。 |
| X'00000008 ' | X'00002004 ' | 在 UPDATE IMS SET() 命令中同时指定了 LCLPARM 和 PLEXPARM 关键字。 LCLPARM 和 PLEXPARM 是互斥关键字。 |
| X'00000008 ' | X'00002008 ' | 在 UPDATE IMS 命令上既未指定 PLEXPARM 关键字,也未指定 LCLPARM 关键字。 为全局参数指定 PLEXPARM ,为局部参数指定 LCLPARM。 |
| X'00000008 ' | X'00002040 ' | 未处理 UPDATE IMS 命令,因为未指定过滤器,过滤器无效或过滤器数量不足。 |
| X'0000000C' | X'00003004 ' | 没有成功的请求。 |
| X'00000010 ' | X'00004000 ' | 未处理 UPDATE IMS 命令,因为 IMS 重新启动未完成。 |
| X'00000010 ' | X'00004004 ' | 无 CQS 地址空间。 |
| X'00000010 ' | X'0000400C' | 命令在 XRF 备用项上无效。 |
| X'00000010 ' | X'00004018 ' | 没有资源结构,或者资源结构不可用。 |
| X'00000010 ' | X'0000401C' | 命令在 FDBR 区域上无效。 |
| X'00000010 ' | X'00004100 ' | 资源结构已满。 |
| X'00000010 ' | X'00004104 ' | 未处理 UPDATE IMS 命令,因为 RM 不可用。 |
| X'00000010 ' | X'00004108 ' | 未处理 UPDATE IMS 命令,因为 SCI 不可用。 |
| X'00000010 ' | X'00004124 ' | 未处理 UPDATE IMS 命令,因为正在执行进程步骤。 |
| X'00000010 ' | X'00004128 ' | 未处理 UPDATE IMS 命令,因为没有正在进行的 RM 进程步骤。 |
| X'00000010 ' | X'00004200 ' | 未处理 UPDATE IMS 命令,因为正在进行 IMS 关闭。 |
| X'00000010 ' | X'00004208 ' | RENV=NO 的命令无效。 |
| X'00000010 ' | X'0000420C' | 非命令主命令上发生错误。 由于非主 IMS上发生错误,因此无法完成 UPD IMS 。 |
| X'00000010 ' | X'00004300 ' | 对于 REPO (Y) 或 AUTOEXPORT (N) ,将拒绝该命令,因为未启用动态资源定义 (MODBLK = DYN)。 |
| X'00000010 ' | X'00004501 ' | 未对存储库启用 RM。 |
| X'00000014 ' | X'00005000 ' | 未处理 UPDATE IMS 命令,因为无法获取 IMODULE GETSTOR 存储器。 |
| X'00000014 ' | X'00005004 ' | UPDATE IMS 命令处理已终止,因为无法获取 DFSOCMD 响应缓冲区。 |
| X'00000014 ' | X'00005100 ' | 由于 RM 请求错误,未处理 UPDATE IMS 命令。 |
| X'00000014 ' | X'00005104 ' | 由于 CQS 错误,未处理 UPDATE IMS 命令。 |
| X'00000014 ' | X'00005108 ' | 由于 SCI 请求错误,未处理 UPDATE IMS 命令。 |
| X'00000014 ' | X'0000510C' | 未处理 UPDATE IMS 命令,因为另一个进程正在进行中。 |
| X'00000014 ' | X'00005110 ' | 存储库错误。 |
| X'00000014 ' | X'00005FFF' | 由于发生 IMS 内部错误,因此未处理 UPDATE IMS 命令。 |
对于 UPDATE IMS 命令的处理唯一的错误将作为完成代码返回。 针对单个资源返回每个操作的完成代码。
| 完成码 | 完成代码文本 | 含义 |
|---|---|---|
| 0 | UPDATE IMS 命令已成功完成。 | |
| 1 | 命令不适用于 IMS。 | |
| 55 个 | 未安装快速路径 | 命令不适用,因为未安装快速路径。 |
| B0 | IMS 重新启动未完成。 UPD IMS 命令无法完成,因为 IMS 未完成重新启动。 您需要使用 UPD IMS SET(PLEXPARM()) OPTION(CONTINUE)终止 UPD IMS 命令。 必须在 IMS 完成重新启动处理后发出 UPD IMS SET(PLEXPARM(...)) 命令。 | |
| BB | 命令不适用,因为 RMENV=NO。 | |
| 146 | DCCtl 的关键字无效 | 命令在 DCCTL 系统中不适用。 |
| 147 | FPBP64 未启用 | 命令不适用,因为未启用快速路径 64 位缓冲区管理器。 |
示例
以下是 UPDATE IMS 命令的示例:
UPDATE IMS 命令的示例 1
UPDATE IMS SET(PLEXPARM(GSTSAREA(Y),GSTSDB(Y),GSTSTRAN(N)))Response for UPDATE IMS SET(PLEXPARM(GSTSAREA(Y),GSTSDB(Y),GSTSTRAN(N)))
ParmName MbrName CC
PLEXPARM PRODIMS1 0
PLEXPARM PRODIMS2 0
PLEXPARM SYS3 0
说明: UPD IMS 命令在 IMSplex 中的三个活动 IMS 系统 (PRODIMS1, PRODIMS2和 SYS3) 上成功处理,并且在 RM 中成功更新。
UPDATE IMS 命令的示例 2
UPDATE IMS SET(PLEXPARM(GSTSTRAN(Y)))Response for UPDATE IMS SET(PLEXPARM(GSTSTRAN(Y)))
ParmName MbrName CC GSTSTRAN
PLEXNAME PRODIMS1 0 Y
PLEXNAME PRODIMS2 0 Y
PLEXNAME SYS3 0 Y
说明: UPD IMS 命令在 IMSplex 中的三个活动 IMS 系统 (PRODIMS1, PRODIMS2和 SYS3) 上成功处理,并且在 RM 中成功更新。
UPDATE IMS 命令的示例 3
UPDATE IMS SET(PLEXPARM(GSTSTRAN(N)))Response for: UPDATE IMS SET(GSTSTRAN(Y))
MbrName CC GSTSTRAN CCText
SYS3 0 Y
PRODIMS1 0 Y
PRODIMS2 16 Y IMS TIMED OUTUPDATE IMS 命令的示例 4
UPDATE IMS SET(LCLPARM(FPBP64STAT(Y))) ParmName LclParmName MbrName CC
LCLPARM FPBP64STAT IMS1 0
LCLPARM FPBP64STAT IMS2 0说明: 在此示例中, UPDATE IMS 命令打开 FPBP64STAT 日志记录。
UPDATE IMS 命令的示例 5
UPDATE IMS SET(LCLPARM(FPBP64STAT(N))) ParmName LclParmName MbrName CC
LCLPARM FPBP64STAT IMS1 0
LCLPARM FPBP64STAT IMS2 0说明: 在此示例中, UPDATE IMS 命令关闭 FPBP64STAT 日志记录。
UPDATE IMS 命令的示例 6
UPD IMS SET(LCLPARM(LOCKTIME(MSG(40),MSGOPT(ABEND),BMP(30),
BMPOPT(STATUS)))) ParmName LclParmName MbrName CC
LCLPARM LOCKTIME IMS1 0
LCLPARM LOCKTIME IMS2 0 说明: 在此示例中, UPDATE IMS 命令更新 IMS LOCKTIME 值。
UPDATE IMS 命令的示例 7
UPD IMS SET(LCLPARM(REPO(Y) REPOTYPE(IMSRSC))) ParmName LclParmName RepositoryType MbrName CC
LCLPARM REPO IMSRSC IMS1 0
LCLPARM REPO IMSRSC IMS2 0 CMD(UPD IMS SET(LCLPARM(REPO(Y) REPOTYPE(IMSRSC))))<imsout>
<ctl>
<omname>OM1OM </omname>
<omvsn>1.5.0</omvsn>
<xmlvsn>20 </xmlvsn>
<statime>2011.190 01:45:07.574341</statime>
<stotime>2011.190 01:45:07.618879</stotime>
<staseq>C80A9624D1245C48</staseq>
<stoseq>C80A9624DC03F148</stoseq>
<rqsttkn1>USRT005 10184507</rqsttkn1>
<rc>00000000</rc>
<rsn>00000000</rsn>
</ctl>
<cmd>
<master>IMS1 </master>
<userid>USRT005 </userid>
<verb>UPD </verb>
<kwd>IMS </kwd>
<input>UPD IMS SET(LCLPARM(REPO(Y) REPOTYPE(IMSRSC))) </input>
</cmd>
<cmdrsphdr>
<hdr slbl="PARM" llbl="ParmName" scope="LCL" sort="a" key="1"
scroll="no" len="8" dtype="CHAR" align="left" />
<hdr slbl="LPARM" llbl="LclParmName" scope="LCL" sort="a" key="2"
scroll="no" len="10" dtype="CHAR" align="left" />
<hdr slbl="REPOTP" llbl="RepositoryType" scope="LCL" sort="n" key="0"
scroll="no" len="8" dtype="CHAR" align="left" skipb="yes" />
<hdr slbl="MBR" llbl="MbrName" scope="LCL" sort="a" key="3" scroll="no"
len="8" dtype="CHAR" align="left" />
<hdr slbl="CC" llbl="CC" scope="LCL" sort="n" key="0" scroll="yes"
len="4" dtype="INT" align="right" />
<hdr slbl="CCTXT" llbl="CCText" scope="LCL" sort="n" key="0"
scroll="yes" len="32" dtype="CHAR" align="left" skipb="yes" />
</cmdrsphdr>
<cmdrspdata>
<rsp>PARM(LCLPARM) LPARM(REPO ) REPOTP(IMSRSC ) MBR(IMS1) CC(
0) </rsp>
<rsp>PARM(LCLPARM) LPARM(REPO ) REPOTP(IMSRSC ) MBR(IMS2) CC(
0) </rsp>
</cmdrspdata>
</imsout> 说明: 在此示例中, IMS1 和 IMS2 支持将存储库用于 REPOTYPE=IMSRSC。 用户需要发出 QUERY IMS 命令以获取存储库名称。
UPDATE IMS 命令的示例 8
UPDATE IMS SET(LCLPARM(AUTOEXPORT(N)) ParmName LclParmName MbrName CC
LclParm AUTOEXPORT IMS1 0
LclParm AUTOEXPORT IMS2 0 说明: 在此示例中, IMS1 和 IMS2 在下一个检查点禁用了 AUTOEXPORT。
UPDATE IMS 命令的示例 9
UPDATE IMS SET(LCLPARM(ZHYPERWRITE(OLDS(Y),WADS(Y))))Response for: UPD IMS SET(LCLPARM(ZHYPERWRITE(OLDS(Y),WADS(Y))...
ParmName LclParmName MbrName CC
LCLPARM ZHYPERWRITE SYS3 0说明 :在此示例中,OLDS和WADS启用了 zHyperWrite。
