COBOL语法和文法(1)

最新推荐文章于 2024-05-21 10:11:11 发布
最新推荐文章于 2024-05-21 10:11:11 发布
阅读量1.6k 收藏 3
点赞数
分类专栏： COBOL 文章标签： cobol c go
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/shenghuiping2001/article/details/5258750
版权
本文介绍了COBOL编程中的REDEFINES关键字，用于在同一内存区域定义不同变量，并探讨了PICTURE子句的使用，包括其格式、规则和常见例子，展示了如何定义数据项的长度、格式和数据类型。
摘要由CSDN通过智能技术生成

 

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 REDEFINES PART_TYPE_A.
        05 UPC_CODE PICTURE...
      03 PART_TYPE_C REDEFINES PART_TYPE_A.
        05 ISBN PICTURE...
    根据PART_TYPE决定用PART_TYPE_A还是PART_TYPE_B还是PART_TYPE_C。
    规则：
        PART_TYPE_B和PART_TYPE_C长度不能大于PART_TYPE_A。
        数据项不能有VALUE。
        01层不能用REDEFINES.
        PART_TYPE_B和PART_TYPE_C中不能有OCCURS.

PICTURE
    定义基本项目的具体长度，格式，数据类型。可以简写成PIC.
    格式字符串最多30个字符，可以包含下列字符&

了解本专栏 订阅专栏 解锁全文 超级会员免费看
shenghuiping2001
关注
专栏目录
订阅专栏
COBOL语法和文法(2)
shenghuiping2001的专栏
01-26 2083
 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个字符，
