DATA: lv_clabs TYPE p DECIMALS ,
lv_dcpfm LIKE usr01-dcpfm.
*SU01获取用户默认设置
SELECT SINGLE dcpfm INTO lv_dcpfm
FROM usr01
WHERE bname = sy-uname.
CALL FUNCTION 'UNITS_STRING_CONVERT'
EXPORTING
units_string = '123,456.78'
dcpfm = lv_dcpfm
MLLN = 'M'
TSND = 'T'
IMPORTING
units = lv_clabs
EXCEPTIONS
invalid_type = 1
OTHERS = 2 .