身份證校驗碼演算法
身份證校驗碼產生方法：
∑(ai×Wi)(mod 11)

i: 表示號碼字元從由至左包括校驗碼在內的位置序號；

ai 表示第i位置上的號碼字元值；

Wi 第i位置上的加權因子，其數值Wi=mod(power(2,(n-1)),11)

i 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1
Wi 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2 1

相應的校驗碼:
∑(ai×WI)(mod 11) 0 1 2 3 4 5 6 7 8 9 10
校驗碼字元值ai 1 0 X 9 8 7 6 5 4 3 2

CREATE OR REPLACE FUNCTION f_id_verify(pid VARCHAR2) RETURN VARCHAR2 IS
RESULT VARCHAR2(18);
TYPE char_tabletype IS TABLE OF VARCHAR2(1) NOT NULL INDEX BY BINARY_INTEGER;
TYPE num_tabletype IS TABLE OF NUMBER NOT NULL INDEX BY BINARY_INTEGER;
tab_a char_tabletype;
tab_w num_tabletype;
tab_i char_tabletype;
i NUMBER(2) := 0;
len NUMBER(2) := length(rtrim(ltrim(pid)));
sigma NUMBER(4) := 0;
BEGIN
tab_i(0) := '1';
tab_i(1) := '0';
tab_i(2) := 'x';
tab_i(3) := '9';
tab_i(4) := '8';
tab_i(5) := '7';
tab_i(6) := '6';
tab_i(7) := '5';
tab_i(8) := '4';
tab_i(9) := '3';
tab_i(10) := '2';
IF len = 18 THEN
FOR i IN 1 .. 17
LOOP
tab_w(i) := MOD(power(2, ((19 - i) - 1)), 11);
tab_a(i) := substr(pid, i, 1);
sigma := sigma + tab_w(i) * tab_a(i);
END LOOP;
RESULT := substr(pid, 1, 17) || tab_i(MOD(sigma, 11));
END IF;
RETURN(RESULT);
END f_id_verify;
/[@more@]

18位身份證校驗演算法

相關文章