[firebase-br] Validación de fechas

[W O]

Hola a todos

¿Cómo hago para validar una fecha en un Stored Procedure?


CREATE DOMAIN D_FECHA AS
  DATE
  NOT NULL
  CHECK (
VALUE >= '01.01.2011'
);


SET TERM ^ ;

CREATE PROCEDURE GRABAR(
  FECING TYPE OF D_FECHA,
RETURNS(
  CMENSAJEERROR VARCHAR(50) CHARACTER SET ISO8859_1 COLLATE ISO8859_1)
AS
BEGIN

  cMensajeError = '';     -- Si no hay error, devuelve una cadena vacía

  IF (EXTRACT(YEAR FROM :FECING) = 0) THEN EXCEPTION EX_FECHAINVALIDA;

  UPDATE OR INSERT INTO MITABLA
                        (VEN_FECING)
                 VALUES (:FECING);

  WHEN EXCEPTION EX_FECHAINVALIDA DO
    cMensajeError = 'Necesito conocer la Fecha de Ingreso';

  WHEN ANY DO
    cMensajeError = 'OCURRIÓ UN ERROR ' || SQLCODE || ' ' || GDSCODE;

END^

En ese Stored Procedure nunca se ejecuta la excepción EX_FECHAINVALIDA,
¿cómo puedo saber si el SP recibió una fecha nula? ¿o una fecha vacía?

Gracias de antemano.