Currently in IBM Enterprise COBOL the only rounding is round half away
from zero (5.5 becomes 6, -5.5 becomes -6).  I understand than various
organizations use different rounding rules based on policy and/or
legal requirements in some or all computations involving rounding.
These would include round half to nearest even (5.5 becomes 6, 4.5
becomes 4. How do organizations handle the non-standard rounding in
current COBOL programs? in-line code with each computation? PERFORM of
a common subroutine copied into the program? CALL to a separate COBOL
subroutine? CALL to a routine in another language?  If the 2014 COBOL
Standard additional rounding options included the ones your
organization uses, would your organization modify code over time to
take advantage of the software and hardware support for them, assuming
that they would deliver identical results? 

Clark Morris  

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to