m_maass wrote:
> please look at the attached example.
> Input number is not equal to output number.
Yes, there is a bug with the MOVE verb of numeric edited types.
01 E-ZAHL PIC ZZZ.99.
01 ZAHL PIC ZZZ.99.
...
* This move works as expected
MOVE 123.45 TO E-ZAHL
* This move does NOT work properly
MOVE E-ZAHL TO ZAHL.
I will try to fix this bug before TC version 0.64 is released.
As a temporary fix, avoid moves between edited types.
Example:
...
05 E-ZAHL PIC 999V99.
05 ZAHL PIC ZZZ.99.
...
ACCEPT E-ZAHL.
MOVE E-ZAHL TO ZAHL.
Hope this helps.
|