檢查中文的一段程式碼

leniz發表於2009-04-28
DATA: alpha_num(120) TYPE c.
alpha_num = ' abcdefghijklopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789,./;''[]\-=`<>?:"{}|_+~!@#$%^&*()'.
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.
 
******* 很簡單,關鍵是把alpha的字元找齊比較費力,記錄一下。

來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/554557/viewspace-592100/,如需轉載,請註明出處,否則將追究法律責任。

相關文章