The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml(p_rec in out nocopy pqh_bgt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_dml';
update pqh_budgets
set
budget_id = p_rec.budget_id,
business_group_id = p_rec.business_group_id,
start_organization_id = p_rec.start_organization_id,
org_structure_version_id = p_rec.org_structure_version_id,
budgeted_entity_cd = p_rec.budgeted_entity_cd,
budget_style_cd = p_rec.budget_style_cd,
budget_name = p_rec.budget_name,
period_set_name = p_rec.period_set_name,
budget_start_date = p_rec.budget_start_date,
budget_end_date = p_rec.budget_end_date,
gl_budget_name = p_rec.gl_budget_name,
psb_budget_flag = p_rec.psb_budget_flag,
transfer_to_gl_flag = p_rec.transfer_to_gl_flag,
transfer_to_grants_flag = p_rec.transfer_to_grants_flag,
status = p_rec.status,
object_version_number = p_rec.object_version_number,
budget_unit1_id = p_rec.budget_unit1_id,
budget_unit2_id = p_rec.budget_unit2_id,
budget_unit3_id = p_rec.budget_unit3_id,
gl_set_of_books_id = p_rec.gl_set_of_books_id,
budget_unit1_aggregate = p_rec.budget_unit1_aggregate,
budget_unit2_aggregate = p_rec.budget_unit2_aggregate,
budget_unit3_aggregate = p_rec.budget_unit3_aggregate,
position_control_flag = p_rec.position_control_flag ,
valid_grade_reqd_flag = p_rec.valid_grade_reqd_flag ,
currency_code = p_rec.currency_code,
dflt_budget_set_id = p_rec.dflt_budget_set_id
where budget_id = p_rec.budget_id;
End update_dml;
Procedure pre_update(p_rec in pqh_bgt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_update';
select *
from pqh_budgets
where budget_id = p_budget_id;
delete from pqh_budget_gl_flex_maps
where budget_id = l_budgets_rec.budget_id;
End pre_update;
Procedure post_update(
p_effective_date in date,p_rec in pqh_bgt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_update';
pqh_bgt_rku.after_update
(
p_budget_id =>p_rec.budget_id
,p_business_group_id =>p_rec.business_group_id
,p_start_organization_id =>p_rec.start_organization_id
,p_org_structure_version_id =>p_rec.org_structure_version_id
,p_budgeted_entity_cd =>p_rec.budgeted_entity_cd
,p_budget_style_cd =>p_rec.budget_style_cd
,p_budget_name =>p_rec.budget_name
,p_period_set_name =>p_rec.period_set_name
,p_budget_start_date =>p_rec.budget_start_date
,p_budget_end_date =>p_rec.budget_end_date
,p_gl_budget_name =>p_rec.gl_budget_name
,p_psb_budget_flag =>p_rec.psb_budget_flag
,p_transfer_to_gl_flag =>p_rec.transfer_to_gl_flag
,p_transfer_to_grants_flag =>p_rec.transfer_to_grants_flag
,p_status =>p_rec.status
,p_object_version_number =>p_rec.object_version_number
,p_budget_unit1_id =>p_rec.budget_unit1_id
,p_budget_unit2_id =>p_rec.budget_unit2_id
,p_budget_unit3_id =>p_rec.budget_unit3_id
,p_gl_set_of_books_id =>p_rec.gl_set_of_books_id
,p_budget_unit1_aggregate =>p_rec.budget_unit1_aggregate
,p_budget_unit2_aggregate =>p_rec.budget_unit2_aggregate
,p_budget_unit3_aggregate =>p_rec.budget_unit3_aggregate
,p_position_control_flag =>p_rec.position_control_flag
,p_valid_grade_reqd_flag =>p_rec.valid_grade_reqd_flag
,p_currency_code =>p_rec.currency_code
,p_dflt_budget_set_id =>p_rec.dflt_budget_set_id
,p_effective_date =>p_effective_date
,p_business_group_id_o =>pqh_bgt_shd.g_old_rec.business_group_id
,p_start_organization_id_o =>pqh_bgt_shd.g_old_rec.start_organization_id
,p_org_structure_version_id_o =>pqh_bgt_shd.g_old_rec.org_structure_version_id
,p_budgeted_entity_cd_o =>pqh_bgt_shd.g_old_rec.budgeted_entity_cd
,p_budget_style_cd_o =>pqh_bgt_shd.g_old_rec.budget_style_cd
,p_budget_name_o =>pqh_bgt_shd.g_old_rec.budget_name
,p_period_set_name_o =>pqh_bgt_shd.g_old_rec.period_set_name
,p_budget_start_date_o =>pqh_bgt_shd.g_old_rec.budget_start_date
,p_budget_end_date_o =>pqh_bgt_shd.g_old_rec.budget_end_date
,p_gl_budget_name_o =>pqh_bgt_shd.g_old_rec.gl_budget_name
,p_psb_budget_flag_o =>pqh_bgt_shd.g_old_rec.psb_budget_flag
,p_transfer_to_gl_flag_o =>pqh_bgt_shd.g_old_rec.transfer_to_gl_flag
,p_transfer_to_grants_flag_o =>pqh_bgt_shd.g_old_rec.transfer_to_grants_flag
,p_status_o =>pqh_bgt_shd.g_old_rec.status
,p_object_version_number_o =>pqh_bgt_shd.g_old_rec.object_version_number
,p_budget_unit1_id_o =>pqh_bgt_shd.g_old_rec.budget_unit1_id
,p_budget_unit2_id_o =>pqh_bgt_shd.g_old_rec.budget_unit2_id
,p_budget_unit3_id_o =>pqh_bgt_shd.g_old_rec.budget_unit3_id
,p_gl_set_of_books_id_o =>pqh_bgt_shd.g_old_rec.gl_set_of_books_id
,p_budget_unit1_aggregate_o =>pqh_bgt_shd.g_old_rec.budget_unit1_aggregate
,p_budget_unit2_aggregate_o =>pqh_bgt_shd.g_old_rec.budget_unit2_aggregate
,p_budget_unit3_aggregate_o =>pqh_bgt_shd.g_old_rec.budget_unit3_aggregate
,p_position_control_flag_o =>pqh_bgt_shd.g_old_rec.position_control_flag
,p_valid_grade_reqd_flag_o =>pqh_bgt_shd.g_old_rec.valid_grade_reqd_flag
,p_currency_code_o =>pqh_bgt_shd.g_old_rec.currency_code
,p_dflt_budget_set_id_o =>pqh_bgt_shd.g_old_rec.dflt_budget_set_id
);
End post_update;
pqh_bgt_bus.update_validate(p_rec
,p_effective_date);
pre_update(p_rec);
update_dml(p_rec);
post_update(
p_effective_date,p_rec);