The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT sys_key_hash
FROM iby_sys_security_options;
SELECT sys_key_file_location FROM iby_sys_security_options;
UPDATE iby_sys_security_options
SET sys_key_hash = get_key_hash(p_sys_sec_key),
salt_version = get_salt_version,
sys_key_file_location = p_wallet_path,
object_version_number = object_version_number + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id;
UPDATE iby_sys_security_subkeys
SET subkey_cipher_text =
Recipher_Key(subkey_cipher_text,p_sys_key_old,p_sys_key_new),
object_version_number = object_version_number + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id;
UPDATE iby_sys_security_options
SET sys_key_hash = get_key_hash(p_sys_key_new),
salt_version = get_salt_version,
sys_key_file_location = p_wallet_path_new,
object_version_number = object_version_number + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id;
SELECT k.sec_subkey_id, k.subkey_cipher_text
FROM iby_sys_security_subkeys k, iby_sys_security_options o
WHERE ( ( k.use_count < o.subkey_use_maximum) )
AND ( (sysdate - k.creation_date) < NVL(o.subkey_age_maximum,30) )
ORDER BY sec_subkey_id ASC;
SELECT iby_sys_security_subkeys_s.NEXTVAL INTO x_subkey_id FROM dual;
INSERT INTO iby_sys_security_subkeys
(sec_subkey_id, subkey_cipher_text, use_count,
created_by, creation_date, last_updated_by, last_update_date,
last_update_login, object_version_number)
VALUES
(x_subkey_id, l_subkey_ciphertxt, 1,
fnd_global.user_id, sysdate, fnd_global.user_id, sysdate,
fnd_global.login_id, 1);
UPDATE iby_sys_security_subkeys
SET use_count = use_count + 1,
object_version_number = object_version_number + 1,
last_update_date = sysdate,
last_updated_by = fnd_global.user_id,
last_update_login = fnd_global.login_id
WHERE (sec_subkey_id = x_subkey_id);
SELECT subkey_cipher_text INTO l_subkey_cipher FROM iby_sys_security_subkeys
WHERE sec_subkey_id = p_subkey_id;
SELECT iby_security_segments_s.NEXTVAL INTO x_segment_id FROM DUAL;
INSERT INTO iby_security_segments
(sec_segment_id, segment_cipher_text, sec_subkey_id, encoding_scheme,
created_by, creation_date, last_updated_by, last_update_date,
last_update_login, object_version_number
)
VALUES
(x_segment_id, l_segment_cipher, lx_subkey_id, p_encoding,
fnd_global.user_id, sysdate, fnd_global.user_id, sysdate,
fnd_global.login_id, 1
);
PROCEDURE Update_Segment
(p_commit IN VARCHAR2,
p_segment_id IN iby_security_segments.sec_segment_id%TYPE,
p_segment IN RAW,
p_encoding IN VARCHAR2,
p_sys_key IN DES3_KEY_TYPE,
p_subkey_cipher IN DES3_KEY_TYPE
)
IS
l_segment_cipher iby_security_segments.segment_cipher_text%TYPE;
UPDATE iby_security_segments
SET
segment_cipher_text = l_segment_cipher,
encoding_scheme = NVL(p_encoding,encoding_scheme),
last_updated_by = fnd_global.user_id,
last_update_date = SYSDATE,
last_update_login = fnd_global.user_id,
object_version_number = object_version_number + 1
WHERE sec_segment_id=p_segment_id;
END Update_Segment;
SELECT sk.subkey_cipher_text
INTO l_subkey_cipher
FROM iby_sys_security_subkeys sk
, iby_security_segments ss
WHERE sk.sec_subkey_id = ss.sec_subkey_id
AND ss.sec_segment_id = p_sec_segment_id;
Update_Segment ( FND_API.G_FALSE
, p_sec_segment_id
, l_fv_segment
, iby_security_pkg.G_ENCODING_UTF8_AL32
, master_key_in
, l_subkey_cipher
);
DELETE FROM iby_security_segments
WHERE sec_segment_id = p_sec_segment_id;
SELECT value
INTO l_db_characterset
FROM v$nls_parameters
WHERE parameter = 'NLS_CHARACTERSET';
SELECT bak.subkey_cipher_text
, bas.segment_cipher_text
, bas.encoding_scheme
INTO l_subkey_ciphertxt
, l_fv_segment
, l_encoding
FROM iby_sys_security_subkeys bak
, iby_security_segments bas
WHERE bas.sec_subkey_id = bak.sec_subkey_id
AND bas.sec_segment_id = p_sec_segment_id;