Declare
	Date_Exception Exception ;
Begin
	If length(:dual.test_date) = 6 then
		:dual.test_date := to_char(to_date(:dual.test_date,'ddmmrr'),'dd/mm/yyyy');
	Elsif length(:dual.test_date) = 8 then
		:dual.test_date := to_char(to_date(:dual.test_date,'ddmmyyyy'),'dd/mm/yyyy');
	Elsif length(:dual.test_date) = 10 then
		:dual.test_date := to_char(to_date(:dual.test_date,'DD-MM-YYYY'),'dd/mm/yyyy');	  	
	Else
	  RAISE date_exception;
	End If;
Exception
  When date_exception Then
  	Message('acceptible date formats are: ddmmyy(yy), dd/mm/yyyy, dd-mm-yyyy');pause;	
    RAISE FORM_TRIGGER_FAILURE;  	
  When Others Then		
    Message(sqlerrm);pause;
    Raise form_trigger_failure;
End;