设中国护士网为首页 | 中国护士网专注于知识的分享,因为专注,所以更好！
分享到：

首页 > SAP HR资源网

sap去除后缀0

来源：  作者：

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.