精通COBOL－－16.7.1 读取文件

最新推荐文章于 2023-05-30 10:16:14 发布

原创

最新推荐文章于 2023-05-30 10:16:14 发布 · 4.8k 阅读

4 ·

CC 4.0 BY-SA版权

文章标签：

#cobol #file #table

本文介绍了在CICS环境下，如何利用COBOL读取VSAM类型的KSDS、ESDS、RRDS文件。通过FCT管理文件，并提供了示例代码展示读取单条记录及连续浏览文件的方法。

　　CICS所支持的VSAM文件主要有KSDS、ESDS、RRDS。此外，文件在CICS中由FCT（File Control Table）所统一管理。因此，在相应的COBOL程序中不用手工定义和打开文件。假设某一文件的文件名为“TESTF”，则在程序中通过CICS读取该文件的代码通常如下：

IDENTIFICATION DIVISION.

PROGRAM-ID. FREADPG.

ENVIRONMENT DIVISION.

DATA DIVISION.

WORKING-STORAGE SECTION.

01 FILE-AREA.

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

COBOL_OS

关注关注

0
点赞
踩
4

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

up关于COBOL循环读文件的问题 .txt

03-16

关于COBOL循环读文件的问题

精选资源

COBOL-SpringXD-Source:读取COBOL大型机文件的源

05-22

COBOL-SpringXD-源读取COBOL大型机文件的源该项目需要安装一些Maven Central中不可用的依赖项。在此处从SourceFordge下载JRecord：：//jrecord.sourceforge.net/JRecord02.html $ mvn install:install-file -...

参与评论您还未登录，请先登录后发表或查看评论

COBOL读写文件HELLOWORD-2

我想做一个优秀程序员

01-21

3854

000010 IDENTIFICATION DIVISION. 000020 PROGRAM-ID. FILE1. 000030 ENVIRONMENT DIVISION. 000040 INPUT-OUTPUT SECTION. 000050 FILE-CONTROL. 000060 SELECT IN-FILE 000070 ASSIGN TO "D:/INPUT.TXT". 0000

COBOL读写文件HELLOWORD

我想做一个优秀程序员

01-21

5914

培训cobol找不到多少资料，弄了一下午，才弄出一个cobol读写文件的helloword代码如下000010 IDENTIFICATION DIVISION.000020 PROGRAM-ID. FILE1.000030 ENVIRONMENT DIVISION.000040 INPUT-OUTPUT SECTION.000050 FILE-CONTROL.000060 SELECT GOODS-FILE 000070 ASSIGN TO "D:/GOODS.TXT".

cobol文件操作

HT082的专栏

06-05

3348

要在COBOL中使用文件，要在3个不同的部中放上信息。环境部，要有程序使用的每个文件的文件控制项目(FILE-CONTROL)。这个项目将程序中使用的文件名与程序外的实际文件联系起来。这些项目还定义文件的组织和访问方式。数据部，要有每个文件的文件描述符(FD)项目，就是数据定义。过程部，放上处理语句，OPEN,READ,WRITE,DELETE等。环境部中主要是FILE-CONTROL和I-O-C

cobol 文件相关语句

大道至简

04-25

1660

OPEN OPEN语句主要实现对文件的打开操作，OPEN还可以指定打开文件是输入还是输出操作。 OPEN还可以一次打开多个文件，文件之间用空格打开。 文件名必须是环境部输入、输出节中由SELECT语句所指定的文件名一致。 OPEN语句可以出现在程序中的任意位置，通常在处理的第一步如果读文件之前没有打开，程序就会异常（ABEND） CLOSE 和OPEN一样，CLOSE用于关闭已打开的文件，不过通常用于程序的结尾。 READ READ语句从文件中读取数据，将文件中的数据读到FD语句中所定义的变量中

精选资源

proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器

05-23

该解析器是受测试驱动开发的，通过了NIST测试套件，已成功应用于银行和保险业的许多COBOL文件。 :dizzy: 如果您喜欢我们的工作，请加星号。例子输入：COBOL代码 Identification Division. Program-ID. HELLO...

精通COBOL大型机商业编程技术详解.部分1

03-30

精通COBOL大型机商业编程技术详解.修订版_部分1.pdf 共两个文件，因为大于60M上传不了。就拆分成了两个文件。本文件是第一部分

open-cobol-0.30.rar_COBOL compiler_COBOL85下载_OpenCOBOL_cobol_ope

09-19

在“open-cobol-0.30.rar”这个压缩包中，包含了所有必要的文件和文档，用户只需按照提供的指南操作即可完成安装。在实际使用过程中，OpenCOBOL 0.30支持常见的COBOL85语法，并且兼容许多COBOL74和某些COBOL2002...

COBOL文件操作

张铖@南通

12-17

9017

VSAM操作笔记_COBOL操作VSAM

吴钦飞

09-30

6689

1. 概要 1.1 VSAM文件 ① 创建 ② 初始化 ③ 删除 ④打印 1.2 使用命令直接对VSAM 进行操作 1.3 COBOL中对VSAM文件的记录的 CRUD 2. VSAM文件 ① 创建 ② 初始化 ③ 删除重点: VSAM文件创建完后, 必须初始化, 即给VSAM文件装载记录注意: 作业名以 userid 开头, 否则需在 SDSF Menu

COBOL 文件状态码

山林溜达鸡的博客

05-30

664

COBOL file status

【Informatica PWC】如何利用copybook导入cobol,vsam文件

IRENE0901的博客

03-02

822

cobol系统导出的数据集通常为vsam文件,无法用普通工具直接打开查看, 为cobol文件创建源(source)时不能通过普通文件(flat file)的方式直接导入。需要借助cobol文件格式描述文件(.cbl)，里面包含cobol固定的格式段描述和copybook(包含源的字段类型长度和层组)， copybook一般在cobol提供cobol文件时会提供的可以直接用记事本打...

READNEXT与READ GTEQ的区别

ANNA

03-19

664

READNEXT和READ GTEQ可实现同样的功能，实现向下查找。但是有些区别： 1、READNEXT必须配合startbr、endbr使用；而startbr时会锁住记录，必须等待endbr释放（注：这种锁与LOCK不同，所以用unlock释放无效，必须用ENDBR释放。另，read-upd后，可以STARTBR正常）如一旦startbr成功，在endbr前，不能read-upd档...

基于CICS的COBOL程序顺序文件处理

omygege

10-29

514

CICS顺序文件处理中，使用浏览（browse）概念来进行操作。因而这些操作包括开启浏览，执行文件记录读取（正向/反向），关闭浏览等。由于是CICS命令，在COBOL中使用时，必须包含在EXEC CICS语句对中。浏览可以用于访问VSAM文件，包括PDS，ESDS, KSDS和RSDS。 1. 开启浏览（Start Browse）命令 STARTBR，命令格式： STARTBR FIL...

COBOL语言总结(一)