Colbol学习笔记:数据类型

lancyblack

已于 2023-01-09 00:10:12 修改

阅读量1.1k

点赞数 1

分类专栏： cobol 文章标签：开发语言 Powered by 金山文档

于 2023-01-09 00:02:01 首次发布

本文链接：https://blog.csdn.net/lancyblack/article/details/128607603

版权

cobol 专栏收录该内容

1 篇文章 0 订阅

订阅专栏

COBOl分为四个部分：https://blog.csdn.net/qq_40801987/article/details/124242306

Identification DIVISION 标志部

ENVIROMENT DIVISION环境部

DATA DIVISION数据部

PROCEDURE DIVISION过程部（程序中最重要的部分）

工作储存节

标识：WORKING-STORAGE SECTION

作用：定义程序中用到的各种数据

** PIC **

PICTURE，用于定义数据的类型和长度， X表示字符，9 表示数字。

X(3) == XXX

9(2) == 99

Cobol 数据类型

关于数据类型重要资料：

1.https://www.codenong.com/2996278/

COBOL Data types

我对COBOL数据类型感到困惑。

像在许多采访中一样，要求解释COMP-3和COMP ...之间的区别。

确切的区别是什么？

COBOL中使用模式的含义是什么，它与数据类型有何关系？

谢谢并恭祝安康，

玛纳斯·库尔卡尼(Manasi Kulkarni)

COBOL中的USAGE描述了如何使用数据项。一些例子

的用法有：

显示。这标识可以在终端上打印的项目或
报告。这可以是数字，也可以不是数字(例如，可以是文本值)。的
PICture子句给出了DISPLAY项目的描述。例如：
PIC 9(5) USAGE DISPLAY描述可能显示(打印)的5位数字。
通常会忽略USAGE DISPLAY，因为如果缺少它则意味着它。

指数。这标识用作表(OCCURS)索引的项目。

COMPsomething表示该数据项将用于
算术运算(即它是某种类型的数字)。

有多种类型的数字项目。最常用的两种

数字数据类型为：

计算或COMP。这等效于BINARY

COMPUTATIONAL-3或COMP-3。这等效于PACKED-DECIMAL

COMP(BINARY)数据项通常是执行的最有效方法

对代表整数值的数据项进行计算。

在COBOL中使用COMP-3(PACKED-DECIMAL)数据项是因为

它们保持固定数量的小数点。所有计算

导致结果具有指定的小数位数。

这在记帐类型操作中特别有用。

浮点数表示数字后的位数

小数点变量(例如，小数点可以"浮动")是

而不是通常以财务运作方式来表示。

您可以找到IBM Enterprise COBOL的计算项目的完整列表

这里

许多程序员从COBOL开始时遇到的问题之一是

了解COMP项非常适合进行数学运算，但不能

显示(打印)，直到通过以下方式将其转换为"可显示"项目

MOVE语句。如果将COMP项移动到报告中或

屏幕上不会显示的很好。需要将其移至DISPLAY

项目第一。

您可能需要研究的另一件事是

定义变量时图片与使用之间的关系

在COBOL中。这是一个非常好的COBOL入门教程的链接

来自利默里克大学。

相关讨论

感谢您的回答。我想知道决定适合不同情况的数据类型的因素。像每种数据类型的内存消耗都不同。我猜COMP会占用4个字节的内存，而COMP-3会占用(数字/ 2)+1个字节。

COMP使用最小的数据类型来保存所有数字，但通常必须是2的幂。因此，如果有16位，32位和64位类型可用，则1-4位数字占2个字节，5-9位数字占4个字节，而10-18位数字占8个字节。这使得COMP-3最适合具有1、5或10-13位数字的字段。

至于决定使用哪种数据类型，我不知道。我实际上不写COBOL。我是一位C ++程序员，他必须学习阅读COBOL布局才能将数据传递到大型机上的程序。

试图给出-1以省略数字和字符串以外的所有其他Cobol数据类型-对象？日期？指针？文件(在某些变体中)？

Cobol没有"字符串"，例如在带有某些描述的数据结尾标记的字段中。 Cobol具有固定长度字段和可变长度字段(长度在数据外部保存)。对于dan04s的评论，由于他不了解Cobol，因此请忽略"最佳选择" ...

至于决定使用哪种数据类型，可以使其非常复杂-但是-一组简单的准则是：

DISPLAY和Edited Zone Decimal应该仅用于在报表或sysout中显示数字。将COMP和COMP-3字段移到"显示/编辑"字段中，然后再将其放入报表或sysout中。

COMP-具有最快的整数计算速度

COMP-3(打包的十进制)-应在保留十进制位置时使用。

COMP和COMP-3字段可以在计算中一起使用。编译器将确定哪种字段类型(在幕后)将转换为单个通用数字数据类型-基于规则。

正如其他答复所暗示的那样，COMP表示大尾数二进制。 COMP-3用十进制压缩-这意味着每个半字节都映射一个十进制数字。

我不确定先前的答复是否能解决精度问题。

PIC S9(9)V9(9)COMP

和

PIC S9(9)V9(9)COMP-3

具有完全相同的精度。这是ANSI85标准的一部分。编译器和运行时的工作是确保COMP中的二进制表示具有适当的转换，以确保获得与使用display或COMP-3时完全相同的结果。

IBM大型机在硬件中打包了十进制计算。这非常有帮助，因为将小数位数转换为二进位制，即n的平方n是数字的长度。这意味着，COMP-3通常是大型机中最快的格式，但是不太可能出现在分布式系统上。但是，情况并非总是如此。例如，对于非常大的十进制精度(> 18位)，Micro Focus原生COBOL解决方案在COMP-3中趋向于比COMP-5更快，反之则相反。 Micro Focus的Managed COBOL系统在COMP中几乎总是最快的(实际上，COMP-5是最好的-与COMP类似，但是将具有硬件字节序，而不是强制使用大字节序内存布局)。

最后，我建议对于中间值和通用数学，binary-long和binary-double的较新数据定义是更好的选择，因为这样编译器就可以决定如何为您存储和优化。

有关分布式和托管COBOL上的COBOL的更多信息，请查看以下知识库：http://knol.google.com/k/alex-turner/micro-focus-managed-cobol/2246polgkyjfl/4，并且随时可以在以下位置查找cobol脸书:)