check全角or半角的方法
第一种方法
SJIS_DBC_TO_SBC 全角转半角
SJIS_SBC_TO_DBC 半角转换为全角
设定 import
all =x
text = 文本
全角-〉半角,返回值 1
全角-〉全角 返回值0
第二种方法
REPORT ZZXIAOXIN0999.
DATA: last_ascii_zf(2) TYPE x value '00FF'. "unicode MIT
DATA: last_ascii_en(2) TYPE x value 'A100'. "unicode MIT
data char(33) type c.
data: point(2) type x.
char = 'ssss'.
point = cl_abap_conv_out_ce=>uccp( char ).
if point <= last_ascii_zf.
else.
write 'double byte char'.
endif.
SJIS_DBC_TO_SBC 全角转半角
SJIS_SBC_TO_DBC 半角转换为全角
设定 import
all =x
text = 文本
全角-〉半角,返回值 1
全角-〉全角 返回值0
第二种方法
REPORT ZZXIAOXIN0999.
DATA: last_ascii_zf(2) TYPE x value '00FF'. "unicode MIT
DATA: last_ascii_en(2) TYPE x value 'A100'. "unicode MIT
data char(33) type c.
data: point(2) type x.
char = 'ssss'.
point = cl_abap_conv_out_ce=>uccp( char ).
if point <= last_ascii_zf.
else.
write 'double byte char'.
endif.
来源:https://www.cnblogs.com/rainysblog/p/6274346.html