The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_updates_cur CSM_UTIL_PKG.Changed_Records_Cur_Type;
l_inserts_cur CSM_UTIL_PKG.Changed_Records_Cur_Type;
l_prog_update_date jtm_con_request_data.last_run_date%TYPE;
SELECT nvl(last_run_date, (sysdate - 365*50))
FROM jtm_con_request_data
WHERE package_name = 'CSM_MESSAGES_EVENT_PKG'
AND procedure_name = 'REFRESH_ACC';
SELECT msg.application_id, msg.message_name, msg.language_code
FROM fnd_new_messages msg
WHERE
((msg.application_id = 513 -- CSF application
AND msg.message_name like 'CSF_M_%')
OR msg.application_id = 883) -- CSM application
AND NOT EXISTS
(SELECT 1
FROM csm_messages_acc acc
WHERE acc.application_id = msg.application_id
AND acc.message_name = msg.message_name
AND acc.language_code = msg.language_code
);
SELECT acc.access_id, msg.application_id, msg.message_name, msg.language_code
FROM fnd_new_messages msg,
csm_messages_acc acc
WHERE (msg.creation_date < p_last_upd_date AND msg.last_update_date > p_last_upd_date)
AND ((msg.application_id = 513 -- CSF application
AND msg.message_name like 'CSF_M_%')
OR msg.application_id = 883) -- CSM application
AND acc.application_id = msg.application_id
AND acc.message_name = msg.message_name
AND acc.language_code = msg.language_code;
SELECT acc.access_id, acc.language_code
FROM csm_messages_acc acc
WHERE NOT EXISTS
(SELECT 1
FROM fnd_new_messages msg
WHERE ((msg.application_id = 513 -- CSF application
AND msg.message_name like 'CSF_M_%')
OR msg.application_id = 883) -- CSM application
AND acc.application_id = msg.application_id
AND acc.message_name = msg.message_name
AND acc.language_code = msg.language_code
);
FETCH l_last_run_date_csr INTO l_prog_update_date;
DELETE FROM csm_messages_acc WHERE access_id = l_access_id;
FOR r_messages_upd_rec IN l_messages_upd_csr(l_prog_update_date) LOOP
--get the users with this language
l_tl_omfs_palm_resource_list := l_null_resource_list;
FOR r_messages_ins_rec IN l_messages_ins_csr(l_prog_update_date) LOOP
--get the users with this language
l_tl_omfs_palm_resource_list := l_null_resource_list;
SELECT csm_messages_acc_s.nextval
INTO l_access_id
FROM dual;
INSERT INTO csm_messages_acc (access_id,
application_id,
message_name,
language_code,
created_by,
creation_date,
last_updated_by,
last_update_date,
last_update_login
)
VALUES (l_access_id,
r_messages_ins_rec.application_id,
r_messages_ins_rec.message_name,
r_messages_ins_rec.language_code,
fnd_global.user_id,
l_run_date,
fnd_global.user_id,
l_run_date,
fnd_global.login_id
);
UPDATE jtm_con_request_data
SET last_run_date = l_run_date
WHERE package_name = 'CSM_MESSAGES_EVENT_PKG'
AND procedure_name = 'REFRESH_ACC';