The following lines contain the word 'select', 'insert', 'update' or 'delete':
t_call_stack.delete;
select decode(substr (value,1,instr(value,',') -1) ,null, value,substr (value,1,instr(value,',') -1))
into last_utl_dir
from v$parameter
where name = 'utl_file_dir';
t_call_stack.delete(pn_reg_id);
t_call_stack.delete(pn_reg_id,ln_stack_top);
select debug_log_id
,log_context
,nvl(log_status,0) log_status
,log_file_prefix
,debug_user_id
,OBJECT_VERSION_NUMBER -- added by bgowrava for forward porting bug #5631784
from jai_cmn_debug_contexts dlog
where pv_context like dlog.log_context || '%'
and debug_user_id = ln_user_id
order by (length(pv_context)-length(dlog.log_context))
, dlog.debug_log_id ;
select fnd_global.user_id into ln_user_id from dual;
select sys_context('USERENV','SESSIONID') into ln_audsid from dual;