The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml
(p_rec in out nocopy pay_gbe_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_dml';
update pay_grossup_bal_exclusions
set
grossup_balances_id = p_rec.grossup_balances_id
,start_date = p_rec.start_date
,end_date = p_rec.end_date
,source_id = p_rec.source_id
,source_type = p_rec.source_type
,balance_type_id = p_rec.balance_type_id
,object_version_number = p_rec.object_version_number
where grossup_balances_id = p_rec.grossup_balances_id;
End update_dml;
Procedure pre_update
(p_rec in pay_gbe_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update
(p_rec in pay_gbe_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'post_update';
pay_gbe_rku.after_update
(p_grossup_balances_id
=> p_rec.grossup_balances_id
,p_start_date
=> p_rec.start_date
,p_end_date
=> p_rec.end_date
,p_source_id
=> p_rec.source_id
,p_source_type
=> p_rec.source_type
,p_balance_type_id
=> p_rec.balance_type_id
,p_object_version_number
=> p_rec.object_version_number
,p_start_date_o
=> pay_gbe_shd.g_old_rec.start_date
,p_end_date_o
=> pay_gbe_shd.g_old_rec.end_date
,p_source_id_o
=> pay_gbe_shd.g_old_rec.source_id
,p_source_type_o
=> pay_gbe_shd.g_old_rec.source_type
,p_balance_type_id_o
=> pay_gbe_shd.g_old_rec.balance_type_id
,p_object_version_number_o
=> pay_gbe_shd.g_old_rec.object_version_number
);
End post_update;
pay_gbe_bus.update_validate
(p_rec
);
pay_gbe_upd.pre_update(p_rec);
pay_gbe_upd.update_dml(p_rec);
pay_gbe_upd.post_update
(p_rec
);