The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT resource_id
INTO l_from_resource_id
FROM PA_RESOURCE_TXN_ATTRIBUTES
WHERE PARTY_ID = p_from_fk_id
AND ROWNUM=1;
SELECT resource_id
INTO l_to_resource_id
FROM PA_RESOURCE_TXN_ATTRIBUTES
WHERE PARTY_ID = p_to_fk_id
AND ROWNUM=1;
UPDATE PA_RESOURCE_TXN_ATTRIBUTES
SET PARTY_ID = P_TO_FK_ID,
last_update_date = hz_utility_pub.last_update_date,
last_updated_by = hz_utility_pub.user_id,
last_update_login = hz_utility_pub.last_update_login,
request_id = hz_utility_pub.request_id,
program_application_id = hz_utility_pub.program_application_id,
program_id = hz_utility_pub.program_id,
program_update_date = sysdate
WHERE PARTY_ID = P_FROM_FK_ID;
SELECT 'Y'
INTO l_exists
FROM PA_PROJECT_ASSIGNMENTS
WHERE RESOURCE_ID = l_from_resource_id
AND ROWNUM = 1;
SELECT 'Y'
INTO l_exists
FROM PA_CANDIDATES
WHERE RESOURCE_ID = l_from_resource_id
AND ROWNUM = 1;
pa_ci_merge_pkg.update_project_parties_res_id
(p_from_resource_id => l_from_resource_id,
p_to_resource_id => l_to_resource_id,
x_return_status => l_return_status);
delete from pa_resources
where resource_id = l_from_resource_id;
delete from pa_resource_txn_attributes
where resource_id = l_from_resource_id;