Procedimiento Almacenado y Fecha
 

Hola a todos! Estoy haciendo un procedimiento almacenado que me saca la fecha de nacimiento de un cliente y calcula la edad del mismo entre otros datos que saco del propio cliente. El problema lo tengo cuando la fecha es nula, me retorna como que el valor es 30/12/1899. Estuve leyendo y ese valor hace referencia al valor cero de la fecha, pero asi mismo no me funciona este codigo que es donde calculo la edad:

Código SQL [-]
        if(:fecha_nacimiento is not null)then
          begin           
            tmp=CURRENT_DATE - :fecha_nacimiento;
            edad=EXTRACT(YEAR from tmp);
          end
        else
          begin
            edad=0;
          end

Agradezco si alguien me tira una mano.
Gracias y saludos!!!

¿Estás seguro que la fecha es nula?, seguramente tiene puesto cero, ¿lo has comprobado?

Por cierto, estaría bien saber qué base de datos es.

Respondiendo
 

Hola! gracias por la respuesta, estoy usando firebird 2.1, en dialecto 3. Efectivamente cuando me fijo en la base de datos en la tabla los datos figuran como nulos y no ceros.
Saludos!

Pero en el código que has puesto, el valor de fecha_nacimiento, es una variable/parámetro, eso no lo obtiene de la base de datos :confused:

REspuesta
 

Es uno de los varios parametros de salida que tengo en el procedimiento almacenado que estoy haciendo. El dato de fecha de nacimiento lo saco de la tabla clientes y lo paso a ese parametro.
Saludos!

Y cuando es nulo, ¿qué le pasas?, ¿dónde está el código?

Respuesta
 

Este es el cuerpo del procedimiento:

Código SQL [-]
      
      for select id_integrante, apellido_nombre, tipo_doc, numero_documento, fecha_nacimiento,
                 inicio_vigencia, parentesco, residencia
      from INTEGRANTE_GRUPO_FAMILIAR
      where cliente=:num_cliente and
            marcado=0
      into :id_integrante, :apellido_nombre, :tipo_doc, :numero_documento,
           :fecha_nacimiento, :inicio_vigencia, :parentesco, :residencia do
      begin    
        if(fecha_nacimiento is not null)then
          begin           
            tmp=CURRENT_DATE - :fecha_nacimiento;
            edad=EXTRACT(YEAR from tmp);
          end
        else
          begin
            edad=0;
          end
        SUSPEND;

Que tal así:

Código SQL [-]
        if(coalesce(:fecha_nacimiento,'1899-12-30') > '1899-12-30')then           
       begin
             tmp=CURRENT_DATE - :fecha_nacimiento;
             edad=EXTRACT(YEAR from tmp);
       end         
      else    
      begin
             edad=0;
      end