SHIFT str LEFT DELETING LEADING '0'.
如果要在layout显示不出前面的0 格式: &字段(zc)&
如果要在layout显示不出小数点后面的0 格式: &字段(.0)&
去，号
REPORT z_m.
DATA curr TYPE c.
curr='123，456，789.00 '.
while sy-subrc=0.
replace ',' with '' into curr.
endwhile.
condense curr no-gaps.
去掉后置0
data p_number(20) value '56.500'.
CALL FUNCTION 'STRING_REVERSE'
EXPORTING
string = P_number
lang = '1'
IMPORTING
RSTRING = P_number EXCEPTIONS
TOO_SMALL = 1
OTHERS = 2
. IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
shift P_number left deleting leading '0'.
CALL FUNCTION 'STRING_REVERSE'
EXPORTING
string = P_number
lang = '1'
IMPORTING
RSTRING = P_number
EXCEPTIONS
TOO_SMALL = 1
OTHERS = 2
. IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF. write:/ P_number.
- 考试辅导
