ABAP 检查全角半角
Posted Rainystuday
tags:
篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了ABAP 检查全角半角相关的知识，希望对你有一定的参考价值。
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 = ‘ｓｓｓｓ‘.
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 = ‘ｓｓｓｓ‘.
point = cl_abap_conv_out_ce=>uccp( char ).
if point <= last_ascii_zf.
else.
write ‘double byte char‘.
endif.
以上是关于ABAP 检查全角半角的主要内容，如果未能解决你的问题，请参考以下文章