The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE validate_update(p_effective_date IN DATE
,p_datetrack_mode IN VARCHAR2
,p_payroll_id IN NUMBER
,p_payroll_name IN VARCHAR2
,p_soft_coding_keyflex_id_in in NUMBER) IS
--
l_cur_scl_id NUMBER;
SELECT soft_coding_keyflex_id, effective_start_date, effective_end_date
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND p_effective_date BETWEEN effective_start_date and effective_end_date;
SELECT soft_coding_keyflex_id
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND l_cur_eff_end+1 BETWEEN effective_start_date and effective_end_date;
SELECT soft_coding_keyflex_id
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND l_cur_eff_start-1 BETWEEN effective_start_date and effective_end_date;
SELECT segment1
FROM hr_soft_coding_keyflex
WHERE soft_coding_keyflex_id = p_scl_id;
SELECT min(effective_start_date) first_eff_start, max(effective_end_date)
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id;
SELECT 1
FROM per_all_assignments_f a,
per_assignment_status_types past
where a.payroll_id = c_payroll_id
and a.assignment_status_type_id = past.assignment_status_type_id
and past.per_system_status IN ('TERM_ASSIGN')
and c_effective_date between a.effective_start_date and a.effective_end_date;
SELECT 1
FROM per_all_assignments_f a,
per_assignment_status_types past,
pay_assignment_actions act,
pay_payroll_actions pact,
per_time_periods ptp
where a.payroll_id = c_payroll_id
and a.assignment_status_type_id = past.assignment_status_type_id
and past.per_system_status IN ('TERM_ASSIGN')
and c_effective_date between a.effective_start_date and a.effective_end_date
and pact.payroll_action_id = act.payroll_action_id
and pact.action_type in ('Q', 'R', 'B', 'I', 'V')
and act.assignment_id = a.assignment_id
and pact.time_period_id = ptp.time_period_id
and regular_payment_date >= c_effective_date;
l_proc VARCHAR2(100) := 'pay_gb_payroll_rules.validate_update';
IF p_datetrack_mode = hr_api.g_update
OR p_datetrack_mode = hr_api.g_update_override THEN
hr_utility.trace('Datetrack Action is Update or Update Override.');
END IF; -- Date track update or update override
IF p_datetrack_mode = hr_api.g_update_change_insert THEN
hr_utility.trace('Datetrack Action is Update Change Insert.');
END IF; -- Date track update change insert
hr_utility.trace('No problem with this update/correction.');
hr_utility.trace('Leaving pay_gb_payroll_rules.validate_update');
END validate_update;
PROCEDURE validate_delete(p_effective_date IN DATE
,p_datetrack_mode IN VARCHAR2
,p_payroll_id IN NUMBER) IS
--
l_cur_scl_id NUMBER;
SELECT soft_coding_keyflex_id, effective_end_date
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND p_effective_date BETWEEN effective_start_date and effective_end_date;
SELECT effective_end_date
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND l_cur_eff_end+1 BETWEEN effective_start_date and effective_end_date;
SELECT soft_coding_keyflex_id
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id
AND l_next_eff_end+1 BETWEEN effective_start_date and effective_end_date;
SELECT segment1
FROM hr_soft_coding_keyflex
WHERE soft_coding_keyflex_id = p_scl_id;
SELECT min(effective_start_date) first_eff_start, max(effective_end_date)
FROM pay_all_payrolls_f
WHERE payroll_id = p_payroll_id;
SELECT 1
FROM per_all_assignments_f a,
per_assignment_status_types past
where a.payroll_id = c_payroll_id
and a.assignment_status_type_id = past.assignment_status_type_id
and past.per_system_status IN ('TERM_ASSIGN')
and c_effective_date between a.effective_start_date and a.effective_end_date;
SELECT 1
FROM per_all_assignments_f a,
per_assignment_status_types past,
pay_assignment_actions act,
pay_payroll_actions pact,
per_time_periods ptp
where a.payroll_id = c_payroll_id
and a.assignment_status_type_id = past.assignment_status_type_id
and past.per_system_status IN ('TERM_ASSIGN')
and c_effective_date between a.effective_start_date and a.effective_end_date
and pact.payroll_action_id = act.payroll_action_id
and pact.action_type in ('Q', 'R', 'B', 'I', 'V')
and act.assignment_id = a.assignment_id
and pact.time_period_id = ptp.time_period_id
and regular_payment_date >= c_effective_date;
l_proc VARCHAR2(100) := 'pay_gb_payroll_rules.validate_delete';
IF p_datetrack_mode = hr_api.g_delete_next_change THEN
hr_utility.trace('Datetrack Mode is Delete next change.');
hr_utility.trace('No problem with this delete.');
hr_utility.trace('Leaving pay_gb_payroll_rules.validate_delete');
END validate_delete;