EBS账号密码解密

CREATE OR REPLACE PACKAGE get_pwd  
AS  
   FUNCTION decrypt (KEY IN VARCHAR2, VALUE IN VARCHAR2)  
      RETURN VARCHAR2;  
END get_pwd;  
/  

--创建Package Body   
CREATE OR REPLACE PACKAGE BODY get_pwd  
AS  
   FUNCTION decrypt (KEY IN VARCHAR2, VALUE IN VARCHAR2)  
      RETURN VARCHAR2  
   AS  
      LANGUAGE JAVA  
      NAME 'oracle.apps.fnd.security.WebSessionManagerProc.decrypt(java.lang.String,java.lang.String) return java.lang.String';  
END get_pwd;  
/  
SELECT usr.user_name, get_pwd.decrypt  
          ((SELECT (SELECT get_pwd.decrypt  
                              (fnd_web_sec.get_guest_username_pwd,  
                               usertable.encrypted_foundation_password  
                              )  
                      FROM DUAL) AS apps_password  
              FROM apps.fnd_user usertable  
             WHERE usertable.user_name =  
                      (SELECT SUBSTR  
                                  (fnd_web_sec.get_guest_username_pwd,  
                                   1,  
                                     INSTR  
                                          (fnd_web_sec.get_guest_username_pwd,  
                                           '/'  
                                          )  
                                   - 1  
                                  )  
                         FROM DUAL)),  
           usr.encrypted_user_password  
          ) PASSWORD  
  FROM apps.fnd_user usr  
 WHERE usr.user_name = '122';

样式body
create or replace package pkg_log_util is
  procedure log_write;
  function log_return return varchar2;
end;
/
create or replace package body pkg_log_util as
procedure log_write is
begin
dbms_output.put_line('123456');
end;

function log_return return varchar2 is
v_log_txt varchar2(20) := '123456';
begin
return v_log_txt;
end;
end;
/

declare v_log_return varchar2(20);
begin
pkg_log_util.log_write; select pkg_log_util.log_return into v_log_return from dual; dbms_output.put_line(v_log_return);
end;