DATA : p1 TYPE p DECIMALS 4 .p1 = '3.4565' .CALL FUNCTION 'ROUND' EXPORTING decimals = 2 input = p1 sign = '-' IMPORTING output = p1 EXCEPTIONS input_invalid = 1 overflow = 2 type_invalid = 3 OTHERS = 4 .WRITE p1.*Sign:*SPACE : no rounding (input = output)*'+' : round up*'-' : round down*'X' : commercial rounding*本文来自博客,转载请标明出处:http://blog.csdn.net/animalbe/archive/2010/09/03/5860464.aspx