moving even number of bytes starting with 9 to comp-3 field

[ts1924]

Running version V30L10 I have the following problem:
When moving an even number of digits with leftmost digit = 9 to a comp-3 field I get the following result

05 FIELD-FROM PIC S99 VALUE +98.
05 FIELD-TO PIC S99 COMP-3.

MOVE FIELD-FROM TO FIELD-TO.

The result is
22222228
0000000C
This occurs only if I move an even number of digits starting with the digit 9. I tried with different lengths
receiving the same result.

If this is a known bug, is there a patch to the COBOL version V30L10?

Thank you for help.
Toni

 

[Dimandja]

Hi ts1924,

Which OS (Windows) are you using?

Dimandja

 

[ts1924]

Hi Dimandja,

I tested with Windows 98 and Windows 2000 (SP3 and
Compatability-.exe).

May be it will be OK with Windows 95?

Thanks for the response!

Toni

 

[etom]

I am not familiar with the older version of the compiler however there may be a work around. Since Comp-3 format always stores an odd number of digits regardless of how you define it, define your Comp-3 field as S999 Comp-3. It will not take any more memory and will hopefully solve your problem.

You will not find any patches or updated to version 3 of the compiler as Fujitsu's current version is 7 and the free version 3 compiler is "as-is" from Fujitsu. No support.

Hope the above suggestion fits in your solution.