Oracle根据身份证号码获取年龄的函数

最近我在使用Oracle时，碰到根据身份证号码来获取当前的年龄，用其他自带函数拼接得出结果，不是很方便。然后发现数据库本身没有这个函数，然后我自己尝试写了一个函数，就是关于获取年龄的，仅供各位交流学习：

create or replace function FUNC_COMPARE_SFZHM( sfzhm in varchar2) --输入身份证号码
  return number
  /*
  函数说明，返回值0为小于18岁；值为1是大于75岁；其他情况是返回值为2
  在这个函数里用到了trunc(months_between()) 
  然后就是将身份证号码里的年月日组合成'yyyy-mm-dd'格式，但是在SQL里拼接用的是"||"，而不是"+"，这个值得注意
  */
is

begin
    if Trunc(MONTHS_BETWEEN(to_date(to_char(sysdate, 'yyyy-MM-dd'),'yyyy-MM-dd'),to_date(substr(sfzhm,7,4)||'-'||substr(sfzhm,11,2)||'-'||substr(sfzhm,13,2), 'yyyy-MM-dd')) / 12) < 18  then
      return 0;  
    elsif  Trunc(MONTHS_BETWEEN(to_date(to_char(sysdate, 'yyyy-MM-dd'),'yyyy-MM-dd'),to_date(substr(sfzhm,7,4)||'-'||substr(sfzhm,11,2)||'-'||substr(sfzhm,13,2), 'yyyy-MM-dd')) / 12) >75 then
    return 1;
    else
      return 2;
    end if;
end;

下面是函数调用的SQL语句：

select func_compare_sfzhm('31010320000314XXXX') from dual;//这个地方是举个例子，所以后面四位我用X替代