关闭

sap 提取字符串中汉字

650人阅读 评论(0) 收藏 举报
分类:

DATA: alpha_num(120) TYPE c.

alpha_num = ' abcdefghijklopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789,./;''[]\-=`<>?:"{}|_+~!@#$%^&*()'.

IF input CA alpha_num.
output = '不仅仅全是汉字'.
ELSE.
output = '全是汉字'.
ENDIF.

IF NOT input CO alpha_num.
output = '含有汉字'.
ELSE.
output = '不含有任何汉字'.
ENDIF.


提取汉字
data len type i.
data n type i.
len = strlen( input ).

do len times.
n = sy-index - 1.
if not alpha_num cs input+n(1).
concatenate output input+n(1) into output.
endif.

enddo.

 

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:4012840次
    • 积分:57963
    • 等级:
    • 排名:第52名
    • 原创:1701篇
    • 转载:2503篇
    • 译文:101篇
    • 评论:307条
    博客专栏
    最新评论
    微信公众号
      为你推荐最新的博文~更有惊喜等着你