精通cobol－－9.3.1 OCCURS语句的使用方法

最新推荐文章于 2022-05-29 19:15:22 发布

原创

最新推荐文章于 2022-05-29 19:15:22 发布 · 7.2k 阅读

4 ·

CC 4.0 BY-SA版权

文章标签：

#cobol #存储 #工作

本文介绍了Cobol编程中OCCURS语句的使用，强调了它不能用于01级数据类型之后，并提供正确使用示例。通过将OCCURS放在表的列中，可以简化代码并有效地定义重复数据条目。

OCCURS语句的语法格式如下。

OCCURS n TIMES.

其中，“n”为一个整型数据类型，指明了重复的次数。“TIMES”是该语句固定格式的一部分内容，不可任意指定。OCCURS语句用于在数据部的工作存储节定义表，并且OCCURS不能出现在01级数据类型后。例如，以下代码就错误地使用了

最低0.47元/天解锁文章

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

COBOL_OS

关注关注

0
点赞
踩
4

收藏

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

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

利用cobol 的occurs 表特性，打印分析报表

shenghuiping2001的专栏

10-21

2206

今天在家，实现了有cobol 来对数据进行处理，打印报表，对数据的过滤，分析很有用，下面先看一下打印的结果： C:\MinGW\local\bin>C:\2012\cobol_t\test\SAMPLE_25 0 5 10 15 20 25 30 (恖) +----+----+----+----+----+--

精通COBOL－－16.3.1 基本程序结构

COBOL

04-29

1861

　　基于CICS的COBOL程序同样是通过EXEC标识符将CICS命令嵌入其中的。一下为CICS命令在COBOL中的表示方式：EXEC CICS …… /*此处为嵌入的相关CICS命令*/ END-EXEC.此外，基于CICS的COBOL程序在结构上同普通COBOL程序略有不同。在基于CICS的COBOL程

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

精通COBOL－－11.5.1 静态调用的基本概念

COBOL

04-29

1880

　　静态调用发生时通常需要具有两个条件。其中一个条件是使用CALL literal。另一个条件是程序被编译时使用NODYNAM和NODLL选项，静态调用最基本的特征是子程序和主程序一并链接，存放于同一个加载模块（Load Module）中。也就是说，子程序在被调用之前，已经存在于内存之中了。基于这一点，在静态调用中，主要有以下几个方面需要注意。q 当某一程序被多次静态调用时，

COBOL入门到精通

平平淡淡，戒急用忍，一生学闭嘴。

07-07

3394

书籍地址：https://github.com/openmainframeproject/COBOL-programming-course 还记得前阵子，新泽西州州长 Phil Murphy 在新闻发布会上说，紧急聘退休的COBOL程序员么？这条新闻一出，很多人纷纷表示，要重新拿起COBOL书本开始学习。程序员的效率总是如此的高，这不，这两天就有一本COBOL书籍登上了Github热榜。该教程目标读者是那些想要学习COBOL编程工作理解的初学者。它描述了如何使用包括带有Zowe和Z Open E.

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

COBOL

04-18

3190

这里需要说明的是，使用OCCURS语句只是避免了重复书写相类似的定义代码。OCCURS语句并没有压缩定义数据的存储空间。数据的存储空间大小和不使用OCCURS语句时，定义数据的存储空间大小是相同的。通过下面的图解可以更直观的说明这一点。首先，使用OCCURS语句定义一个普通结构的表，代码如下。01 TEST-TABLE-TWO 05

精通cobol－－9.3 定义表语句OCCURS

COBOL

04-18

2496

从前面所述已经可以看到，定义一个表关键是通过OCCURS语句进行的。OCCURS语句定义了表中条目的重复次数。拥有可重复的数据条目结构是表区别于其他数据结构的本质特征。因此，可以直观地根据是否具有OCCURS语句，来判断该数据结构是否为表。

书籍 - 《精通COBOL》

大道至简

05-29

411

个人评价：综合6（还可以去了解一些cobol的知识）内容：7 （知识还可以，但是我没有cobol的环境，也只能了解一些知识）排版文字章节：8（知识介绍还可以）价格：9（目前只能买一些旧书，价格还可以）重读价值：4 本书主要讲的是cobol的基础知识。本书目录： 1.cobol简介 2.程序结构 3.常用语句 4.基本数据类型 5.字符串及其操作 6.基本运算 7.流程控制 8.数据的排序与合并 9.cobol中的表 10.程序的调试与测试 11.子程序调用 12.cobol中的面向对象技术 13

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

05-23

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

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

03-30

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

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

06-21

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

精通COBOL：大型机商业编程技术详解.pdf

05-29

精通COBOL：大型机商业编程技术详解

精通COBOL——大型机商业编程技术详解PDF

10-11

内容是关于COBOL技术的，已经由PDG转化为PDF。

精通cobol课程PDF

05-01

cobol从入门到精通学习，以及ＰＰＴ。对于学习大型机是一种非常好的资源。

精通COBOL－－16.4.1 伪会话程序的基本概念

COBOL

04-29

3025

精通COBOL－－16.4.1 伪会话程序的基本概念伪会话程序是相对于会话程序发展而来的。会话程序将会不间断地等待从终端接受数据，直到程序结束。而伪会话程序则只在终端有输入时才激活，并不会始终占用资源以等待从终端接受数据。图为二者的区别。由此可见，伪会话程序相对于会话程序最大的好处在于不会占据任务资源等待用户的输入。例如，在银行ATM自动取款机取款时，用户输入密码后有时会考虑究竟

精通COBOL－－11.6.1 动态调用的基本概念

COBOL

04-29

1842

　　动态调用发生的情况有两种。其中一种情况是使用CALL literal，并且程序被编译时使用DYNAM和NODLL选项。另一种情况是使用CALL identifier，并且程序被编译时使用NODLL选项。并且，当使用CALL identifier时，即使使用了NODYNAM选项，仍然是动态调用。与静态调用相对应，动态调用最基本的特征是主程序与子程序并不在同一加载模块中。动态调用中的子程序

COBOL......6

技术的死亡

03-06

768

COBOL语言之数组数组子句(OCCURS 子句) OCCURS 子句指定数据项为固定项目数或可变项目数的数组。OCCURS 子句不能用于01 和77 层的项目，但可以用于基本或组合数据项目。如： 01 TIME-WORKED. 03 WEEK PIC 9 OCCURS 7 （T...

精通COBOL－－11.8 小结

COBOL

04-29

1246

　　本章在学习完单一COBOL程序的基础上，介绍了如何在多个程序之间进行互相调用的概念和方法。COBOL中程序的调用通常也称为子程序调用。本章首先介绍了子程序调用的基本作用和特点，其后分别从三个方面对子程序调用进行了讲解。第一个方面是从调用关系的角度出发，将调用过程中所涉及到的程序分为两类。其中一类为主调用程序，另一类为被调用程序。关于主调用程序和被调用程序，需要掌握各自程序中参数的定义、

精通COBOL－－16.6.3 MAP的应用

COBOL

04-29

2692

　　在COBOL中对MAP的应用，主要可分为发送MAP和接受MAP两种情况。其中发送MAP就是将MAP在CICS屏幕中显示出来。发送MAP时可选择只发送物理MAP还是只发送符号MAP。其中只发送物理MAP的代码如下：EXEC CICS SEND MAP(‘TESTMA’) MAPSET(‘MAPSETA’)

代码7-1 过拟合及其抑制.ipynb