将字符串123转化为数字1.23+E02

DATA: zuegnrt_str TYPE c LENGTH 5 ,
res TYPE c LENGTH 1 .
DATA: zuegnrt_f TYPE f .
zuegnrt_str = '123'.


CONDENSE zuegnrt_str NO-GAPS.

IF zuegnrt_str = ''.
zuegnrt_str = '0'.
ENDIF.


CALL FUNCTION 'CHAR_FLTP_CONVERSION'
EXPORTING
string = zuegnrt_str
IMPORTING
flstr = zuegnrt_f.
IF zuegnrt_f > 0 .
res = 'Y'.
ELSE.
res = 'N'.
ENDIF.
WRITE: / zuegnrt_f.

 

 

posted @ 2019-10-24 15:19  纱缚之印  阅读(301)  评论(0编辑  收藏  举报