密码加密功能在Oracle 11g中不起作用

Question

该功能在Oracle 11g中不起作用。

我确实在Oracle 8i数据库中使用了相同的功能，但它正在运行。

create or replace FUNCTION chePass( pa char) RETURN char is a varchar2(50);
b char(1);
c number(4):=0;
H varchar2(30);
BEGIN

  if pa is null then
    return null;
  end if;
  a:=rtrim(pa);
   for i in 1..length(a) loop
   b:=substr(a,i,1);
   c:=ASCII(b);

    IF C <= 27*i then
       c:=(255+c)- (27*i);
    else
       c:=c - (27*i);
    end if;
         H:= H || chr(c);  

   end loop;
return H; 
END;

请帮我解决问题。