COBOL中的COMP VALUE ZERO是什么意思？

Question

在下面的Whosebug下对COMP有很好的解释link：但我还是不明白

中的 COMP VALUE ZERO 是什么

   77  ABC       PIC S9(4) COMP VALUE ZERO.

意思是。如果有人澄清这一点，我将不胜感激。

Answer 1

COMP或COMPUTATIONAL指的是存储表示。对于大多数实现，它与 (big-endian) BINARY 相同，对于某些 PACKED-DECIMAL，很少相同存储表示为 DISPLAY。 VALUE ZERO表示初始值为+0。

类似于

short abc = 0;

在其他一些语言中。但是 PIC S9(4) 将值限制为 -9999 到 +9999。

Answer 2

读懂那行代码的方法

77  ABC       PIC S9(4) COMP VALUE ZERO.

是

77               is the level
ABC              is the data item name
PIC S9(4) COMP   is the data item's 'data type'
VALUE ZERO       is what to initialize the data item to.

COBOL中的COMP VALUE ZERO是什么意思？

What does COMP VALUE ZERO in COBOL mean?

cobol