DATA:L_STR TYPE STRING.
IF WA_OUT-ERFMG IS NOT INITIAL.
L_STR = WA_OUT-ERFMG.
CONDENSE l_str. " 去掉没用的小数位的0
SHIFT l_str RIGHT DELETING TRAILING '0'."去掉没用的小数位的0
SHIFT l_str RIGHT DELETING TRAILING '.'."去掉没用的小数位的0
ELSE.
L_STR = '0'."为空就给个空值
ENDIF.
CONDENSE L_STR.
G_ERFMG = L_STR.