The following lines contain the word 'select', 'insert', 'update' or 'delete':
select resource_id into l_interaction_rec.resource_id
from jtf_rs_resource_extns
where user_id = p_ies_user_id;
procedure Update_Activity
(p_ies_user_id IN NUMBER,
p_ies_interaction_id IN NUMBER,
p_ies_activity_id IN NUMBER,
p_ies_outcome_id IN NUMBER,
x_ies_return_status OUT NOCOPY VARCHAR2,
x_ies_msg_count OUT NOCOPY NUMBER,
x_ies_msg_data OUT NOCOPY VARCHAR2) as
l_activity_rec JTF_IH_PUB.activity_rec_type;
JTF_IH_PUB.Update_Activity(
p_api_version => 1.0,
x_return_status => x_ies_return_status,
x_msg_count => x_ies_msg_count,
x_msg_data => x_ies_msg_data,
p_user_id => p_ies_user_id,
p_activity_rec => l_activity_rec
);
end Update_Activity;