ABAP 关于四舍五入算法

最新推荐文章于 2024-05-11 16:16:33 发布

SAPmatinal

最新推荐文章于 2024-05-11 16:16:33 发布

阅读量3.1k

点赞数 1

分类专栏： ABAP技术文章标签： ABAP 函数四舍五入

本文链接：https://blog.csdn.net/SAPmatinal/article/details/42931655

版权

ABAP技术专栏收录该内容

1023 篇文章 132 订阅

订阅专栏

今天有人问我关于四舍五入的算法

其实，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.