The following lines contain the word 'select', 'insert', 'update' or 'delete':
v_last_update_login NUMBER := FND_GLOBAL.LOGIN_ID;
SELECT user_name INTO v_user_name
FROM fnd_user
WHERE user_id = p_user_id;
SELECT folder_id INTO p_folder_id
FROM fem_folders_vl
WHERE created_by = p_user_id
AND upper(folder_name) = UPPER(v_user_name);
SELECT fem_folder_id_seq.nextval INTO p_folder_id FROM DUAL;
INSERT INTO fem_folders_b (folder_id, object_version_number,
created_by, creation_date, last_updated_by,
last_update_date, last_update_login) VALUES
(p_folder_id, 1, p_user_id, sysdate, p_user_id, sysdate, v_last_update_login);
INSERT INTO fem_folders_tl (folder_id, folder_name, description,
created_by, creation_date, last_updated_by,
last_update_date, last_update_login, language, source_lang)
SELECT
p_folder_id, v_user_name, v_user_name,
p_user_id, sysdate, p_user_id, sysdate, v_last_update_login,
l.language_code, userenv('LANG')
FROM fnd_languages l
WHERE l.installed_flag IN ('I', 'B')
AND NOT EXISTS
(SELECT NULL
FROM fem_folders_tl t
WHERE t.folder_id = p_folder_id
AND t.language = l.language_code);
INSERT INTO fem_user_folders (folder_id, user_id, write_flag,
object_version_number, created_by, creation_date, last_updated_by,
last_update_date, last_update_login) VALUES
(p_folder_id, p_user_id, 'Y',1, p_user_id, sysdate, p_user_id,
sysdate, v_last_update_login);
v_last_update_login NUMBER := FND_GLOBAL.Login_Id;
INSERT INTO fem_user_folders (folder_id, user_id, write_flag,
object_version_number, created_by, creation_date, last_updated_by,
last_update_date, last_update_login)
SELECT
folder_id, p_user_id, p_write_flag,
1, p_user_id, sysdate, p_user_id,
sysdate, v_last_update_login
FROM fem_folders_vl
WHERE folder_id = p_folder_id;