50: -- Internal Row Handler Use Only.
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out nocopy ben_ppl_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: --
58: Begin
61: -- Increment the object version
62: --
63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: ben_ppl_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the ben_ptnl_ler_for_per Row
68: --
69: update ben_ptnl_ler_for_per
91: program_update_date = p_rec.program_update_date,
92: object_version_number = p_rec.object_version_number
93: where ptnl_ler_for_per_id = p_rec.ptnl_ler_for_per_id;
94: --
95: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
96: --
97: hr_utility.set_location(' Leaving:'||l_proc, 10);
98: --
99: Exception
98: --
99: Exception
100: When hr_api.check_integrity_violated Then
101: -- A check constraint has been violated
102: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
103: ben_ppl_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When hr_api.parent_integrity_violated Then
106: -- Parent integrity has been violated
99: Exception
100: When hr_api.check_integrity_violated Then
101: -- A check constraint has been violated
102: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
103: ben_ppl_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When hr_api.parent_integrity_violated Then
106: -- Parent integrity has been violated
107: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
103: ben_ppl_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When hr_api.parent_integrity_violated Then
106: -- Parent integrity has been violated
107: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
108: ben_ppl_shd.constraint_error
109: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
110: When hr_api.unique_integrity_violated Then
111: -- Unique integrity has been violated
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When hr_api.parent_integrity_violated Then
106: -- Parent integrity has been violated
107: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
108: ben_ppl_shd.constraint_error
109: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
110: When hr_api.unique_integrity_violated Then
111: -- Unique integrity has been violated
112: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
108: ben_ppl_shd.constraint_error
109: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
110: When hr_api.unique_integrity_violated Then
111: -- Unique integrity has been violated
112: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
113: ben_ppl_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When Others Then
116: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
109: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
110: When hr_api.unique_integrity_violated Then
111: -- Unique integrity has been violated
112: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
113: ben_ppl_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When Others Then
116: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
117: Raise;
112: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
113: ben_ppl_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When Others Then
116: ben_ppl_shd.g_api_dml := false; -- Unset the api dml status
117: Raise;
118: End update_dml;
119: --
120: -- ----------------------------------------------------------------------------
148: -- Internal Row Handler Use Only.
149: --
150: -- {End Of Comments}
151: -- ----------------------------------------------------------------------------
152: Procedure pre_update(p_rec in ben_ppl_shd.g_rec_type) is
153: --
154: l_proc varchar2(72) := g_package||'pre_update';
155: --
156: Begin
191: --
192: -- {End Of Comments}
193: -- ----------------------------------------------------------------------------
194: Procedure post_update(
195: p_effective_date in date,p_rec in ben_ppl_shd.g_rec_type) is
196: --
197: l_proc varchar2(72) := g_package||'post_update';
198: --
199: Begin
228: ,p_program_id =>p_rec.program_id
229: ,p_program_update_date =>p_rec.program_update_date
230: ,p_object_version_number =>p_rec.object_version_number
231: ,p_effective_date =>p_effective_date
232: ,p_csd_by_ptnl_ler_for_per_id_o =>ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
229: ,p_program_update_date =>p_rec.program_update_date
230: ,p_object_version_number =>p_rec.object_version_number
231: ,p_effective_date =>p_effective_date
232: ,p_csd_by_ptnl_ler_for_per_id_o =>ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
230: ,p_object_version_number =>p_rec.object_version_number
231: ,p_effective_date =>p_effective_date
232: ,p_csd_by_ptnl_ler_for_per_id_o =>ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
231: ,p_effective_date =>p_effective_date
232: ,p_csd_by_ptnl_ler_for_per_id_o =>ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
232: ,p_csd_by_ptnl_ler_for_per_id_o =>ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
233: ,p_lf_evt_ocrd_dt_o =>ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
234: ,p_trgr_table_pk_id_o =>ben_ppl_shd.g_old_rec.trgr_table_pk_id
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
235: ,p_ptnl_ler_for_per_stat_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
236: ,p_ptnl_ler_for_per_src_cd_o =>ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
237: ,p_mnl_dt_o =>ben_ppl_shd.g_old_rec.mnl_dt
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
238: ,p_enrt_perd_id_o =>ben_ppl_shd.g_old_rec.enrt_perd_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
239: ,p_ntfn_dt_o =>ben_ppl_shd.g_old_rec.ntfn_dt
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
240: ,p_dtctd_dt_o =>ben_ppl_shd.g_old_rec.dtctd_dt
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
241: ,p_procd_dt_o =>ben_ppl_shd.g_old_rec.procd_dt
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
242: ,p_unprocd_dt_o =>ben_ppl_shd.g_old_rec.unprocd_dt
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
243: ,p_voidd_dt_o =>ben_ppl_shd.g_old_rec.voidd_dt
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
244: ,p_mnlo_dt_o =>ben_ppl_shd.g_old_rec.mnlo_dt
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
252: ,p_object_version_number_o =>ben_ppl_shd.g_old_rec.object_version_number
245: ,p_ler_id_o =>ben_ppl_shd.g_old_rec.ler_id
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
252: ,p_object_version_number_o =>ben_ppl_shd.g_old_rec.object_version_number
253: );
246: ,p_person_id_o =>ben_ppl_shd.g_old_rec.person_id
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
252: ,p_object_version_number_o =>ben_ppl_shd.g_old_rec.object_version_number
253: );
254: --
247: ,p_business_group_id_o =>ben_ppl_shd.g_old_rec.business_group_id
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
252: ,p_object_version_number_o =>ben_ppl_shd.g_old_rec.object_version_number
253: );
254: --
255: exception
248: ,p_request_id_o =>ben_ppl_shd.g_old_rec.request_id
249: ,p_program_application_id_o =>ben_ppl_shd.g_old_rec.program_application_id
250: ,p_program_id_o =>ben_ppl_shd.g_old_rec.program_id
251: ,p_program_update_date_o =>ben_ppl_shd.g_old_rec.program_update_date
252: ,p_object_version_number_o =>ben_ppl_shd.g_old_rec.object_version_number
253: );
254: --
255: exception
256: --
310: -- Internal Row Handler Use Only.
311: --
312: -- {End Of Comments}
313: -- ----------------------------------------------------------------------------
314: Procedure convert_defs(p_rec in out nocopy ben_ppl_shd.g_rec_type) is
315: --
316: l_proc varchar2(72) := g_package||'convert_defs';
317: --
318: Begin
325: -- is being used then we must set to the 'current' argument value.
326: --
327: If (p_rec.csd_by_ptnl_ler_for_per_id = hr_api.g_number) then
328: p_rec.csd_by_ptnl_ler_for_per_id :=
329: ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id;
330: End If;
331: If (p_rec.lf_evt_ocrd_dt = hr_api.g_date) then
332: p_rec.lf_evt_ocrd_dt :=
333: ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt;
329: ben_ppl_shd.g_old_rec.csd_by_ptnl_ler_for_per_id;
330: End If;
331: If (p_rec.lf_evt_ocrd_dt = hr_api.g_date) then
332: p_rec.lf_evt_ocrd_dt :=
333: ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt;
334: End If;
335: If (p_rec.trgr_table_pk_id = hr_api.g_number) then
336: p_rec.trgr_table_pk_id :=
337: ben_ppl_shd.g_old_rec.trgr_table_pk_id;
333: ben_ppl_shd.g_old_rec.lf_evt_ocrd_dt;
334: End If;
335: If (p_rec.trgr_table_pk_id = hr_api.g_number) then
336: p_rec.trgr_table_pk_id :=
337: ben_ppl_shd.g_old_rec.trgr_table_pk_id;
338: End If;
339: If (p_rec.ptnl_ler_for_per_stat_cd = hr_api.g_varchar2) then
340: p_rec.ptnl_ler_for_per_stat_cd :=
341: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd;
337: ben_ppl_shd.g_old_rec.trgr_table_pk_id;
338: End If;
339: If (p_rec.ptnl_ler_for_per_stat_cd = hr_api.g_varchar2) then
340: p_rec.ptnl_ler_for_per_stat_cd :=
341: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd;
342: End If;
343: If (p_rec.ptnl_ler_for_per_src_cd = hr_api.g_varchar2) then
344: p_rec.ptnl_ler_for_per_src_cd :=
345: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd;
341: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_stat_cd;
342: End If;
343: If (p_rec.ptnl_ler_for_per_src_cd = hr_api.g_varchar2) then
344: p_rec.ptnl_ler_for_per_src_cd :=
345: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd;
346: End If;
347: If (p_rec.mnl_dt = hr_api.g_date) then
348: p_rec.mnl_dt :=
349: ben_ppl_shd.g_old_rec.mnl_dt;
345: ben_ppl_shd.g_old_rec.ptnl_ler_for_per_src_cd;
346: End If;
347: If (p_rec.mnl_dt = hr_api.g_date) then
348: p_rec.mnl_dt :=
349: ben_ppl_shd.g_old_rec.mnl_dt;
350: End If;
351: If (p_rec.enrt_perd_id = hr_api.g_number) then
352: p_rec.enrt_perd_id :=
353: ben_ppl_shd.g_old_rec.enrt_perd_id;
349: ben_ppl_shd.g_old_rec.mnl_dt;
350: End If;
351: If (p_rec.enrt_perd_id = hr_api.g_number) then
352: p_rec.enrt_perd_id :=
353: ben_ppl_shd.g_old_rec.enrt_perd_id;
354: End If;
355: If (p_rec.ntfn_dt = hr_api.g_date) then
356: p_rec.ntfn_dt :=
357: ben_ppl_shd.g_old_rec.ntfn_dt;
353: ben_ppl_shd.g_old_rec.enrt_perd_id;
354: End If;
355: If (p_rec.ntfn_dt = hr_api.g_date) then
356: p_rec.ntfn_dt :=
357: ben_ppl_shd.g_old_rec.ntfn_dt;
358: End If;
359: If (p_rec.dtctd_dt = hr_api.g_date) then
360: p_rec.dtctd_dt :=
361: ben_ppl_shd.g_old_rec.dtctd_dt;
357: ben_ppl_shd.g_old_rec.ntfn_dt;
358: End If;
359: If (p_rec.dtctd_dt = hr_api.g_date) then
360: p_rec.dtctd_dt :=
361: ben_ppl_shd.g_old_rec.dtctd_dt;
362: End If;
363: If (p_rec.procd_dt = hr_api.g_date) then
364: p_rec.procd_dt :=
365: ben_ppl_shd.g_old_rec.procd_dt;
361: ben_ppl_shd.g_old_rec.dtctd_dt;
362: End If;
363: If (p_rec.procd_dt = hr_api.g_date) then
364: p_rec.procd_dt :=
365: ben_ppl_shd.g_old_rec.procd_dt;
366: End If;
367: If (p_rec.unprocd_dt = hr_api.g_date) then
368: p_rec.unprocd_dt :=
369: ben_ppl_shd.g_old_rec.unprocd_dt;
365: ben_ppl_shd.g_old_rec.procd_dt;
366: End If;
367: If (p_rec.unprocd_dt = hr_api.g_date) then
368: p_rec.unprocd_dt :=
369: ben_ppl_shd.g_old_rec.unprocd_dt;
370: End If;
371: If (p_rec.voidd_dt = hr_api.g_date) then
372: p_rec.voidd_dt :=
373: ben_ppl_shd.g_old_rec.voidd_dt;
369: ben_ppl_shd.g_old_rec.unprocd_dt;
370: End If;
371: If (p_rec.voidd_dt = hr_api.g_date) then
372: p_rec.voidd_dt :=
373: ben_ppl_shd.g_old_rec.voidd_dt;
374: End If;
375: If (p_rec.mnlo_dt = hr_api.g_date) then
376: p_rec.mnlo_dt :=
377: ben_ppl_shd.g_old_rec.mnlo_dt;
373: ben_ppl_shd.g_old_rec.voidd_dt;
374: End If;
375: If (p_rec.mnlo_dt = hr_api.g_date) then
376: p_rec.mnlo_dt :=
377: ben_ppl_shd.g_old_rec.mnlo_dt;
378: End If;
379: If (p_rec.ler_id = hr_api.g_number) then
380: p_rec.ler_id :=
381: ben_ppl_shd.g_old_rec.ler_id;
377: ben_ppl_shd.g_old_rec.mnlo_dt;
378: End If;
379: If (p_rec.ler_id = hr_api.g_number) then
380: p_rec.ler_id :=
381: ben_ppl_shd.g_old_rec.ler_id;
382: End If;
383: If (p_rec.person_id = hr_api.g_number) then
384: p_rec.person_id :=
385: ben_ppl_shd.g_old_rec.person_id;
381: ben_ppl_shd.g_old_rec.ler_id;
382: End If;
383: If (p_rec.person_id = hr_api.g_number) then
384: p_rec.person_id :=
385: ben_ppl_shd.g_old_rec.person_id;
386: End If;
387: If (p_rec.business_group_id = hr_api.g_number) then
388: p_rec.business_group_id :=
389: ben_ppl_shd.g_old_rec.business_group_id;
385: ben_ppl_shd.g_old_rec.person_id;
386: End If;
387: If (p_rec.business_group_id = hr_api.g_number) then
388: p_rec.business_group_id :=
389: ben_ppl_shd.g_old_rec.business_group_id;
390: End If;
391: If (p_rec.request_id = hr_api.g_number) then
392: p_rec.request_id :=
393: ben_ppl_shd.g_old_rec.request_id;
389: ben_ppl_shd.g_old_rec.business_group_id;
390: End If;
391: If (p_rec.request_id = hr_api.g_number) then
392: p_rec.request_id :=
393: ben_ppl_shd.g_old_rec.request_id;
394: End If;
395: If (p_rec.program_application_id = hr_api.g_number) then
396: p_rec.program_application_id :=
397: ben_ppl_shd.g_old_rec.program_application_id;
393: ben_ppl_shd.g_old_rec.request_id;
394: End If;
395: If (p_rec.program_application_id = hr_api.g_number) then
396: p_rec.program_application_id :=
397: ben_ppl_shd.g_old_rec.program_application_id;
398: End If;
399: If (p_rec.program_id = hr_api.g_number) then
400: p_rec.program_id :=
401: ben_ppl_shd.g_old_rec.program_id;
397: ben_ppl_shd.g_old_rec.program_application_id;
398: End If;
399: If (p_rec.program_id = hr_api.g_number) then
400: p_rec.program_id :=
401: ben_ppl_shd.g_old_rec.program_id;
402: End If;
403: If (p_rec.program_update_date = hr_api.g_date) then
404: p_rec.program_update_date :=
405: ben_ppl_shd.g_old_rec.program_update_date;
401: ben_ppl_shd.g_old_rec.program_id;
402: End If;
403: If (p_rec.program_update_date = hr_api.g_date) then
404: p_rec.program_update_date :=
405: ben_ppl_shd.g_old_rec.program_update_date;
406: End If;
407:
408: --
409: hr_utility.set_location(' Leaving:'||l_proc, 10);
415: -- ----------------------------------------------------------------------------
416: Procedure upd
417: (
418: p_effective_date in date,
419: p_rec in out nocopy ben_ppl_shd.g_rec_type
420: ) is
421: --
422: l_proc varchar2(72) := g_package||'upd';
423: --
425: hr_utility.set_location('Entering:'||l_proc, 5);
426: --
427: -- We must lock the row which we need to update.
428: --
429: ben_ppl_shd.lck
430: (
431: p_rec.ptnl_ler_for_per_id,
432: p_rec.object_version_number
433: );
484: p_program_update_date in date default hr_api.g_date,
485: p_object_version_number in out nocopy number
486: ) is
487: --
488: l_rec ben_ppl_shd.g_rec_type;
489: l_proc varchar2(72) := g_package||'upd';
490: --
491: Begin
492: hr_utility.set_location('Entering:'||l_proc, 5);
494: -- Call conversion function to turn arguments into the
495: -- l_rec structure.
496: --
497: l_rec :=
498: ben_ppl_shd.convert_args
499: (
500: p_ptnl_ler_for_per_id,
501: p_csd_by_ptnl_ler_for_per_id,
502: p_lf_evt_ocrd_dt,