判断是否是正确日期字符串的函数

　　个人写的一个判断是否是正确日期字符串的函数, 请大家点评 /*
　　函数参数 str : 需要转换为日期的字符串, fmt : 日期格式, nls : 日期字符串的语言
　　返回值: 类型为date, 如果字符串不符合转换格式的要求或是非法的日期字符串, 返回值为null, 反之, 返回转换后的date值
　　*/
　　CREATE OR REPLACE FUNCTION isdate(str varchar2, fmt varchar2 default null, nls varchar2 default null)
　　RETURN date
　　IS
　　v_date date;
　　v_fmt varchar2(100) default fmt;
　　v_nls varchar2(100) default nls;
　　BEGIN
　　IF fmt IS NULL THEN
　　SELECT value
　　INTO v_fmt
　　FROM v$nls_parameters
　　WHERE parameter='NLS_DATE_FORMAT';
　　END IF;
　　IF nls IS NULL THEN
　　SELECT 'NLS_DATE_LANGUAGE='''||value||''''
　　INTO v_nls
　　FROM v$nls_parameters
　　WHERE parameter='NLS_DATE_LANGUAGE';
　　END IF;
　　v_date := to_date(str, v_fmt, v_nls);
　　RETURN v_date;
　　EXCEPTION
　　WHEN OTHERS THEN
　　/*如果你希望看到报错, 就把下面的注释行打开*/
　　--raise;
　　RETURN NULL;
　　END;
　　/
　　-------------------
　　以下是函数isdate的使用示例 SQL> COLUMN PARAMETER FORMAT A30
　　SQL> COLUMN VALUE FORMAT A30
　　SQL> set null [null]
　　SQL> select * from v$nls_parameters where parameter in ('NLS_DATE_FORMAT', 'NLS_DATE_LANGUAGE');
　　PARAMETER VALUE
　　------------------------------ ------------------------------
　　NLS_DATE_FORMAT DD-MON-RR
　　NLS_DATE_LANGUAGE SIMPLIFIED CHINESE
　　SQL> select isdate('1-1月-06') as day from dual;
　　DAY
　　----------
　　01-1月 -06
　　SQL> select isdate('01-jan-06') as day from dual;
　　DAY
　　----------
　　[null]
　　SQL> alter session set nls_date_language=american;
　　会话已更改。
　　SQL> select isdate('01-jan-06') as day from dual;
　　DAY
　　---------
　　01-JAN-06
　　SQL> select isdate('2006-01-01','yyyy-mm-dd') as day from dual;
　　DAY
　　---------
　　01-JAN-06
　　SQL> select isdate('1-1月-06','dd-mon-yy','nls_date_language=simplified chinese') as day from dual;
　　DAY
　　---------
　　[null]
　　SQL> select isdate('1-1月-06','dd-mon-yy','nls_date_language=''simplified chinese''') as day from dual;
　　DAY
　　---------
　　01-JAN-06
　　SQL>