ORACLE : 특수 문자제거 함수 (filtering special characters function)

--
-- 0-9,a-z,A-Z, 한글
--
CREATE OR REPLACE FUNCTION FILTER_SPCCHR(STR VARCHAR2)
RETURN VARCHAR2
IS
   RETVAL VARCHAR2(1000);
BEGIN
                 
                  FOR I IN 1..LENGTH(STR) LOOP
                            IF ASCII(SUBSTR(STR,I,1)) BETWEEN 48  AND 57  OR
                          ASCII(SUBSTR(STR,I,1)) BETWEEN 65  AND 90  OR
                          ASCII(SUBSTR(STR,I,1)) BETWEEN 97  AND 122   OR
                          ASCII(SUBSTR(STR,I,1)) > 256 THEN
                                   RETVAL := RETVAL || SUBSTR(STR,I,1);
                          END IF;
                  END LOOP;
                 
                 
                  RETURN RETVAL;
END;
/