一、判断日期函数例子
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
二、一个正确存储过程例子:
create or replace procedure p1
as
i number:=2;
begin
select count(*) into i from all_tables where table_name='t1';
if i=0 then
dbms_output.put_line('good1!');
elsif i>0 then
dbms_output.put_line('good2!');
else
--dbms_output.put_line('good3!');
--drop table t1; 不能用这个语句,因为存储过程里不能有DDL语句 execute immediate 'drop table t1'; end if; end;