CALL FUNCTION 'ROUND'      

EXPORTING 

DECIMALS        = 0       "精确到小数位数，这里为精确到个位

           input               = value   "需要四舍五入的数

       SIGN     = 【'+'/'-'/space/'X'】 

  '+'或者'X' 是四舍五入,'-'为不四舍五入直接去掉，space是不变化

  IMPORTING    

OUTPUT              = value

    EXCEPTIONS

    INPUT_INVALID        = 1

    OVERFLOW             = 2     

TYPE_INVALID         = 3     

OTHERS          = 4

DATA: value TYPE p VALUE '123.556' DECIMALS 3.

IF FRAC( value ) GE '0.5'.     " frac为取小数位

   value = TRUNC( value ) + 1.  " trunc为取整数位

ELSE.   

   value = TRUNC( value ).

ENDIF.