db2 去除全角字符

初学db2,最近在做报表，需求中要求把一字段剔除全角字符然后做相似检查，再网上搜了好多关于db2判断是否全角字符的例子，然后写了下面一函数，还好使，不知道有没有bug存在，贴出来，望大牛指正........

1. CREATE FUNCTION f_getIdNum(inStr VARCHAR(255))
2. RETURNS VARCHAR(255)
3. LANGUAGE SQL
6. BEGIN ATOMIC
7. DECLARE outStr VARCHAR(255) DEFAULT '';
8. DECLARE k INT DEFAULT 1;
9. ----判断是否存在全角字符，存在则进行剔除
10. if(length(inStr) != length(inStr, CODEUNITS32)) then
11. WHILE(k<=length(inStr)) do
12. if(ascii(substr(inStr,k,1))< 128) then
13. set utStr = outStr || substr(inStr,k,1);
14. end if;
15. set k = k+1;
16. END WHILE;
17. ELSE
18. SET utStr = outStr || inStr;
19. end if;
21. RETURN outStr;
22. END;

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/26739733/viewspace-717666/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/26739733/viewspace-717666/