Oracle MD5加密F_GET_COMPILE_PWD函数

CREATE OR REPLACE FUNCTION "F_GET_COMPILE_PWD"(login_name varchar2)
  RETURN VARCHAR2 as
  /***
  用sys登录，执行
  grant execute on DBMS_CRYPTO to username;
  --将DBMS_CRYPTO授权给username或其他用户MD5加密平台密码规则：密码(登录fun()账号}
  例子:
  select  lower(F_GET_COMPILE_PWD(12345{admin})) from dual
  生成的字符串即是admin对应密码12345的加密
  密码，拷贝到sys_user对应数据的密码列，刷新缓存即可；
  **/
  v_name varchar2(3000);
begin
  select dbms_crypto.Hash(UTL_I18N.STRING_TO_RAW(login_name, 'AL32UTF8'),
                          dbms_crypto.HASH_SH1)
    into v_name
    from dual;
  --dbms_output.put_line(n);
  --end;
  return v_name;
end F_GET_COMPILE_PWD;