The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure delete_dml(p_rec in pqp_atd_shd.g_rec_type) is
l_proc varchar2(72) := g_package||'delete_dml';
delete from pqp_alien_transaction_data
where alien_transaction_id = p_rec.alien_transaction_id;
End delete_dml;
Procedure pre_delete(p_rec in pqp_atd_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_atd_shd.g_rec_type) is
l_proc varchar2(72) := g_package||'post_delete';
pqp_atd_rkd.after_delete
(
p_alien_transaction_id =>p_rec.alien_transaction_id
,p_person_id_o =>pqp_atd_shd.g_old_rec.person_id
,p_data_source_type_o =>pqp_atd_shd.g_old_rec.data_source_type
,p_tax_year_o =>pqp_atd_shd.g_old_rec.tax_year
,p_income_code_o =>pqp_atd_shd.g_old_rec.income_code
,p_withholding_rate_o =>pqp_atd_shd.g_old_rec.withholding_rate
,p_income_code_sub_type_o =>pqp_atd_shd.g_old_rec.income_code_sub_type
,p_exemption_code_o =>pqp_atd_shd.g_old_rec.exemption_code
,p_maximum_benefit_amount_o =>pqp_atd_shd.g_old_rec.maximum_benefit_amount
,p_retro_lose_ben_amt_flag_o =>pqp_atd_shd.g_old_rec.retro_lose_ben_amt_flag
,p_date_benefit_ends_o =>pqp_atd_shd.g_old_rec.date_benefit_ends
,p_retro_lose_ben_date_flag_o =>pqp_atd_shd.g_old_rec.retro_lose_ben_date_flag
,p_current_residency_status_o =>pqp_atd_shd.g_old_rec.current_residency_status
,p_nra_to_ra_date_o =>pqp_atd_shd.g_old_rec.nra_to_ra_date
,p_target_departure_date_o =>pqp_atd_shd.g_old_rec.target_departure_date
,p_tax_residence_country_code_o =>pqp_atd_shd.g_old_rec.tax_residence_country_code
,p_treaty_info_update_date_o =>pqp_atd_shd.g_old_rec.treaty_info_update_date
,p_nra_exempt_from_fica_o =>pqp_atd_shd.g_old_rec.nra_exempt_from_fica
,p_student_exempt_from_fica_o =>pqp_atd_shd.g_old_rec.student_exempt_from_fica
,p_addl_withholding_flag_o =>pqp_atd_shd.g_old_rec.addl_withholding_flag
,p_addl_withholding_amt_o =>pqp_atd_shd.g_old_rec.addl_withholding_amt
,p_addl_wthldng_amt_period_ty_o=>pqp_atd_shd.g_old_rec.addl_wthldng_amt_period_type
,p_personal_exemption_o =>pqp_atd_shd.g_old_rec.personal_exemption
,p_addl_exemption_allowed_o =>pqp_atd_shd.g_old_rec.addl_exemption_allowed
,p_number_of_days_in_usa_o =>pqp_atd_shd.g_old_rec.number_of_days_in_usa
,p_wthldg_allow_eligible_flag_o =>pqp_atd_shd.g_old_rec.wthldg_allow_eligible_flag
,p_treaty_ben_allowed_flag_o =>pqp_atd_shd.g_old_rec.treaty_ben_allowed_flag
,p_treaty_benefits_start_date_o =>pqp_atd_shd.g_old_rec.treaty_benefits_start_date
,p_ra_effective_date_o =>pqp_atd_shd.g_old_rec.ra_effective_date
,p_state_code_o =>pqp_atd_shd.g_old_rec.state_code
,p_state_honors_treaty_flag_o =>pqp_atd_shd.g_old_rec.state_honors_treaty_flag
,p_ytd_payments_o =>pqp_atd_shd.g_old_rec.ytd_payments
,p_ytd_w2_payments_o =>pqp_atd_shd.g_old_rec.ytd_w2_payments
,p_ytd_w2_withholding_o =>pqp_atd_shd.g_old_rec.ytd_w2_withholding
,p_ytd_withholding_allowance_o =>pqp_atd_shd.g_old_rec.ytd_withholding_allowance
,p_ytd_treaty_payments_o =>pqp_atd_shd.g_old_rec.ytd_treaty_payments
,p_ytd_treaty_withheld_amt_o =>pqp_atd_shd.g_old_rec.ytd_treaty_withheld_amt
,p_record_source_o =>pqp_atd_shd.g_old_rec.record_source
,p_visa_type_o =>pqp_atd_shd.g_old_rec.visa_type
,p_j_sub_type_o =>pqp_atd_shd.g_old_rec.j_sub_type
,p_primary_activity_o =>pqp_atd_shd.g_old_rec.primary_activity
,p_non_us_country_code_o =>pqp_atd_shd.g_old_rec.non_us_country_code
,p_citizenship_country_code_o =>pqp_atd_shd.g_old_rec.citizenship_country_code
,p_constant_addl_tax_o =>pqp_atd_shd.g_old_rec.constant_addl_tax
,p_date_8233_signed_o =>pqp_atd_shd.g_old_rec.date_8233_signed
,p_date_w4_signed_o =>pqp_atd_shd.g_old_rec.date_w4_signed
,p_error_indicator_o =>pqp_atd_shd.g_old_rec.error_indicator
,p_prev_er_treaty_benefit_amt_o =>pqp_atd_shd.g_old_rec.prev_er_treaty_benefit_amt
,p_error_text_o =>pqp_atd_shd.g_old_rec.error_text
,p_object_version_number_o =>pqp_atd_shd.g_old_rec.object_version_number
,p_current_analysis_o =>pqp_atd_shd.g_old_rec.current_analysis
,p_forecast_income_code_o =>pqp_atd_shd.g_old_rec.forecast_income_code
);
End post_delete;
pqp_atd_bus.delete_validate(p_rec
,p_effective_date);
pre_delete(p_rec);
delete_dml(p_rec);
post_delete(
p_effective_date,p_rec);