哪位大哥帮忙写一个15位身份证号码转化为18位的Oracle函数？

Question

请到这里领分
http://expert.csdn.net/Expert/topic/2406/2406043.xml?temp=.5104639

Answer 1

update 身份证表 set sf_id = substr(sf_id,1,6)||'19'||substr(sf_id,7,9)||'随机数' where length(sf_id) = 15

Answer 2

我有个算法是c#,自己转换成oracle吧，有问题问我.
protected string converto18(string str15)
{
int[] arrSeed={7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2,1};
string[] Gunxi={"1","0","X","9","8","7","6","5","4","3","2"};
string str18;
str18=str15.Insert(6,"19");
            int intResult=0;
for(int i=0;i<17;i++)
{
intResult+=(int)(str18[i]-'0')*arrSeed[i];
}
int l=intResult%11;
str18=str18.Insert(17,Gunxi[l]);
return str18;
}

Answer 3

我在Oracle中写了个函数，编译通过了，但是在sql plus中调用时，出现错误ORA-06502: PL/SQL: 数字或值错误 ： 字符传缓冲区太小
函数如下：
CREATE OR REPLACE  FUNCTION "CLMIS"."IDCODE15TO18" 
(codein in char)
 return char
as
 i number(2);
 num number(2);
 idcode char(50);
 code char(20) ;
 type a_type is table of number;  --定义数组类型
 a a_type := a_type();            -- 定义并初始化一个数组变量 
begin
  idcode := substr(codein,1,6) || '19' || substr(codein,7,9) ;
  a.extend(17);
  a(1) := 7;
  a(2) := 9;
  a(3) := 10;
  a(4) := 5;
  a(5) := 8;
  a(6) := 4;
  a(7) := 2;
  a(8) := 1;
  a(9) := 6;
  a(10) := 3;
  a(11) := 7;
  a(12) := 9;
  a(13) := 10;
  a(14) := 5;
  a(15) := 8;
  a(16) := 4;
  a(17) :=2;
  
  num := 0;
  for i in 1..17 loop
    num := num + a(i) * (to_number(substr(idcode,i,1)));
  end loop; 
    
  num := num mod 11 ;
  
 if num = 0 then 
    code := '1';
  end if;
  
  if num = 1 then 
    code := '0';
  end if;
  
  if num = 2 then 
    code := 'x';
  end if;
  
  if num = 3 then 
    code := '9';
  end if;
  
  if num = 4 then 
    code := '8';
  end if;
  
  if num = 5 then 
    code := '7';
  end if;
  
  if num = 6 then 
    code := '6';
  end if;
  
  if num = 7 then 
    code := '5';
  end if;
  
  if num = 8 then 
    code := '4';
  end if;
  
  if num = 9 then 
    code := '3';
  end if;
  
  if num = 10 then 
    code := '2';
  end if;
  
  idcode := idcode || code;
  return idcode;
   
end;

Answer 4

sql server里面有个  staff（还是stuff？） 函数，不知道ora里面有没有？