Weired COBOL output.
Posted: Tue Aug 01, 2017 6:24 pm
Hi,
Please see this:
Should not the output be 0000000000.40?
Please see this:
Code: Select all
01 WS-COUNTER.
05 WS-A PIC S9(9) COMP-3.
05 WS-B PIC 9(9).99.
PROCEDURE DIVISION.
MOVE 0.4012 TO WS-A.
MOVE WS-A TO WS-B.
DISPLAY "A to B: " WS-B.
Code: Select all
output is 0000000000.00