CICS-控制操作

简介

CICS（Customer Information Control System）是IBM公司开发的一种事务处理系统。它旨在提供高度可靠的在线交易处理，使得多个应用程序可以交互式地进行通信，并通过CICS的控制操作进行管理。CICS可以运行在多种操作系统上，包括z/OS、VSE/ESA、VM/CMS等等。

控制操作是CICS系统的一部分，它使得程序员可以使用CICS提供的API去操作CICS的各种资源，例如文件、队列、屏幕、交易、虚拟存储器等等。这些API都以EXEC CICS语句的形式出现在程序中。

EXEC CICS指令的组成

EXEC CICS指令由以下几部分组成：

• EXEC CICS 关键字：表示这是一个CICS控制操作。
• 动态链接库关键字：表示所调用的动态链接库。一个CICS模块必须指定其依赖的所有系统模块和第三方模块。
• 动态链接选项：指定动态链接的一些参数，例如共享库、静态链接、延迟链接等。
• API关键字：表示要执行的API名称。
• API参数：各种可选和必需的API参数，用于影响API调用的行为和结果。

下面是一个简单的例子：

EXEC CICS SEND
     MAP('MAP1')
     INTO(DATA-AREA-1)
END-EXEC

这个例子展示了CICS中的SEND API。它指示CICS将屏幕显示为名为“MAP1”的映射，并将其内容放入DATA-AREA-1存储区。

CICS API类别

CICS API可以分为以下几类：

• 文件访问API：用于对VSAM、QSAM和TDQ文件进行操作。
• 事务API：用于控制应用程序的交互式事务处理。
• 安全API：用于管理安全性和验证。
• 屏幕API：用于管理CICS中定义的屏幕和映射。
• 队列API：用于管理各种CICS队列。
• 虚拟存储器API：用于控制各种存储器管理功能。

API示例

下面展示一些常用的CICS控制操作API：

• SEND：用于向屏幕发送屏幕映射。
• RECEIVE：用于从屏幕接收键入的数据。
• RETURN：用于返回到调用程序。
• LINK：用于调用CICS的另一个程序。
• XCTL：用于将控制转移到另一程序，并覆盖当前程序。

SEND和RECEIVE配合使用可以创建交互式屏幕所需的所有功能，例如字段输入和消息显示。下面是一个SEND API的例子：

EXEC CICS SEND
     MAP('MAP1')
     INTO(DATA-AREA-1)
END-EXEC

这个代码片段展示了如何在屏幕上显示名为“MAP1”的映射，并将输入放入一个名为DATA-AREA-1的存储区。

总结

CICS控制操作提供了许多API，使程序员可以轻松地访问CICS资源并与其他应用程序交互。这些API使用EXEC CICS语句进行调用，并提供广泛的功能集，包括文件访问、屏幕管理、队列管理等等。熟练掌握CICS控制操作API可以帮助程序员在CICS环境中开发高效的事务处理应用程序。