使用z/OS CICS API在COBOL程序中获取系统日期
作者:佚名
上传时间:2023-04-27
运行软件:COBOL
软件版本:z/OS V2.4
版权申诉
本示例展示了如何在z/OS上使用CICS API来获取系统日期。代码使用COBOL编写,通过调用CICS API获取当前日期,并将其打印到控制台。该代码适用于z/OS操作系统。
IDENTIFICATION DIVISION.
PROGRAM-ID. GETDATE.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-DATE PIC 9(8).
PROCEDURE DIVISION.
MAIN-PROCEDURE.
EXEC CICS
RETURN
TRANSID(' ')
COMMAREA(WS-DATE)
LENGTH(8)
END-EXEC.
DISPLAY WS-DATE.
STOP RUN.
免责申明:文章和图片全部来源于公开网络,如有侵权,请通知删除 server@dude6.com
用户评论
相关推荐
使用z/OS CICS API在COBOL程序中获取系统日期
本示例展示了如何在z/OS上使用CICS API来获取系统日期。代码使用COBOL编写,通过调用CICS API获取当前日期,并将其打印到控制台。该代码适用于z/OS操作系统。IDENTIFICAT
z/OS V2.4
COBOL
2023-04-27 18:06
在z/OS上使用CICS链接程序
该示例代码演示了如何在z/OS上使用CICS链接程序。链接程序是由多个模块链接的程序,包括编译的源代码和目标代码。CICS链接程序可以提供代码模块的重用性和共享性,减少了存储和加载的开销,提高了程序执
z/OS V2R4
CICS
2023-04-27 06:20
CICS FOR COBOL
小弟是新会员所以积分要了一分,以增强一下地位,这个资料是英文的还不错。
PDF
0B
2018-12-20 11:07
使用z/OS的CICS API检索数据
本示例代码展示了如何使用z/OS的CICS API从CICS交易中检索数据。首先需要初始化CICS API控制块,并指定需要检索的字段。然后通过EXEC CICS读取API指令读取CICS数据。最后,
z/OS V2.3
CICS API
2023-03-14 17:36
使用z/OS CICS API实现交易处理
该示例代码展示了如何使用z/OS CICS API实现基于交易的处理。它利用CICS API中的EXEC CICS START TRANSID指令,将用户请求发送到CICS事务处理程序中,CICS再将
z/OS V2R3
IBM CICS Transaction Server for z/OS
2023-04-30 18:20
在z/OS系统上使用COBOL编程
COBOL(全称Common Business Oriented Language)是一种面向业务的编程语言,广泛应用于企业应用程序的开发。在z/OS操作系统上,COBOL是一种重要的编程语言,本文将
z/OS V2R4 COBOL V6.3
Mainframe Express
2023-03-27 16:16
在z/OS平台运行CICS事务
在z/OS平台上运行CICS事务需要注意一些关键点。以下是一个示例代码,包括代码释义和总结。示例代码//TRANX JOB ,'TRANSACTION',MSGCLASS=X//UTILS EX
IBM z/OS 2.4
CICS应用程序
2023-03-22 23:52
在z/OS上运行COBOL程序
本文将介绍如何在z/OS操作系统上运行COBOL程序,包括z/OS COBOL编译器和运行环境,以及提供示例代码和代码释义。z/OS COBOL编译器z/OS操作系统提供了COBOL编译器,可用于
z/OS V2.4
IBM z/OS
2023-03-12 05:22
在z/OS上调试COBOL程序
在z/OS上调试COBOL程序需要使用专门的调试工具。以下是一些z/OS COBOL调试工具的示例代码和代码释义:z/OS COBOL调试工具Interactive Debug Control
z/OS 2.4+
IBM Debug Tool
2023-03-22 11:17
在z/OS上使用COBOL编写系统级应用程序
本文旨在介绍如何在IBM z/OS操作系统上使用COBOL编写系统级应用程序。以下是示例代码和代码释义,以及总结。示例代码IDENTIFICATION DIVISION.PROGRAM-ID.
z/OS V2.5, COBOL for z/OS V6.3
IBM z/OS
2023-03-14 14:07