精通cobol－－9.5.2 使用输入文件载入方式初始化表

最新推荐文章于 2023-11-22 22:25:07 发布
原创 最新推荐文章于 2023-11-22 22:25:07 发布 · 1.4k 阅读 · 1 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#cobol

本文介绍了在COBOL中如何使用输入文件初始化表。首先，需要一个包含初始化值的输入文件，然后在程序中定义表和文件。通过FD语句定义输入文件，接着使用READ和PERFORM VARYING语句读取文件并赋值给表，从而完成初始化。这种方式适用于数据量大且频繁使用的场景。

使用输入文件载入方式初始化表，首先需要有一个输入文件。该输入文件保存表中各数据的初始化值。将该输入文件在过程部读入后，使用前面讲到的PERFORM VARYING语句完成对表的初始化。对于硬性编码初始表所用到的例子，可以通过输入文件载入方式来初始化。首先，需要有一个输入文件，不妨假设该文件的文件名为INPUT-WEEK-FILE。该文件的内容如表所示。

表  INPUT-WEEK-FILE文件内容

MONDAY

TUESDAY
最低0.47元/天 解锁文章
COBOL_OS
关注
精选资源
proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器
05-23
该解析器是受测试驱动开发的，通过了NIST测试套件，已成功应用于银行和保险业的许多COBOL文件。 :dizzy: 如果您喜欢我们的工作，请加星号。 例子 输入：COBOL代码 Identification Division. Program-ID. HELLO...
精选资源
COBOL-Source-Viewer:使用 Web 浏览器查看和导航 COBOL 源文件
06-21
目前，该脚本读取 COBOL 源文件并将其包装在 HTML 中，从而允许在 Web 浏览器中查看。 由于它是很久以前编写的，因此需要进行大量更新才能使处理更加合理。...###运行脚本 - 处理 COBOL copybook 文件
精通cobol－－9.5.3 对表初始化的一些灵活技巧
COBOL
04-28 1652
　　掌握对表初始化的一些灵活技巧，对于实际编码将带来一定的方便之处。下面分别介绍两种常用的灵活技巧。（1）直接在01级数据项后对整张表进行初始化，方式如下。01  SAMPLE-TABLE-ONE             VALUE ‘ABCDE’.05   SAMPLE-ITEMS-ONE          PIC  X                            
精通cobol－－9.5 表的初始化
COBOL
04-28 1384
  在实际对表进行处理前，通常还要对其进行初始化。对表进行初试化可以分为硬性编码方式和输入文件载入方式两种类型。此外，还有一些初始化表的灵活技巧。以下分别进行介绍。
精通cobol－－9.5.1 使用硬性编码方式初始化表
COBOL
04-28 1618
　　使用硬性编码方式初始化表，主要是通过VALUE语句实现的。VALUE跟在每个具体数据项之后（非数据条目）。VALUE语句指定的值也就是该数据的初始化值。对表中每个数据项初始化后，也就实现了对整个表的初始化。例如，对于保存一周７天的数据的表，通过硬性编码方式初始化代码如下。01   WEEK-VALUES.      05   FILLER   PIC X(10)     VAL
MainFrame小结(20110812)--MOVE ALL与INITIALIZE（cobol)
weixin_30763455的博客
08-13 869
MOVEALL 上次说到MOVE字符类型（alphanumeric)是按左对齐原则的，但如果我想不断重复填充相同的字符呢？那就要用MOVEALL了，比如MOVEALLSPACETOWS-A，那么WS-A空间将会全被填充为空格。 MOVEALL有几个特性： MOVEALL后面的常量只能是一个字符。 MOVEALL后面跟的只能是COBOL定义的常量（如SPACE，ZERO...
COBOL 学习笔记 之 入門篇
weixin_33762130的博客
03-31 234
       時間過的真快，轉眼三個月就過去了，在學習cobol過程中竟然沒有做筆記，但是這並不奇怪，因爲學習一種語言最好的方式是實踐，儅你了解基本的語法和編程思想之後，去看程序去修改程序是學習進步最快的方法。        在公司做事的最大好處是入門快,有很多前輩讓你請教,有很多程序讓你參考讓你學習,還有就是你不用愁應該寫什麽程序,公司已經設計好了,安排給你寫就行了,這對於初學者來説是最好不過了...
