The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure delete_dml(p_rec in pqp_det_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_dml';
delete from pqp_analyzed_alien_details
where analyzed_data_details_id = p_rec.analyzed_data_details_id;
End delete_dml;
Procedure pre_delete(p_rec in pqp_det_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_delete';
End pre_delete;
Procedure post_delete(
p_effective_date in date,p_rec in pqp_det_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_delete';
pqp_det_rkd.after_delete
(
p_analyzed_data_details_id =>p_rec.analyzed_data_details_id
,p_analyzed_data_id_o =>pqp_det_shd.g_old_rec.analyzed_data_id
,p_income_code_o =>pqp_det_shd.g_old_rec.income_code
,p_withholding_rate_o =>pqp_det_shd.g_old_rec.withholding_rate
,p_income_code_sub_type_o =>pqp_det_shd.g_old_rec.income_code_sub_type
,p_exemption_code_o =>pqp_det_shd.g_old_rec.exemption_code
,p_maximum_benefit_amount_o =>pqp_det_shd.g_old_rec.maximum_benefit_amount
,p_retro_lose_ben_amt_flag_o =>pqp_det_shd.g_old_rec.retro_lose_ben_amt_flag
,p_date_benefit_ends_o =>pqp_det_shd.g_old_rec.date_benefit_ends
,p_retro_lose_ben_date_flag_o =>pqp_det_shd.g_old_rec.retro_lose_ben_date_flag
,p_nra_exempt_from_ss_o =>pqp_det_shd.g_old_rec.nra_exempt_from_ss
,p_nra_exempt_from_medicare_o =>pqp_det_shd.g_old_rec.nra_exempt_from_medicare
,p_student_exempt_from_ss_o =>pqp_det_shd.g_old_rec.student_exempt_from_ss
,p_student_exempt_from_medi_o =>pqp_det_shd.g_old_rec.student_exempt_from_medicare
,p_addl_withholding_flag_o =>pqp_det_shd.g_old_rec.addl_withholding_flag
,p_constant_addl_tax_o =>pqp_det_shd.g_old_rec.constant_addl_tax
,p_addl_withholding_amt_o =>pqp_det_shd.g_old_rec.addl_withholding_amt
,p_addl_wthldng_amt_period_ty_o =>pqp_det_shd.g_old_rec.addl_wthldng_amt_period_type
,p_personal_exemption_o =>pqp_det_shd.g_old_rec.personal_exemption
,p_addl_exemption_allowed_o =>pqp_det_shd.g_old_rec.addl_exemption_allowed
,p_treaty_ben_allowed_flag_o =>pqp_det_shd.g_old_rec.treaty_ben_allowed_flag
,p_treaty_benefits_start_date_o =>pqp_det_shd.g_old_rec.treaty_benefits_start_date
,p_object_version_number_o =>pqp_det_shd.g_old_rec.object_version_number
,p_retro_loss_notif_sent_o =>pqp_det_shd.g_old_rec.retro_loss_notification_sent
,p_current_analysis_o =>pqp_det_shd.g_old_rec.current_analysis
,p_forecast_income_code_o =>pqp_det_shd.g_old_rec.forecast_income_code
);
End post_delete;
pqp_det_bus.delete_validate(p_rec
,p_effective_date);
pre_delete(p_rec);
delete_dml(p_rec);
post_delete(
p_effective_date,p_rec);