COBOL
qq_46029070的博客
07-21 3736
cobol
COBOL语言总结(一)
热门推荐
杀神lwz的博客
07-15 2万+
一、COBOL简介 COBOL(Common Business Oriented Language)语言、即公用面向商业语言，是一种面向过程的高级程序设计语言，主要用于数据处理，是目前国际上应用最广泛的一种高级语言。 COBOL作为大型机上最主要的程序设计语言，迄今50多年历史。 大型机也叫主机、大机或MainFrame等，属于一种商用高端服务器。主要由IBM公司生产。 1.COBOL语法格式 COBOL程序的每行代码通常分为80列。有非标准80列的可以超过80列，写多少列都可以。 80列中列与
COBOL语言基础总结
最新发布
linmeng022的博客
05-21 2347
如果自行车的某个零件坏了，可以在五金商店买到相同规格的零件更换，恢复自行车的功能。程序中没有用到外部文件，文件节是可以省略的，但是工作存储节都是会存在的。作用：程序中涉及到的全部数据(输入，输出，中间)都要在此定义，对它们的属性进行说明。子程序概述：PERFORM语句只能在同一程序中多次调用某一语句序列，如果被调用部分较复杂或需要被其他程序使用时，可以将其编写为单独的一个程序，即子程序，调用子程序的为主程序。至于VSAM文件的创建，复制，删除等操作是通过JCL中的IDCAMS实用程序实现的。
cobol算术运算
大道至简
05-02 2194
算术运算 算术运算就是常见的四则运算及平方等运算。 四舍五入ROUNDED 使用ROUNDED对运算的第一位小数进行四舍五入运算 DATA DIVISION. WORKING-STORAGE SECTION. 01 NUM1 PIC 99V9. 01 NUM@ PIC 99V9. 01 REAL-RESULT PIC 99.9. 01 RESULT PIC 99. PROCEDURE DIVISION. MOVE 12.3 TO NUM1. MOVE 45.6 TO NUM2. ADD NUM1 TO NU
COBOL文法书-一本描述COBOL语法的初级入门书
06-15
COBOL文法书作为一本初学者指南，旨在为读者提供关于COBOL语言的基本规则和语法的详细介绍。 ### 书籍结构 本书按章节组织内容，具体结构如下： 1. **全般規則**：本章介绍了COBOL的基本元素，包括语言成分、唯一...
富士通COBOL文法書
06-14
富士通COBOL文法书是专为使用FUJITSU COBOL97和FUJITSU COBOL85的程序员编写的指南，这些版本的COBOL是针对日本市场开发的，并且与特定的富士通硬件和操作系统环境紧密集成。 此书主要介绍了如何根据COBOL的标准...
COBOL 文法書 日本官网下载
07-23
COBOL文法書是富士通（Fujitsu）官方发布的一本详细阐述COBOL语法的日语文档，尽管其原文为日语，但对熟悉汉语的读者来说，理解核心概念并不构成太大障碍。 这本书共734页，内容涵盖了COBOL语言的各个方面，包括但...
cobol学习之七逆向输出
指尖残雪
11-15 1009
输入：0123456789 输出：9876543210 严格要求10位，cobol必须严格要求位数。 代码如下： 000010 IDENTIFICATION                 DIVISION. 000020  PROGRAM-ID.                   STUDY6-103. 000030 ENVIRONMENT                    D
C6-COBOL 数据布局
adozoo
09-22 1638
COBOL 数据布局 COBOL布局是每个字段的使用及展现价值的描述，以下是COBOL中使用的数据描述项： Redefines（重定义）子句 Renames（重命名）子句 Usage（用法）子句 Copybook Redefines（重定义）子句 重定义子句用于定义具有不同数据描述的存储。如果一个或多个数据项不被同时使用，那么可以将相同的存储用于另一个数据项。因此，可以使用不同的数据项来引用相同的存储。 作用：不同的数据项可以共用内存中的同一段空间。例如已给数据项A分配了一段内存空间，在经过某一段的过程
cobol v99_准备升级到Enterprise COBOL for z / OS V5
cusi77914的博客
06-28 481
总览 通过通过Web，云和移动技术吸引用户的新方法，COBOL开发人员有望以更高的质量和性能更快地交付新功能。 随着现代硬件体系结构变得越来越复杂，应用程序开发人员同时处理正在处理的应用程序中的业务逻辑和性能问题变得越来越困难。 他们需要先进的编译技术来处理性能方面的问题，以便他们可以专注于业务逻辑。 针对z /OS®V5.1的IBM®Enterprise COBOL已经过重新设计，可...
COBOL 进行除法运算并获取商和余数
JavaDaBaiCai的博客
08-25 665
使用 DIVIDE 关键字，将 PSSU（被除数）除以 TASU（除数），并将商存储到 SYOU 中。使用 REMAINDER 关键字，将余数存储在 AMRI 中。因此，根据给定的初始值，1000除以25的商为40，余数为0。根据给定的变量进行除法运算并获取商和余数。
cobol-ACCEPT、DISPLAY和REDEFINES
大道至简
04-24 2557
ACCEPT ACCEPT语句是用于接收数据的，可以接收用户终端输入或者系统产生的变量，将其保存在cobol中定义的变量。 接收系统的变量最要以时间、日期为主。 DATA DIVISION. WORKING-STORAGE SECTION. 01 TEST-DATE. 05 TEST-YEAR PIC 99. 05 TEST-MONTH PIC 99. 05 TEST-DAY PIC 99. ....... * PROCEDURE DIVISION. ....... ACCEPT TEST-DAT
COBOL语言概述
sunysl的专栏
04-25 2845
一．COBOL程序的结构 1．部 IDENTIFICATION DIVISION 标识部 ENVIRONMENT DIVISION 环境部 DATA DIVISION 数据部 PROCEDURE DIVISION 过程部 2．节（SECTION）和段（PARAGRAPH） （1）部-节-段 （2）标识部下面不设节，直接设段 （3）过程部可以设节，下面再设段，也可以直接设段 3．
COBOL基础知识
共享，学习，纪录
05-20 1万+
本文内容源于对IBM英文文档的理解与归纳，不保证其准确性。仅用于自学，转载请注明出处。-----------------------------------------------------------------------------------------------1．编码格式第1～６列为序号区，用于表示行号。行号不是必须的，也不必是顺序的，甚至可以是本机字符集中的任意字
cobol-move语句
大道至简
04-20 1922
MOVE是cobol程序中最常见的语句，类似于java中的set语句。 单个数据项的复制 01 IN-STATUS PIC X(5). 01 IN-GRP. 05 IN-DATA1 PIC x(4). 05 IN-DATA2 PIC X(3). 01 OUT-STATUS PIC PIC X(5). 复制单个数据项讲源数据放在之前，TO连接复制之后数据。可以复制特定的值，也可以变量之间进行设值。 MOVE 'READY' TO IN-STATUS MOVE IN-STATUS TO OUT-ST
高级语言与编译原理：语法和语义解析
"本资源主要讲述了编译原理中的语言和文法概念，包括高级语言的特性和分类，以及程序语言的语法、语义和语用定义。上下文无关文法和语法树在描述语言结构中的作用也得到了强调，同时提到了二义性的问题。" 在编程...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

shenghuiping2001

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

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

余额充值