Oracle身份证校验函数

• Oracle身份证校验函数

CREATE OR REPLACE FUNCTION FUN_CHECK_SFZ(PRM_SFZ IN VARCHAR2)

  /*---------------------------------------------------------------------------
  *业务环节 ：校验身份证
  * 过程名称 ：FUN_CHECK_SFZ
  * 使用场合 ：对身份证号码进行校验，通过校验后返回值为1，也可以返回对应正确的身份证修改205行代码
  * 其它说明 ：返回值组成 ERRCOD+连接符(-)+表名+编号
  *                      ERRCODE-AC01000:身份证号码为空错误
  *                      ERRCODE-AC01001:身份证号码地区码非法
  *                      ERRCODE-AC01002:身份证号码位数非法
  *                      ERRCODE-AC01003:身份证号码含有非法字符
  *                      ERRCODE-AC01004:身份证出生日期非法
  *                      ERRCODE-AC01005:身份证号码校验码错误
  *
  *
  * 使用要求 ：
  * 作    者 ：AnQIang
  * 完成日期 ：2018年11月07日 11:33:24
  *---------------------------------------------------------------------------
  *---------------------------------------------------------------------------
  * 修 改 人 ：                      修改日期 ：
  *修改描述 ：
  *-------------------------------------------------------------------------*/

 RETURN VARCHAR2 IS

  --变量声明
  S_SFZ       VARCHAR2(30) DEFAULT ' ';
  I_LEN       INTEGER DEFAULT 0;
  I_VALID     INTEGER DEFAULT 0;
  I_FOR       INTEGER;
  S_VALIDCODE CHAR(1);
  S_BDATE     VARCHAR2(8);
  S_SFZ18     VARCHAR2(18);
  S_SFZ15     VARCHAR2(15);
  S_SFZ17