1 CREATE OR REPLACE FUNCTION isnumeric (str IN VARCHAR2) 2     RETURN NUMBER 3 IS 4     v_str VARCHAR2 (1000); 5 BEGIN 6     IF str IS NULL 7     THEN 8        RETURN 0; 9     ELSE10        v_str := translate(str, '.0123456789', '.');11 12        IF v_str = '.' OR v_str = '+.' OR v_str = '-.' OR v_str IS NULL13        THEN14           RETURN str;15        ELSE16           RETURN 0;17        END IF;18     END IF;19 END isnumeric; 一、语法：  TRANSLATE(string,from_str,to_str)  二、目的  返回将（所有出现的）from_str中的每个字符替换为to_str中的相应字符以后的string。TRANSLATE 是 REPLACE 所提供的功能的一个超集。如果 from_str 比 to_str 长，那么在 from_str 中而不在 to_str 中的额外字符将从 string 中被删除，因为它们没有相应的替换字符。to_str 不能为空。Oracle 将空字符串解释为 NULL，并且如果TRANSLATE 中的任何参数为NULL，那么结果也是 NULL。  三、示例  Sql代码 1. SELECT TRANSLATE('abcdefghij','abcdef','123456') FROM dual;  2. TRANSLATE (  3. --------------  4. 123456ghij  5.  6. SELECT TRANSLATE('abcdefghij','abcdefghij','123456') FROM dual;  7. TRANSL  8. ----------  9. 123456  语法：TRANSLATE(expr,from,to) expr: 代表一串字符，from 与 to 是从左到右一一对应的关系，如果不能对应，则视为空值。 举例： select translate('abcbbaadef','ba','#@') from dual　（b将被＃替代，a将被＠替代） select translate('abcbbaadef','bad','#@') from dual　（b将被＃替代，a将被＠替代，d对应的值是空值，将被移走） 因此：结果依次为：@#c##@@def 和@#c##@@ef