[open-cobol-list] Re: What should this produce ?

[Roger While]

OC gets it's result by chucking the sign bit away :-)
ie. 0x538461A9521590A7

This is a very grey area.
Doesn't make much sense whatever one does.

Roger

Sergey wrote :

MFocus with NOTRUNC is doing the same as mainframe with TRUNC(BIN).
They are just trying to keep mainframe compatibility (at least in case of 
OSVS or IBMCOMP option)
source is
123456123456000 == 0x000070485E624A00
the precise multiplication result is
15241414418783113383936000000
converting to 9(n).9(9) (stripping off the right 9 digits, i.e. dividing by 
1000000000)
15241414418783113383
The HEX value of the result is 0xD38461A9521590A7 which is exactly what we 
get on mainframe.
The rest is just an interpretation of the result as negative vs positive.
Didn't check how OC got its result yet :-)