异步消息使用的样本程序
COBOL 中的这组样本程序向您显示 IBM® MQ 异步消息使用和回调例程在 CICS® 环境中的工作方式。 要使用 IBM MQ 异步消息使用，必须具有 V 7 或更高版本的 IBM MQ。 样本程序随 IBM MQ提供。
运行样本注册客户机程序以注册三个回调例程 (即事件处理程序和两个消息使用者) ，并启动异步消息使用。 然后，可以使用样本消息传递客户机程序将消息从 CICS 终端发送到 IBM MQ中的队列和主题，以供两个消息使用者异步使用。 您可以使用这些消息来指示其中一个消息使用者注销，恢复或暂挂回调例程，或者停止异步消息使用。
| 样本程序 | 函数 | 操作 |
|---|---|---|
| CSQ4CVRG | 注册客户机 | 注册事件处理程序和消息使用者。 在 CICS 事务 MVRG 下运行。 |
| CSQ4CVPT | 消息传递客户机 | 将消息发布到主题或将控制消息发送到队列。 在 CICS 事务 MVMP 下运行。 |
| CSQ4CVCN | 基本消息的消息使用者 | 使用在主题 News/Media/Movies下发布的 IBM MQ 消息。 |
| CSQ4CVCT | 控制消息的消息使用者 | 使用来自 SAMPLE.CONTROL.QUEUE 队列并发出相应的 MQCB 或 MQCTL 命令以停止异步消息使用或注销，恢复或暂挂回调例程。 |
| CSQ4CVEV | 事件处理程序 | 当发生影响整个回调环境 (例如，队列管理器停止或停顿) 的情况时，从 IBM MQ 接收通知。 |