The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure dt_delete_dml
(p_rec in out nocopy pay_fed_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'dt_delete_dml';
If (p_datetrack_mode = 'DELETE_NEXT_CHANGE') then
hr_utility.set_location(l_proc, 10);
delete from pay_us_emp_fed_tax_rules_f
where emp_fed_tax_rule_id = p_rec.emp_fed_tax_rule_id
and effective_start_date = p_validation_start_date;
delete from pay_us_emp_fed_tax_rules_f
where emp_fed_tax_rule_id = p_rec.emp_fed_tax_rule_id
and effective_start_date >= p_validation_start_date;
End dt_delete_dml;
Procedure delete_dml
(p_rec in out nocopy pay_fed_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'delete_dml';
dt_delete_dml(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => p_validation_start_date,
p_validation_end_date => p_validation_end_date);
End delete_dml;
Procedure dt_pre_delete
(p_rec in out nocopy pay_fed_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'dt_pre_delete';
If (p_datetrack_mode = 'DELETE') then
p_rec.effective_end_date := p_validation_start_date - 1;
End dt_pre_delete;
Procedure pre_delete
(p_rec in out nocopy pay_fed_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'pre_delete';
dt_pre_delete
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => p_validation_start_date,
p_validation_end_date => p_validation_end_date);
End pre_delete;
Procedure post_delete
(p_rec in pay_fed_shd.g_rec_type,
p_effective_date in date,
p_datetrack_mode in varchar2,
p_validation_start_date in date,
p_validation_end_date in date) is
--
l_proc varchar2(72) := g_package||'post_delete';
/* pay_fed_rkd.after_delete
(
p_emp_fed_tax_rule_id =>p_rec.emp_fed_tax_rule_id
,p_datetrack_mode =>p_datetrack_mode
,p_effective_date =>p_effective_date
,p_object_version_number =>p_rec.object_version_number
,p_validation_start_date =>p_validation_start_date
,p_validation_end_date =>p_validation_end_date
,p_effective_start_date =>p_rec.effective_start_date
,p_effective_end_date =>p_rec.effective_end_date
,p_effective_start_date_o =>pay_fed_shd.g_old_rec.effective_start_date
,p_effective_end_date_o =>pay_fed_shd.g_old_rec.effective_end_date
,p_assignment_id_o =>pay_fed_shd.g_old_rec.assignment_id
,p_sui_state_code_o =>pay_fed_shd.g_old_rec.sui_state_code
,p_sui_jurisdiction_code_o =>pay_fed_shd.g_old_rec.sui_jurisdiction_code
,p_business_group_id_o =>pay_fed_shd.g_old_rec.business_group_id
,p_additional_wa_amount_o =>pay_fed_shd.g_old_rec.additional_wa_amount
,p_filing_status_code_o =>pay_fed_shd.g_old_rec.filing_status_code
,p_fit_override_amount_o =>pay_fed_shd.g_old_rec.fit_override_amount
,p_fit_override_rate_o =>pay_fed_shd.g_old_rec.fit_override_rate
,p_withholding_allowances_o =>pay_fed_shd.g_old_rec.withholding_allowances
,p_cumulative_taxation_o =>pay_fed_shd.g_old_rec.cumulative_taxation
,p_eic_filing_status_code_o =>pay_fed_shd.g_old_rec.eic_filing_status_code
,p_fit_additional_tax_o =>pay_fed_shd.g_old_rec.fit_additional_tax
,p_fit_exempt_o =>pay_fed_shd.g_old_rec.fit_exempt
,p_futa_tax_exempt_o =>pay_fed_shd.g_old_rec.futa_tax_exempt
,p_medicare_tax_exempt_o =>pay_fed_shd.g_old_rec.medicare_tax_exempt
,p_ss_tax_exempt_o =>pay_fed_shd.g_old_rec.ss_tax_exempt
,p_wage_exempt_o =>pay_fed_shd.g_old_rec.wage_exempt
,p_statutory_employee_o =>pay_fed_shd.g_old_rec.statutory_employee
,p_w2_filed_year_o =>pay_fed_shd.g_old_rec.w2_filed_year
,p_supp_tax_override_rate_o =>pay_fed_shd.g_old_rec.supp_tax_override_rate
,p_excessive_wa_reject_date_o =>pay_fed_shd.g_old_rec.excessive_wa_reject_date
,p_object_version_number_o =>pay_fed_shd.g_old_rec.object_version_number
);
End post_delete;
,p_delete_routine in varchar2 default null
) is
--
l_proc varchar2(72) := g_package||'del';
pay_fed_bus.delete_validate
(p_rec => p_rec
,p_effective_date => p_effective_date
,p_datetrack_mode => p_datetrack_mode
,p_validation_start_date => l_validation_start_date
,p_validation_end_date => l_validation_end_date
,p_delete_routine => p_delete_routine
);
pre_delete
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
delete_dml
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
post_delete
(p_rec => p_rec,
p_effective_date => p_effective_date,
p_datetrack_mode => p_datetrack_mode,
p_validation_start_date => l_validation_start_date,
p_validation_end_date => l_validation_end_date);
,p_delete_routine in varchar2 default null
) is
--
l_rec pay_fed_shd.g_rec_type;
, p_delete_routine
);