ORACLE对身份证号码处理相关的SQL汇总

         目前我国大量存在着正在有效期的15位身份证，虽然国家在推行二代身份证，但尚未发现强行要求全国人民更换未到期的15位身份证的官方声明或公告。
          扯远了：），总之合法的15位身份证号码将在今后一段时间内继续存在下去。
         另外，项目中往往有着大量的历史数据，我们的一个系统中15位身份证所占比重很大，因此系统必须实现对两套身份证编码的职能处理，并支持另外一种特殊证件类型：军官证/警官证。本文重点讨论15位/18位身份证的处理问题
         众所周知，我们现执行的身份证号码编码由公安部具体落实编码规则，有15位/18位两种，公安部以数学语言描述的方式公开了身份证编码规则和位码含义，但具体到计算机语言实现，需要开发人员自行根据算法设计。网上流传版本不少，不过繁杂而凌乱，且与应用集合描述的不多。现结合项目实践谈谈其处理和用途。
         本文主要以oracle的SQL为例子，其他语言大家可以自行转换，道理都是一样的。
这里以ORACLE为例，其他数据库非常类似：
1 号码转换问题       
create or replace ID15TO18(p_OldID varchar2) return varchar2 is
   type TIArray is table of integer;
   type TCArray is table of char(1);
   Result varchar2(18);
   W TIArray;
   A TCArray;
   S integer;
begin
   if Length(p_OldID) <> 15 OR  NOT ISIDCARD(p_OldID) then
--raise_application_error(-20999, '不是旧15位身份证号或者不是身份证号');
   Result := p_OldID;
   else
   W := TIArray(7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2, 1);
   A := TCArray('1', '0', 'X', '9', '8', '7', '6', '5', '4', '3', '2');
   Result := SubStr(p_OldID, 1, 6) || '19' || SubStr(p_OldID, 7, 9);
   S := 0;
   begin
      for i in 1 .. 17 loop
      S := S + to_