cobol负数赋值的有哪些方法

在COBOL中，可使用负号 "-" 来表示负数。可以直接在数据项上加上负号来表示一个负数，例如：

01 NEG-NUMBER PIC S9(4)V99.
MOVE ⑴23.45 TO NEG-NUMBER.

在上面的例子中，NEG-NUMBER是一个带有符号位的数值类型数据项，可以存储带有2位小数的4位数整数。使用MOVE语句将⑴23.45赋值给NEG-NUMBER，表示一个负数。