The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_RU_CON_REL(P_CONTACT_RELATIONSHIP_ID NUMBER,
P_CONTACT_TYPE VARCHAR2,
p_cont_information1 VARCHAR2) IS
CURSOR cur_crl IS
SELECT contact_type,cont_information1 FROM per_contact_relationships
WHERE contact_person_id IN
(SELECT contact_person_id FROM per_contact_relationships WHERE contact_relationship_id = p_contact_relationship_id)
AND person_id IN (SELECT person_id FROM per_contact_relationships WHERE contact_relationship_id = p_contact_relationship_id)
AND contact_relationship_id = p_contact_relationship_id;
END UPDATE_RU_CON_REL;