The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT user_name, email_address, employee_id, customer_id, supplier_id
INTO l_user_name, l_email_address, l_employee_id, l_customer_id,
l_vendor_id
FROM fnd_user
WHERE user_id = p_user_id
AND SYSDATE BETWEEN NVL(start_date, SYSDATE) AND NVL(end_date, SYSDATE);
SELECT pwx.full_name full_name, pwx.email_address email_address
INTO p_full_name, p_email_address
FROM fnd_user fu, per_workforce_current_x pwx
WHERE fu.employee_id IS NOT NULL
AND fu.employee_id = pwx.person_id
AND SYSDATE BETWEEN NVL(fu.start_date, SYSDATE) AND NVL(fu.end_date, SYSDATE)
AND fu.user_id = p_user_id;
SELECT hp.party_name full_name, hp.email_address email_address
INTO p_full_name, p_email_address
FROM fnd_user fu, hz_parties hp
WHERE fu.customer_id IS NOT NULL
AND fu.customer_id = hp.party_id
AND fu.user_id = p_user_id;
SELECT pvc.last_name || ', ' || pvc.first_name full_name, pvc.email_address email_address
INTO p_full_name, p_email_address
FROM fnd_user fu, po_vendor_contacts pvc
WHERE fu.supplier_id IS NOT NULL
AND fu.supplier_id = pvc.vendor_contact_id
AND NVL(pvc.inactive_date, SYSDATE) >= SYSDATE
AND fu.user_id = p_user_id;