python判断身份证是否合法的函数_oracle中验证身份证是否合法的函数脚本

--创建函数 入参是身份证   返回1 合法 0不合法

CREATE OR REPLACE FUNCTION fn_checkidcard (p_idcard IN VARCHAR2) RETURN INT

IS

v_regstr VARCHAR2 (2000);

v_sum NUMBER;

v_mod NUMBER;

v_checkcode CHAR (11) := '10X98765432';

v_checkbit CHAR (1);

v_areacode VARCHAR2 (2000) := '11,12,13,14,15,21,22,23,31,32,33,34,35,36,37,41,42,43,44,45,46,50,51,52,53,54,61,62,63,64,65,71,81,82,91,';

BEGIN

CASE LENGTHB (p_idcard)

WHEN 15 THEN -- 15位

IF INSTRB (v_areacode, SUBSTR (p_idcard, 1, 2) || ',') = 0 THEN

RETURN 0;

END IF;

IF p_idcard ='111111111111111' THEN

RETURN 0;

END IF;

IF MOD (TO_NUMBER (SUBSTRB (p_idcard, 7, 2)) + 1900, 400) = 0

OR

(

MOD (TO_NUMBER (SUBSTRB (p_idcard, 7, 2)) + 1900, 100) <> 0

AND

MOD (TO_NUMBER