CREATE OR REPLACE FUNCTION FN_ISDATE ( p_in_str VARCHAR2 , p_in_format VARCHAR2 DEFAULT 'YYYYMMDD' ) RETURN NUMBER AS v_date DATE ; BEGIN v_date := TO_DATE(p_in_str,p_in_format); RETURN 1; EXCEPTION WHEN OTHERS THEN RETURN 0; END;