The following lines contain the word 'select', 'insert', 'update' or 'delete':
update_history EXCEPTION;
SELECT trading_partner_site_id
INTO l_Party_Site_ID
FROM mtl_client_parameters
WHERE client_id IN (SELECT cust_account_id
FROM hz_cust_accounts
WHERE party_id = P_txn_hist_record.trading_partner_id);
INV_TRANSACTIONS_HISTORY_PKG.Create_Update_Txns_History ( l_txn_hist_record,
l_xml_document_id,
l_txns_id,
l_return_status );
RAISE update_history;
WHEN update_history THEN
x_return_status := rcv_error_pkg.g_ret_sts_error;
inv_trx_util_pub.TRACE('update_history exception has occured.', 'INV_EXTERNAL_INTERFACE_SV', 9);