abap 去掉小数后的0详解编程语言

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
.