The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure update_dml(p_rec in out nocopy ben_xrf_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_dml';
update ben_ext_rcd_in_file
set
ext_rcd_in_file_id = p_rec.ext_rcd_in_file_id,
seq_num = p_rec.seq_num,
sprs_cd = p_rec.sprs_cd,
sort1_data_elmt_in_rcd_id = p_rec.sort1_data_elmt_in_rcd_id,
sort2_data_elmt_in_rcd_id = p_rec.sort2_data_elmt_in_rcd_id,
sort3_data_elmt_in_rcd_id = p_rec.sort3_data_elmt_in_rcd_id,
sort4_data_elmt_in_rcd_id = p_rec.sort4_data_elmt_in_rcd_id,
ext_rcd_id = p_rec.ext_rcd_id,
ext_file_id = p_rec.ext_file_id,
business_group_id = p_rec.business_group_id,
last_update_date = p_rec.last_update_date,
last_updated_by = p_rec.last_updated_by,
last_update_login = p_rec.last_update_login,
legislation_code = p_rec.legislation_code,
object_version_number = p_rec.object_version_number,
any_or_all_cd = p_rec.any_or_all_cd,
hide_flag = p_rec.hide_flag,
rqd_flag = p_rec.rqd_flag ,
chg_rcd_upd_flag = p_rec.chg_rcd_upd_flag
where ext_rcd_in_file_id = p_rec.ext_rcd_in_file_id;
End update_dml;
Procedure pre_update(p_rec in ben_xrf_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'pre_update';
End pre_update;
Procedure post_update(
p_effective_date in date,p_rec in ben_xrf_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'post_update';
ben_xrf_rku.after_update
(
p_ext_rcd_in_file_id =>p_rec.ext_rcd_in_file_id
,p_seq_num =>p_rec.seq_num
,p_sprs_cd =>p_rec.sprs_cd
,p_sort1_data_elmt_in_rcd_id =>p_rec.sort1_data_elmt_in_rcd_id
,p_sort2_data_elmt_in_rcd_id =>p_rec.sort2_data_elmt_in_rcd_id
,p_sort3_data_elmt_in_rcd_id =>p_rec.sort3_data_elmt_in_rcd_id
,p_sort4_data_elmt_in_rcd_id =>p_rec.sort4_data_elmt_in_rcd_id
,p_ext_rcd_id =>p_rec.ext_rcd_id
,p_ext_file_id =>p_rec.ext_file_id
,p_business_group_id =>p_rec.business_group_id
,p_legislation_code =>p_rec.legislation_code
,p_object_version_number =>p_rec.object_version_number
,p_any_or_all_cd =>p_rec.any_or_all_cd
,p_hide_flag =>p_rec.hide_flag
,p_rqd_flag =>p_rec.rqd_flag
,p_chg_rcd_upd_flag =>p_rec.chg_rcd_upd_flag
,p_effective_date =>p_effective_date
,p_seq_num_o =>ben_xrf_shd.g_old_rec.seq_num
,p_sprs_cd_o =>ben_xrf_shd.g_old_rec.sprs_cd
,p_sort1_data_elmt_in_rcd_id_o =>ben_xrf_shd.g_old_rec.sort1_data_elmt_in_rcd_id
,p_sort2_data_elmt_in_rcd_id_o =>ben_xrf_shd.g_old_rec.sort2_data_elmt_in_rcd_id
,p_sort3_data_elmt_in_rcd_id_o =>ben_xrf_shd.g_old_rec.sort3_data_elmt_in_rcd_id
,p_sort4_data_elmt_in_rcd_id_o =>ben_xrf_shd.g_old_rec.sort4_data_elmt_in_rcd_id
,p_ext_rcd_id_o =>ben_xrf_shd.g_old_rec.ext_rcd_id
,p_ext_file_id_o =>ben_xrf_shd.g_old_rec.ext_file_id
,p_business_group_id_o =>ben_xrf_shd.g_old_rec.business_group_id
,p_legislation_code_o =>ben_xrf_shd.g_old_rec.legislation_code
,p_object_version_number_o =>ben_xrf_shd.g_old_rec.object_version_number
,p_any_or_all_cd_o =>ben_xrf_shd.g_old_rec.any_or_all_cd
,p_hide_flag_o =>ben_xrf_shd.g_old_rec.hide_flag
,p_rqd_flag_o =>ben_xrf_shd.g_old_rec.rqd_flag
,p_chg_rcd_upd_flag_o =>ben_xrf_shd.g_old_rec.chg_rcd_upd_flag
);
End post_update;
ben_xrf_bus.update_validate(p_rec
,p_effective_date);
pre_update(p_rec);
update_dml(p_rec);
post_update(
p_effective_date,p_rec);
p_last_update_date in date default hr_api.g_date,
p_creation_date in date default hr_api.g_date,
p_last_updated_by in number default hr_api.g_number,
p_last_update_login in number default hr_api.g_number,
p_created_by in number default hr_api.g_number,
p_object_version_number in out nocopy number,
p_any_or_all_cd in varchar2 default hr_api.g_varchar2,
p_hide_flag in varchar2 default hr_api.g_varchar2,
p_rqd_flag in varchar2 default hr_api.g_varchar2,
p_chg_rcd_upd_flag in varchar2 default hr_api.g_varchar2
) is
--
l_rec ben_xrf_shd.g_rec_type;
p_last_update_date ,
p_creation_date ,
p_last_updated_by ,
p_last_update_login,
p_created_by ,
p_object_version_number,
p_any_or_all_cd,
p_hide_flag,
p_rqd_flag ,
p_chg_rcd_upd_flag
);