天行健，君子以自强不息

转自Eygle大侠的一篇文章,感受颇深:
这就是区别.

高手遇到问题,总是说:自己写一个吧!
新手遇到问题,总是问:这个怎么实现?

——————————-
昨天有一个朋友在MSN上问，如何判断一个字符串是否为数字?
我说，写一个函数吧。于是给出了一个例子:

SQL> CREATE OR REPLACE FUNCTION is_number (parmin VARCHAR2)
2 RETURN NUMBER
3 IS
4 val NUMBER;
5 BEGIN
6 val := TO_NUMBER (NVL (parmin, ‘a’));
7 RETURN 1;
8 EXCEPTION
9 WHEN OTHERS
10 THEN
11 RETURN 0;
12 END;
13 /Function created.

SQL> select is_number(‘a’) from dual;

IS_NUMBER(‘A’)
————–
0

SQL> select is_number(‘0.998′) from dual;

IS_NUMBER(‘0.998′)
——————
1

SQL> select is_number(‘9999999999999999′) from dual;

IS_NUMBER(‘9999999999999999′)
—————————–
1

今天，这个朋友在MSN上又问：如何判断一个字符是否是日期?
我说，再写一个函数吧。

补注:由于session的语言设置会影响日期的输出格式，所以时间被转换为字符可能有多种形式。
以下这个函数只能满足部分情况，仅供参考。

SQL> CREATE OR REPLACE FUNCTION is_date (parmin VARCHAR2)
2 RETURN NUMBER
3 IS
4 val DATE;
5 BEGIN
6 val := TO_DATE (NVL (parmin, ‘a’), ‘yyyy-mm-dd hh24:mi:ss’);
7 RETURN 1;
8 EXCEPTION
9 WHEN OTHERS
10 THEN
11 RETURN 0;
12 END;
13 /
Function created.

SQL> select is_date(‘a’) from dual;

IS_DATE(‘A’)
————
0

SQL> select is_date(‘2004-05-05′) from dual;

IS_DATE(‘2004-05-05′)
———————
1

SQL> select is_date(‘2004/01/01′) from dual;

IS_DATE(‘2004/01/01′)
———————
1

SQL> select is_date(‘01/01/04′) from dual;

IS_DATE(‘01/01/04′)
——————-
1

SQL> select is_date(‘01-jan-04′) from dual;

IS_DATE(‘01-JAN-04′)
——————–
1

这两者是何其相似啊！

参考原文