hur räkna ut ålder i PL SQL

Hej!

Sitter med samma uppgift. Men vet inte hur jag ska få ut datumet ur personnumret. Provat en hel del olika.
Nu ser det ut såhär:

declare 
cursor c_bilägare is select initcap(fnamn), initcap(enamn), pnr
                                   from bilägare;

v_fnamn bilägare.fnamn%type;
v_enamn bilägare.enamn%type;
v_pnr bilägare.pnr%type;

--v_datum date := to_date(substr(v_pnr,1,8), 'YYYYMMDD');

begin 
      if not c_bilägare%isopen THEN
      open c_bilägare;
      end if;

    loop
    fetch c_bilägare
    into v_fnamn, v_enamn, v_pnr;
    exit when c_bilägare%notfound;

dbms_output.put_line(v_fnamn||', '||v_enamn||', '||round((months_between(sysdate,(to_date(substr(v_pnr,1,8), 'YYYYMMDD'))/12),1);

end loop;

close c_bilägare;
end;
/