z/OS上的CICS事务服务器使用指南

本指南将介绍如何使用z/OS上的CICS事务服务器以及如何编写示例代码和释义。

示例代码

以下是一个简单的CICS示例代码，它将从终端读取一条消息并将其发送到CICS事务服务器。

IDENTIFICATION DIVISION.
PROGRAM-ID. MYPROG.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. IBM-370.
OBJECT-COMPUTER. IBM-370.
DATA DIVISION.
WORKING-STORAGE SECTION.
01  WS-MSG         PIC X(80).
LINKAGE SECTION.
01  DFHCOMMAREA.
    05  CA-MSG     PIC X(80).
PROCEDURE DIVISION.
MAIN.
    DISPLAY 'ENTER MESSAGE:'.
    ACCEPT WS-MSG.
    EXEC CICS
        SEND TEXT FROM(WS-MSG)
    END-EXEC.
    STOP RUN.

以下是对示例代码中使用的关键字和命令的释义。

• IDENTIFICATION DIVISION. - 程序的标识部分。
• PROGRAM-ID. - 程序的名称。
• ENVIRONMENT DIVISION. - 程序运行的环境。
• CONFIGURATION SECTION. - 程序的配置信息。
• SOURCE-COMPUTER. - 程序编写所使用的计算机类型。
• OBJECT-COMPUTER. - 生成的目标代码所运行的计算机类型。
• DATA DIVISION. - 程序中定义的所有数据。
• WORKING-STORAGE SECTION. - 程序中使用的工作区域。
• LINKAGE SECTION. - 程序与其他程序之间交换数据的区域。
• DFHCOMMAREA. - 用于CICS事务服务器与程序之间传递数据的区域。
• PROCEDURE DIVISION. - 程序的主要逻辑部分。
• EXEC CICS - 执行CICS事务服务器命令。
• SEND TEXT FROM(WS-MSG) - 将WS-MSG中的文本发送到CICS事务服务器。

本指南介绍了如何使用z/OS上的CICS事务服务器以及如何编写示例代码和释义。希望这些信息能帮助你更好地了解和使用CICS事务服务器。

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com