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

最新推荐文章于 2023-09-17 13:06:16 发布
最新推荐文章于 2023-09-17 13:06:16 发布
阅读量1.5k 收藏 2
点赞数
文章标签： cobol
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/COBOL_OS/article/details/2337119
版权
本文介绍了在COBOL编程中对表初始化的两种实用技巧，包括直接在01级数据项后初始化整张表以及直接在数据项后进行初始化，帮助提升编码效率。
摘要由CSDN通过智能技术生成

　　掌握对表初始化的一些灵活技巧，对于实际编码将带来一定的方便之处。下面分别介绍两种常用的灵活技巧。

（1）直接在01级数据项后对整张表进行初始化，方式如下。

01  SAMPLE-TABLE-ONE             VALUE ‘ABCDE’.

05   SAMPLE-ITEMS-ONE          PIC  X

                                  OCCURS 5 TIMES.

最低0.47元/天 解锁文章
COBOL_OS
关注
精通cobol－－9.5.2 使用输入文件载入方式初始化表
COBOL
04-28 1404
使用输入文件载入方式初始化表，首先需要有一个输入文件。该输入文件保存表中各数据的初始化值。将该输入文件在过程部读入后，使用前面讲到的PERFORM VARYING语句完成对表的初始化。对于硬性编码初始表所用到的例子，可以通过输入文件载入方式来初始化。首先，需要有一个输入文件，不妨假设该文件的文件名为INPUT-WEEK-FILE。该文件的内容如表所示。表  INPUT-WEEK-FILE文
精通cobol－－9.5.1 使用硬性编码方式初始化表
COBOL
04-28 1534
　　使用硬性编码方式初始化表，主要是通过VALUE语句实现的。VALUE跟在每个具体数据项之后（非数据条目）。VALUE语句指定的值也就是该数据的初始化值。对表中每个数据项初始化后，也就实现了对整个表的初始化。例如，对于保存一周７天的数据的表，通过硬性编码方式初始化代码如下。01   WEEK-VALUES.      05   FILLER   PIC X(10)     VAL
精通cobol－－9.5 表的初始化
COBOL
04-28 1325
  在实际对表进行处理前，通常还要对其进行初始化。对表进行初试化可以分为硬性编码方式和输入文件载入方式两种类型。此外，还有一些初始化表的灵活技巧。以下分别进行介绍。
