精通cobol－－9.5.1 使用硬性编码方式初始化表

最新推荐文章于 2023-09-17 13:06:16 发布

COBOL_OS

最新推荐文章于 2023-09-17 13:06:16 发布

阅读量1.5k

点赞数

文章标签： cobol 存储

本文链接：https://blog.csdn.net/COBOL_OS/article/details/2337109

版权

本文介绍了在Cobol中如何使用硬性编码方式初始化表，通过VALUE语句为每个数据项赋予初始值，然后使用REDEFINES和OCCURS创建表。以一个例子展示了初始化一周七天的表的详细步骤。

摘要由CSDN通过智能技术生成

　　使用硬性编码方式初始化表，主要是通过VALUE语句实现的。VALUE跟在每个具体数据项之后（非数据条目）。VALUE语句指定的值也就是该数据的初始化值。对表中每个数据项初始化后，也就实现了对整个表的初始化。

例如，对于保存一周７天的数据的表，通过硬性编码方式初始化代码如下。

01 WEEK-VALUES.

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

COBOL_OS

关注关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
3
评论
复制链接

分享到 QQ

分享到新浪微博

扫一扫

精通cobol－－9.5.3 对表初始化的一些灵活技巧

COBOL

04-28

1585

　　掌握对表初始化的一些灵活技巧，对于实际编码将带来一定的方便之处。下面分别介绍两种常用的灵活技巧。（1）直接在01级数据项后对整张表进行初始化，方式如下。01 SAMPLE-TABLE-ONE VALUE ‘ABCDE’.05 SAMPLE-ITEMS-ONE PIC X

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

COBOL

04-28

1409

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

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

精通cobol－－9.5 表的初始化

COBOL

04-28

1333

在实际对表进行处理前，通常还要对其进行初始化。对表进行初试化可以分为硬性编码方式和输入文件载入方式两种类型。此外，还有一些初始化表的灵活技巧。以下分别进行介绍。

COBOL 学习笔记之入門篇(续集)

weixin_34050005的博客

04-12

126

书接上一回(COBOL 学习笔记之入門篇 )从程序可以看到,COBOL程序分为四部分：IDENTIFICATION DIVISION. ENVIRONMENT DIVISION. DATA DIVISION. PROCEDURE DIVISION.每一个部分的作用参见教程CHAPTER 1 COBOL 概述。这里主要看看PROCEDURE DIVISION.里面的内容，这才是核心，首先...

Cobol编码标准.rar

04-30

Cobol编码标准.rar

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

05-23

基于ProLeap ANTLR4的COBOL解析器这是一个基于的COBOL解析器，它为COBOL代码生成抽象语法树（AST）和抽象语义图（ASG）。 AST以语法树结构表示普通的COBOL源代码。 ASG通过语义分析从AST生成，并提供数据和控制流...

COBOL-Source-Viewer:使用 Web 浏览器查看和导航 COBOL 源文件

06-21

目前，该脚本读取 COBOL 源文件...将所有 COBOL 代码放在 ./source/code 文件夹中，并将 COBOL copybook 代码放在 ./source/copy 文件夹中。 ###运行脚本 - 处理 COBOL 源文件 ###运行脚本 - 处理 COBOL copybook 文件

java源码嵌套for循环-cobol-sharp:Cobol代码重新可视化

06-05

循环的java源码压缩科博夏普这是一种从根据 80 年代中期最佳实践编写的 ...COBOL-74 中，最好将if块限制为几个简单的语句，避免任何嵌套的if因为这可能最终会将else块与错误的if相关联。除了重复执行另一个

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

03-30

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

精通cobol－－第9章 COBOL中的表

COBOL

04-16

1452

表是一组存储在连续空间上的相似数据的集合。表可以用于减少程序员书写的代码量，方便对大量相似数据的处理，提高程序的运行效率。此外，表还有一个最重要的功能，就是对数据的查找。本章将首先介绍表的概念和用途，并重点介绍几类典型结构的表。同时，还将介绍使用表进行数据查找的一些常用方式和语句。

COBOL常量

LB 的专栏

01-19

2099

· ZERO,ZEROS,ZEROES 表示一个或多个零字符（16进制‘F0’）· SPACE,SPACES 表示一个或多个空格字符（16进制‘40’）· HIGH-VALUE,HIGH-VALUES 表示一个或多个字符具有最高值（16进制‘FF’, 2进制‘11’）· LOW-VALUE,LOW-VALUES 表示一个或

cobol-基本数据类别

大道至简

04-28

1422

基本数据类别 cobol中主要的数据类别为变量、常量、文字和结构。变量如上图所示，变量有变量名 PIC 变量的数据类型和长度组成一个变量的定义。常量常量可以分为普通常量和象征常量。普通常量通过value赋值。象征常量 01 TEST-DATE PIC X (10). MOVE ALL 'ABC' TO TEST-DATE. TEST-DATE的值就变为ABCABCAB 直接数直接赋值的值结构体一组相关的数据可以构成一个结构体 ...

Cobol学习笔记（整理中80%）

最新发布

m0_65939803的博客

09-17

4824

01 A03 AA注释：外部文件只有数据结构，没有部节等信息。03 YMD.注释：重定义共享内存地址，一个质变了影响另一个值，不能用在文件节01层，可用在数据单元节01层，层号必须相同，长度相同，重定义子句不能赋初值。

9型转x型 cobol_COBOL数据类型

weixin_29541589的博客

12-30

1272

数据分区是用来定义在该程序中使用的变量。为了描述COBOL数据，必须了解下列术语：数据名称等级数图片子句值子句01 TOTAL-STUDENTS PIC9(5) VALUE '125'.| | | || ...

一步步Cobol 400 上手自学入门教程03 - 数据部

昕友软件博客

08-12

741

数据部的作用程序中涉及到的全部数据（输入、输出、中间）都要在此定义，对它们的属性进行说明。主要描述以下属性：数据类型（数值/字符）和存储形式（长度）数据项之间的关系（层次和层号）文件与记录的关系数据部可以分为：文件节（file section）：用来描述程序中用到的输入输出文件及记录中各数据项的属性...

C10-COBOL 表处理

adozoo

09-26

1096

COBOL 表处理 COBOL中的数组称为表。数组是一种线性数据结构，是同一类型的单个数据项的集合。表的数据项在内部进行排序。表声明表在数据部（Data division）中进行声明。occurs子句用于定义一个表，表示数据名称定义的重复。它只能用于02到49的级数。不要使用带有redefines的occurs子句。一维和二维表的描述如下：一维表在一维表中，occurs子句仅在声明中使用一次。WS-TABLE是包含表的组项。WS-A命名出现10次的表元素。语法以下是定义一维表的语法： 01 WS

COBOL语法和文法(2)

张铖@南通

12-15

4334

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-85中的IF与EVALUATE语句详解

COBOL-74版本的IF语句没有明确的END-IF结束标记，但在COBOL-85及其后续版本中引入了这个结束标志，使得代码更易读。在IF语句中，THEN部分是可选的，意味着即使没有显式写出THEN，COBOL也会理解其后的语句是IF条件的...