The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT us.text
, us.line
FROM user_source us
WHERE us.name = UPPER(p_package_name)
AND us.type = UPPER(p_package_type)
ORDER BY line;
SELECT SUBSTR(ue.text,1,2000) error
, ue.line
FROM user_errors ue
WHERE ue.name = UPPER(p_package_name)
AND ue.type = UPPER(p_package_type)
ORDER BY line;
SELECT uo.status
INTO l_status
FROM user_objects uo
WHERE uo.object_name = UPPER(p_package_name)
AND uo.object_type = UPPER(p_package_type);