The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE update_cln_history
(
a_cln_id IN NUMBER,
a_sts IN VARCHAR2,
a_msg IN VARCHAR2
) AS
PRAGMA AUTONOMOUS_TRANSACTION;
cln_debug_pub.add('Entering m4u_get_cin_extn.update_cln_history',2);
wf_event.raise( p_event_name =>'oracle.apps.cln.ch.collaboration.update',
p_event_key =>l_key,
p_parameters =>l_cln_params);
cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Normal',2);
cln_debug_pub.add('Unexpected error in m4u_get_cin_extn.update_cln_history',6);
cln_debug_pub.add('Exiting m4u_get_cin_extn.update_cln_history - Exception',6);
cln_debug_pub.add('Update_cln_history with failure',1);
update_cln_history(l_cln_id,l_ret_sts,l_ret_msg);
cln_debug_pub.add('Update_cln_history with failure',1);
update_cln_history(l_cln_id,l_ret_sts,l_ret_msg);
update_cln_history(l_cln_id,g_error_code,SQLCODE || SQLERRM);