参考修改在cobol中移动comp-3假设的十进制类型变量

Question

如何执行引用修改移动在cobol中的comp-3假定的十进制类型变量.我在ws部分有以下变量

01 num1 s9(7)v9(2) comp-3 value 5489.00

02 num2 9(12)

我需要将num1的值存储到num2中作为​​000000548900.

Answer 1

不要使用参考修改.使用:

multiply num1 by 100 giving num2

代替.