DATA: alpha_num(120) TYPE c.
alpha_num = ' abcdefghijklopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789,./;''[]\-=`<>?:"{}|_+~!@#$%^&*()'.
data len type i.
data n type i.
len = strlen( input ).
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.
n = sy-index - 1.
if not alpha_num cs input+n(1).
concatenate output input+n(1) into output.
endif.
enddo.
******* 很简单，关键是把alpha的字符找齐比较费力，记录一下。
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/554557/viewspace-592100/ ，如需转载，请注明出处，否则将追究法律责任。
下一篇：
类似数据字典的几个表
请登录后发表评论
登录
全部评论