COBOL中数组操作
张铖@南通
12-15 6341
下面是数组的例子：          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_34050005的博客
04-12 121
书接上一回(COBOL 学习笔记 之 入門篇 )从程序可以看到,COBOL程序分为四部分：IDENTIFICATION DIVISION. ENVIRONMENT    DIVISION. DATA DIVISION. PROCEDURE DIVISION.每一个部分的作用参见教程CHAPTER 1 COBOL 概述 。这里主要看看PROCEDURE DIVISION.里面的内容，这才是核心，首先...
proleap-cobol-parser:基于ProLeap ANTLR4的COBOL解析器
05-23
基于ProLeap ANTLR4的COBOL解析器 这是一个基于的COBOL解析器，它为COBOL代码生成抽象语法树（AST）和抽象语义图（ASG）。 AST以语法树结构表示普通的COBOL源代码。 ASG通过语义分析从AST生成，并提供数据和控制流...
java源码嵌套for循环-cobol-sharp:Cobol代码重新可视化
06-05
（此片段显示了此处第一个示例的一些内容：有必要将ORA-ERROR更改为 CobolSharp 处理它的部分。） 背景 在 COBOL-74 中，最好将if块限制为几个简单的语句，避免任何嵌套的if因为这可能最终会将else块与错误的if相...
精通COBOL大型机商业编程技术详解.部分1
03-30
精通COBOL大型机商业编程技术详解.修订版_部分1.pdf 共两个文件，因为大于60M上传不了。就拆分成了两个文件。 本文件是第一部分
cobol-programming-course:有关COBOL的“入门”级别课程的培训材料和实验室
03-19
COBOL编程课程 该项目是针对z / OS上的COBOL的一组培训材料和实验室。该存储库中提供了以下书籍。首先，请按照各自的自述文件中的步骤进行操作。 已发行 孵化 如果您遇到任何问题，请随时联系我们的。 讨论 您可以...
做cobol中间变量溯源的时候发现很多中间变量没在主程序初期化然后直接赋值给别人怎么办
liu_xuliu_xu的博客
03-05 330
IDENTIFICATION DIVISION. * PROGRAM-ID. SECADD. * ENVIRONMENT DIVISION. * DATA DIVISION. * WORKING-STORAGE SECTION. * 01 SWITCHES. * 05 VALID-DATA-SW PIC X(01) VALUE ‘Y’. 88 VALID-DATA VALUE ‘Y’. 05 END-OF-ACCID-SW
CAFFE源码学习笔记之初始化Filler
sinat_22336563的博客
04-25 1335
一、前言 为什么CNN中的初始化那么重要呢？我想总结的话就是因为他更深一点，相比浅层学习，比如logistics或者SVM,最终问题都转换成了凸优化，函数优化的目标唯一，所以参数初始化随便设置为0都不影响，因为跟着梯度走，总归是会走向最小值的附近的。但是CNN不一样： 1、多层神经网络加上各种非线性变换的激活函数，最终的目标函数是个非凸函数，也就是有多个局部最小值。2、如果使用sigmod类的激
Cobol学习笔记（整理中80%）
最新发布
m0_65939803的博客
09-17 4607
01 A03 AA注释：外部文件只有数据结构，没有部节等信息。03 YMD.注释：重定义共享内存地址，一个质变了影响另一个值，不能用在文件节01层，可用在数据单元节01层，层号必须相同，长度相同，重定义子句不能赋初值。
使用FILLER注意
qq395740774的专栏
06-05 1065
FILLER:占用记录位置（通常使用VALUE对句进行赋初值） 类型为9时，以0填充； 类型为X时，以空格填充。   使用在程序中，通常为了将记录分开，便于查看。如： 01 PRINT-P.       05 FILLER PIC X(6).               当作为第一个输出时，写入文件或是在终端查看时，，会出现乱码！       05 YR-MON-DAY-P PIC
COBOL简介
qq395740774的专栏
05-12 1517
COBOL=common business oriented language COBOL是一种面向数据处理，面向文件，面向过程的高级编程语言，是一种功能强大而又极为冗长的语言。   COBOL由四个部组成： identification division 标识部：用于描述程序本身的相关信息。 environment division 环境部：用于指定程序与外部系统之间的对应关系。 d
COBOL语法和文法(1)
张铖@南通
12-15 3277
REDEFINES    可以用不同的变量描述同一内存。    01 PART_RECODE USAGE DISPLAY      03 PART-TYPE PICTURE...      03 PART_TYPE_A.        05 PART_NUMBER PICTURE...        05 PART_COST PICTURE...      03 PART_TYPE_B REDEF
JavaScript正则表达式
weixin_47216582的博客
09-07 385
JavaScript正则表达式 -正则表达式是用于匹配规律规则的表达式 -正则表达式的灵活性、逻辑性和功能性非常的强，可以迅速地用极简单的方式达到字符串 复杂控制 -正则表达式中的所有字母和数字都是按照字面含义进行匹配的，JS正则表达式语法也支持非字母的 字符匹配。这些字符需要通过反斜线（\）作为前缀进行转义 贪婪模式：正在表达式默认的，尽可能多的匹配次数，直到匹配失败。 非贪婪模式：尽可能少的匹配次数。实现方式在量词后加？ 例如： /\d{6,9}/g 贪婪模式 /\d{6,9}?/g 非贪婪模式 上面
9型转x型 cobol_COBOL数据类型
weixin_29541589的博客
12-30 1254
数据分区是用来定义在该程序中使用的变量。为了描述COBOL数据，必须了解下列术语：数据名称等级数图片子句值子句01 TOTAL-STUDENTS PIC9(5) VALUE '125'.| | | || ...
COBOL中关于数组的操作
QueenJade的收录
03-28 6252
原文地址：COBOL中关于数组的操作作者：基股传话<br />一．表的概念<br />COBOL语言中的表（TABLE）类似于其他高级语言中的数组（ARRAY）。<br />表中，序号称为下标，相对地址称为位标，下标和位标称为“出现号”。<br /> <br />二．表的建立（OCCURS子句）<br />    格式：OCCURS  整数  TIMES<br />    举例：01  PRODUCT-RECORD.<br />             03 RODUCT  OCCURS  20  TIME
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

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

抵扣说明：

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

余额充值