精通cobol－－9.3.2 使用OCCURS语句得到的表空间结构

最新推荐文章于 2023-09-17 13:06:16 发布
VIP文章 最新推荐文章于 2023-09-17 13:06:16 发布
阅读量3k 收藏
点赞数
文章标签： cobol 存储
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/COBOL_OS/article/details/2303326
版权

    这里需要说明的是，使用OCCURS语句只是避免了重复书写相类似的定义代码。OCCURS语句并没有压缩定义数据的存储空间。数据的存储空间大小和不使用OCCURS语句时，定义数据的存储空间大小是相同的。

通过下面的图解可以更直观的说明这一点。首先，使用OCCURS语句定义一个普通结构的表，代码如下。

01   TEST-TABLE-TWO             

     05     TEST-ROW           OCCURS 3 TIMES.        

          10     TEST-ITEM-ONE     PIC  X (1).

最低0.47元/天 解锁文章
COBOL_OS
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
cobol-programming-course:有关COBOL的“入门”级别课程的培训材料和实验室
03-19
COBOL编程课程 该项目是针对z / OS上的COBOL的一组培训材料和实验室。该存储库中提供了以下书籍。首先，请按照各自的自述文件中的步骤进行操作。 已发行 孵化 如果您遇到任何问题，请随时联系我们的。 讨论 您可以通过多种方式与社区建立联系... 贡献 拉请求是欢迎的。对于重大更改，请先打开一个问题以讨论您要更改的内容。 所有贡献必须与保持一致，包括在所有提交上都有DCO签名。 管治 在定义该项目公开管辖 。 学分 课件材料是通过IBM，其客户和American River College的联合合作提供的，并由IBM提议作为一个新项目。 视频课程链接
cobol-praticas
03-17
Este repositorioédedicado para armazenar alguns exemplos de algoritmos rotineiros de codigo COBOL。 嵌套的示例文件，示例性的嵌套的示例文件。
proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器
05-23
基于ProLeap ANTLR4的COBOL解析器 这是一个基于的COBOL解析器，它为COBOL代码生成抽象语法树（AST）和抽象语义图（ASG）。 AST以语法树结构表示普通的COBOL源代码。 ASG通过语义分析从AST生成，并提供数据和控制流信息（例如，变量访问）。 EXEC SQL，EXEC SQLIMS和EXEC CICS语句被提取为文本。 该解析器是受测试驱动开发的，通过了NIST测试套件，已成功应用于银行和保险业的许多COBOL文件。 :dizzy: 如果您喜欢我们的工作，请加星号。 例子 输入：COBOL代码 Identification Division. Program-ID. HELLOWORLD. Procedure Division. Display "Hello world". STOP RUN. 输出：抽象语法树（AST） (startRul
cobol-js-emscripten
03-08
COBOL-> WebAssembly概念验证 这是将COBOL构建为WebAssembly的概念证明 怎么运行的 生成并安装GNU Multiprecision Library （对GNUCOBOL的依赖） 生成并安装 构建GMP的LLVM位码版本 构建libcob的LLVM位码版本 使用GnuCOBOL将COBOL源转换为C 使用构建WebAssembly（和辅助JS），链接GMP和libcob位码 测试出来 整个开发环境包含在.devContainer目录中。 使用Docker和VSCode的可靠地重现此环境 现场演示
COBOL-Source-Viewer:使用 Web 浏览器查看和导航 COBOL 源文件
06-21
目前，该脚本读取 COBOL 源文件并将其包装在 HTML 中，从而允许在 Web 浏览器中查看。 由于它是很久以前编写的，因此需要进行大量更新才能使处理更加合理。 设置 ＃＃＃下载 下载并在本地系统上保存 csv.pl 脚本的副本。 还要确保您加载了 Perl 的副本（有关如何获取它，请参阅链接） ###创建文件夹 创建适当的文件夹结构：- mkdir ./source/code mkdir ./source/copy mkdir ./html/code mkdir ./html/copy 将所有 COBOL 代码放在 ./source/code 文件夹中，并将 COBOL copybook 代码放在 ./source/copy 文件夹中。 ###运行脚本 - 处理 COBOL 源文件 ###运行脚本 - 处理 COBOL copybook 文件
精通cobol－－9.3.1 OCCURS语句的使用方法
COBOL
04-18 6857
OCCURS语句的语法格式如下。OCCURS n TIMES.其中，“n”为一个整型数据类型，指明了重复的次数。“TIMES”是该语句固定格式的一部分内容，不可任意指定。OCCURS语句用于在数据部的工作存储节定义表，并且OCCURS不能出现在01级数据类型后。例如，以下代码就错误地使用了OCCURS语句。01   TEST-TABLE-ONE               OCCU
COBOL......6
技术的死亡
03-06 530
COBOL语言之数组 数组子句(OCCURS 子句) OCCURS 子句指定数据项为固定项目数或可变项目数的数组。OCCURS 子句不能 用于01 和77 层的项目，但可以用于基本或组合数据项目。如： 01 TIME-WORKED. 03 WEEK PIC 9 OCCURS 7 （T...
Cobol学习笔记（整理中80%）
最新发布
m0_65939803的博客
09-17 2966
01 A03 AA注释：外部文件只有数据结构，没有部节等信息。03 YMD.注释：重定义共享内存地址，一个质变了影响另一个值，不能用在文件节01层，可用在数据单元节01层，层号必须相同，长度相同，重定义子句不能赋初值。
C10-COBOL 表处理
adozoo
09-26 1021
COBOL 表处理 COBOL中的数组称为表。数组是一种线性数据结构，是同一类型的单个数据项的集合。表的数据项在内部进行排序。 表声明 表在数据部（Data division）中进行声明。occurs子句用于定义一个表，表示数据名称定义的重复。它只能用于02到49的级数。不要使用带有redefines的occurs子句。一维和二维表的描述如下： 一维表 在一维表中，occurs子句仅在声明中使用一次。WS-TABLE是包含表的组项。WS-A命名出现10次的表元素。 语法 以下是定义一维表的语法： 01 WS
cobol中的表（数组）
大道至简
05-21 1639
表 实际上是储存连续空间上相似数据的集合，等同于java中的数组。 按照类型不同表可分为： 下标表和索引表 定长表和变长表 下标表 01 ANNUAL-DEPOSIT-TABLE. 05 DEPOSITS PIC 9(5) OCCURES 12 TIMES. 05 DEPOSITS-SUB PIC 99 USAGE IS COMP. cobol中表的定义使用OCCURES，如上图所示，DEPOSITS定义的就是一个表，里面有十二个元素，每个长度为5。DEPOSITS-SUB是为了便于访问表中的数据
一步步Cobol 400 上手自学入门教程03 - 数据部
昕友软件博客
08-12 597
数据部的作用 程序中涉及到的全部数据（输入、输出、中间）都要在此定义，对它们的属性进行说明。主要描述以下属性：       数据类型（数值/字符）和存储形式（长度）       数据项之间的关系（层次和层号）       文件与记录的关系 数据部可以分为：      文件节（file section）：用来描述程序中用到的输入输出文件及记录中各数据项的属性...
COBOL笔记
weixin_46170854的博客
08-15 1172
COBOL笔记
COBOL中关于数组的操作
QueenJade的收录
03-28 6074
原文地址：COBOL中关于数组的操作作者：基股传话<br />一．表的概念<br />COBOL语言中的表（TABLE）类似于其他高级语言中的数组（ARRAY）。<br />表中，序号称为下标，相对地址称为位标，下标和位标称为“出现号”。<br /> <br />二．表的建立（OCCURS子句）<br />    格式：OCCURS  整数  TIMES<br />    举例：01  PRODUCT-RECORD.<br />             03 RODUCT  OCCURS  20  TIME
利用cobol 的occurs 表特性，打印分析 报表
shenghuiping2001的专栏
10-21 2088
今天在家，实现了有cobol 来对数据进行处理，打印报表， 对数据的过滤，分析很有用，下面先看一下打印的结果： C:\MinGW\local\bin>C:\2012\cobol_t\test\SAMPLE_25                    0    5   10   15   20   25   30 (恖)      +----+----+----+----+----+--
精通cobol－－9.3 定义表语句OCCURS
COBOL
04-18 2345
  从前面所述已经可以看到，定义一个表关键是通过OCCURS语句进行的。OCCURS语句定义了表中条目的重复次数。拥有可重复的数据条目结构是表区别于其他数据结构的本质特征。因此，可以直观地根据是否具有OCCURS语句，来判断该数据结构是否为表。 
COBOL基础知识
热门推荐
共享，学习，纪录
05-20 1万+
本文内容源于对IBM英文文档的理解与归纳，不保证其准确性。仅用于自学，转载请注明出处。-----------------------------------------------------------------------------------------------1．编码格式第1～６列为序号区，用于表示行号。行号不是必须的，也不必是顺序的，甚至可以是本机字符集中的任意字
COBOL
（孙）小泉
02-11 6232
  l       Countine 和 Gogack 的使用l       COBOL程序分为四个division，其中environment和data division是可选的l       Identification division 通常包含PROGRAM-ID, AUTHOR, INSTALLATION, WRRTTEN-DATE, COMPLIED-DATE. 其中pr
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
cobol I-O-CONTROL.
06-11
在COBOL程序中，使用I-O-CONTROL可以设置文件的访问模式、读写方式以及记录锁定等操作。例如，在I-O-CONTROL中设置“LOCK MODE IS AUTOMATIC”可以让程序自动加锁，保证数据的一致性。I-O-CONTROL还可以用于控制文件...

“相关推荐”对你有帮助么？

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值