The following lines contain the word 'select', 'insert', 'update' or 'delete':
debug('update_type :'||g_pay_proc_evt_tab(i).update_type ,20);
ELSIF l_prev_event_dtl_rec.update_type <> g_prev_event_dtl_rec.update_type THEN
l_flag := 'N';
l_update_type VARCHAR2(5);
l_update_type := g_pay_proc_evt_tab(l_curr_evt_index).update_type;
debug('update_type :'||g_pay_proc_evt_tab(l_curr_evt_index).update_type ,20);
IF l_chg_table = 'PER_ALL_ASSIGNMENTS_F' AND l_update_type = 'I'
THEN
l_return := 'N'; -- this event is because of PQP_GB_PSI_NEW_HIRE event group.
IF l_update_type = 'C'
THEN
debug('correction event');
IF l_update_type = 'E' and l_return = 'Y'
THEN
l_wps_eff_end_date := p_effective_date + 1;
l_update_type VARCHAR2(5);
l_update_type := g_pay_proc_evt_tab(l_curr_evt_index).update_type;
debug('l_update_type :-'||l_update_type);
IF l_element_type_id <> g_pension_element_type_id and l_update_type = 'E'
and l_end_date_basic_ele = 'N'
THEN
l_g_effective_date := p_effective_date + 1;
debug('l_update_type:-'||l_update_type);
IF l_update_type = 'C'
THEN
debug('correction event');
l_update_type VARCHAR2(5);
l_update_type := g_pay_proc_evt_tab(l_curr_evt_index).update_type;
debug('l_update_type:-'||l_update_type);
IF l_element_type_id <> g_pension_element_type_id and l_update_type = 'E'
and l_end_date_basic_ele = 'N'
THEN
l_g_effective_date := p_effective_date + 1;
IF (l_update_type = 'E' AND l_element_type_id = g_pension_element_type_id) --For Bug 6071527
or g_is_terminated = 'Y'
THEN
OPEN get_wps_percent_cont_per
(p_element_entry_id => l_chg_surrogate_key
,p_effective_date => p_effective_date
,p_input_value_name => 'Opt Out Date'
);
l_update_type VARCHAR2(5);