create or replace
FUNCTION FUNKCE(idd number) RETURN NUMBER AS
narozeniDitete date;
narozeniPozadovaneho date;
pocet number;
pocet2 number;
BEGIN
pocet := 0;
pocet2 : = 0;
if idd is null then
      raise_application_error(-20001,'ID osoby není vyplněno');
      else
select narozen into narozeniDitete from a_clovek.lide where (sysdate-narozen)/365.25 =
(select min(sysdate-narozen)/365.25 from a_clovek.lide  connect by prior id in (lide.id_matky, lide.id_otce)
start with id = idd);

select narozen into narozeniPozadovaneho from a_clovek.lide where id = idd;
return round(((narozeniDitete - narozeniPozadovaneho)/365.25),1);

select (count(*) - 1) into pocet from a_clovek.lide  connect by prior id in (lide.id_matky, lide.id_otce)
start with id = idd;

select count(*) from a_clovek.lide where id = idd;

if(pocet2 = 0) then return -1;
end if;

if (pocet = 0) then return NULL ;
end if;
   end if;

END FUNKCE;