create or replace package encrypt_util
as
   crypt_value_error EXCEPTION;
   PRAGMA exception_init(crypt_value_error, -06502);
   
   crypt_key_error EXCEPTION;
   PRAGMA exception_init(crypt_key_error, -28817);
   
   
  --+ -----------------------------------------------------------------------
  -- encrypt text
  --+ -----------------------------------------------------------------------
  function encrypt (p_plaintext varchar2)
    return raw
    deterministic;

  --+ -----------------------------------------------------------------------
  -- decrypt text
  --+ -----------------------------------------------------------------------
  function decrypt (p_encryptedtext raw)
    return varchar2
    deterministic;

  --+ -----------------------------------------------------------------------
  -- store passwords in to a object
  --+ -----------------------------------------------------------------------
  procedure storepwd (p_pwd varchar2
              , p_slot number
              , p_store varchar2 default 'OBJECT'
              , p_private_key varchar2 default 'NO'
            );

  --+ -----------------------------------------------------------------------
  -- get User password
  --+ -----------------------------------------------------------------------
  function getuserpwd (p_slot number,p_private_key varchar2 default 'NO')
    return varchar2;

end encrypt_util;
/