create or replace function isdate(mydate in varchar2)
return char is
tmp date;
begin
tmp:=to_date(mydate,'yyyymmdd');
return '1';
exception
when others then
return '0';
return char is
tmp date;
begin
tmp:=to_date(mydate,'yyyymmdd');
return '1';
exception
when others then
return '0';
end isdate;
select isdate(substr('320102199901322015',7,8)) from dual;