【ABAP系列】SAP ABAP 關於四捨五入算法

公衆號： SAP Technical

本文做者： matinal

原文出處： http://www.cnblogs.com/SAPmatinal/

原文連接： 【ABAP系列】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.