SAP ABAP 四舍五入的办法

今天有人问我关于四舍五入的算法
其实，SAP提供了函数，没有函数也是可以的
但还是用函数做比较方便，举例如下：
DATA: L_DATA TYPE P DECIMALS 3 VALUE ‘1.456’.
DATA: L_DATA1 TYPE P DECIMALS 3.

DATA: L_DATA2 TYPE P DECIMALS 3 VALUE ‘1.546’.

• 方法一
  CALL FUNCTION ‘HR_NZ_ROUNDING_DECIMALS’
  EXPORTING
  VALUE_IN = L_DATA
  CONV_DEC = 1 " 设置保留几位小数
  IMPORTING
  VALUE_OUT = L_DATA1
  EXCEPTIONS
  no_rounding_required = 1
  decimals_greater_than_10 = 2
  rounding_error = 3
  OTHERS = 4.

WRITE: L_DATA1.

• 方法二
  CALL FUNCTION ‘ROUND’
  EXPORTING
  DECIMALS = 0 " 保留多少位小数
  INPUT = L_DATA2
  SIGN = ‘+’ " + 向上取舍 - 向下取舍 （负数也一样）
  IMPORTING
  OUTPUT = L_DATA1 " 输出返回结果
  EXCEPTIONS
  input_invalid = 1
  overflow = 2
  type_invalid = 3
  OTHERS = 4.

WRITE: L_DATA1.

原文章：https://copyfuture.com/blogs-details/20201126183531307bzs5o43o7j64lgb