The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1
FROM FND_ENABLED_PLSQL
WHERE PLSQL_TYPE = 'PROCEDURE'
AND PLSQL_NAME = v_procedure
AND ENABLED = 'Y';
SELECT 1
FROM FND_ENABLED_PLSQL
WHERE ( (PLSQL_TYPE = 'PACKAGE' AND PLSQL_NAME = v_pack)
OR (PLSQL_TYPE = 'PACKAGE.PROCEDURE' AND PLSQL_NAME = v_packproc))
AND ENABLED = 'Y';