精选资源
COBOL-SpringXD-Source:读取COBOL大型机文件的源
05-22
COBOL-SpringXD-源 读取COBOL大型机文件的源 该项目需要安装一些Maven Central中不可用的依赖项。 在此处从SourceFordge下载JRecord： ：//jrecord.sourceforge.net/JRecord02.html $ mvn install:install-file -...
Cobol学习笔记（整理中80%）
m0_65939803的博客
09-17 6022
01 A03 AA注释：外部文件只有数据结构，没有部节等信息。03 YMD.注释：重定义共享内存地址，一个质变了影响另一个值，不能用在文件节01层，可用在数据单元节01层，层号必须相同，长度相同，重定义子句不能赋初值。
COBOL 学习笔记 之 入門篇(续集)
weixin_34050005的博客
04-12 154
书接上一回(COBOL 学习笔记 之 入門篇 )从程序可以看到,COBOL程序分为四部分：IDENTIFICATION DIVISION. ENVIRONMENT    DIVISION. DATA DIVISION. PROCEDURE DIVISION.每一个部分的作用参见教程CHAPTER 1 COBOL 概述 。这里主要看看PROCEDURE DIVISION.里面的内容，这才是核心，首先...
COBOL......7
技术的死亡
04-02 950
初始化语句(INITIALIZE 语句) INITIALIZE 语句将数据项的值设置为初始值。如果不指定要设置的数 据项数值，则数字和数字编辑型数据初始化为0，其它所有数据项初始 化为空格。 INITIALIZE 语句的一般形式： INITIALIZE 数据名 [REPLACING ALPHABETIC ALPHANU...
COBOL学习
黎明前的黑暗
09-15 1万+
COBOL概述           什么是COBOL语言：            COBOL是Common Business Oriented Language的缩写，是面向商业通用编程语言。它是专门为商业数据处理而设计的计算机高级程序语言。广泛用于数据管理领域。应用于多个行业如：银行，证券，金融，制造，等等。            COBOL程序的基本结构：
cobol基本动词
小安然的博客
11-22 561
基本动词用于过程部中的数据处理。每个语句总是以cobol动词开头。
COBOL中数组操作
张铖@南通
12-15 6489
下面是数组的例子：          01 RECORD-X.            03 MONTH OCCURS 12 TIMES.              05 NAME PIC X(12).              05 DAYS OCCURS 31 TIEMS.                07 COMMENT PIC X(20).                07 TEMP-H
COBOL笔记
weixin_46170854的博客
08-15 1612
COBOL笔记
COBOL
qq_46029070的博客
07-21 4379
cobol
COBOL语法和文法(2)
张铖@南通
12-15 4558
ACCEPT    从键盘或其他输入设备读取数据。    ACCEPT A FROM DEV.    从DEV读取数据到A，也可以省略FROM DEV，表示从键盘读取。    ACCEPT A FROM DATE/DAY/DAY-OF-WEEK/TIME.读取日期，表示为6个字符，如990909（1999年9月9日）。    读取当前日期在年度（前2位）中为第几天（后3位），表示为6个字符，如19
COBOL 教程
zhaozj610的专栏
12-07 4877
COBOL 教程 - -目录CHAPTER   1 COBOL 概述 CHAPTER   2 过程部初步 CHAPTER   3 标识部和环境部 CHAPTER   4 数据部之一 CHAPTER   5 过程部之二 CHAPTER   6 过程部之三 CHAPTER   7 各部之间的关系及程序举例 CHAPTER   8 联机及批量程序的一些差异 CHAPTER   9 COBOL 编
COBOL 知识点集锦（下）
热门推荐
lanyanjiayu的专栏
06-05 1万+
知识点集锦（下）" alt="COBOL  知识点集锦（下）" src="http://blog.blogchina.com/template/common/img/array.gif" style="line-height:20px; border-right-width:0px; border-top-width:0px; border-bottom-width:0px; border-lef
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
表情包 代码片
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值