跨千年日期转换

CREATE OR REPLACE FUNCTION my_to_date (p_chr_date IN VARCHAR2)

RETURN DATE

IS

BEGIN

IF (p_chr_date IS NULL)

THEN

RETURN NULL;

ELSE

IF (TO_DATE (p_chr_date, 'dd-mm-yy') > SYSDATE)

THEN

RETURN TO_DATE (p_chr_date, 'dd-mm-rr');

ELSE

RETURN TO_DATE (p_chr_date, 'dd-mm-yy');

END IF;

END IF;

END;