The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 1
INTO dummy
FROM dual
WHERE NOT EXISTS
(SELECT 1
FROM GL_SHARES_ACTIVITY
WHERE ledger_id = X_ledger_id
AND activity_date = X_activity_date
AND activity_type_code = X_activity_type_code
AND ((X_rowid is null) OR (rowid <> X_rowid)));