Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Compiler and Runtime Migration Guide


CMPR2

When SIZE ERROR is specified on the MULTIPLY statement example, SIZE ERROR can occur when the 36-digit (immediate) result is moved into the 30-digit (or 31-digit) (intermediate) result, according to the COBOL 74 Standard rules. This differs from the corresponding COMPUTE case, in which SIZE ERROR cannot occur when the 36-digit (immediate) result is moved into the 30-digit (or 31-digit) (intermediate) result.
COMPUTE C D = A * B ON SIZE ERROR...

This behavior applies to the DIVIDE statement with its corresponding COMPUTE statement as well.


Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)