Fórum Stored Procedure que retorne Idade e o mês atual.... #58719

CREATE PROCEDURE IDADE (
    nascimento date,
    data_base date)
returns (
    anos integer,
    meses smallint,
    dias smallint)
as
begin
  if (data_base is null) then
    data_base = current_date;

  anos = extract(year from data_base) - extract(year from nascimento);
  meses = extract(month from data_base) - extract(month from nascimento);
  dias = extract(day from data_base) - extract(day from nascimento);

  -- se quiser considerar o dia, habilite o código abaixo
/*  if (dias < 0) then
  begin
    dias = 30 + dias; -- valor aproximado de dias
    meses = meses - 1;
  end
*/
  if (meses < 0) then
  begin
    meses = meses + 12;
    anos = anos - 1;
  end

  suspend;
end