----permission settings grant execute on dbms_crypto to username;---------Encryption create or replace function encrypt256 (V_INPUT VARCHAR2) return rawisv_result raw (1999); c_ Key char (+) := ' 1q2wa3es4rz5tx6ycd*uf8tif9ogjen2 '; Beginv_result := sys. Dbms_crypto. ENCRYPT (utl_i18n. String_to_raw (v_input, ' Al32utf8 '), sys. Dbms_crypto. Encrypt_aes256+sys. Dbms_crypto. Chain_cbc+sys. Dbms_crypto. pad_pkcs5,utl_i18n. String_to_raw (c_key, ' Al32utf8 '));return v_result;end;-----------decryption create or replace function decrypt256 (V_input raw) return varchar2isv_result raw (1999); C_key char ( := ' 1q2wa3es4rz5tx6ycd*uf8tif9ogjen2 '; Beginv_result := sys. Dbms_crypto. DECRYPT (V_input,sys. Dbms_crypto. Encrypt_aes256+sys. Dbms_crypto. Chain_cbc+sys. Dbms_crypto. pad_pkcs5,utl_i18n. String_to_raw (c_key, ' Al32utf8 ')); return utl_i18n. Raw_to_char (v_result, ' Al32utf8 '); end;----MD5 encryption Create or replace function md5 (PASSWD IN VARCHAR2) RETURN VARCHAR2 IS  RETVAL VARCHAR2 (32); Begin retval := utl_raw.cast_to_raw (Dbms_obfuscation_toolkit. MD5 (INPUT_STRING => PASSWD)); return retval; END;
Oracle Database Encryption Scripts