ABAP：判断是否汉字
1，在Non-Unicode系统中，⼀个汉字占2个单位长度，可以⽤CHARLEN的返回值判断是否汉字。
DATA: len TYPE i,
str TYPE c LENGTH 20.
str = 'Hello哈哈'.
len = CHARLEN( str )."1，代表英⽂
len = CHARLEN( str+4 )."1，代表英⽂
len = CHARLEN( str+5 )."2，代表汉字
len = CHARLEN( str+6 )."2，代表汉字
2，在Unicode系统中，汉字与英⽂⼀样占1个单位长度，可以调⽤函数NLS_VISUAL_CHARLEN来判断。
DATA: c1 type char1,
unicode汉字
vislen type i.
c1 = 'A'.
*c1 = '哈'.
CALL FUNCTION 'NLS_VISUAL_CHARLEN'
EXPORTING
str        = c1
IMPORTING
len_visual = vislen.
IF vislen = 1.
WRITE: '英⽂'.
ELSE.
WRITE: '汉字'.
ENDIF.

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。