[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_cpt_shd.g_rec_type,
59: p_effective_date in date,
60: p_datetrack_mode in varchar2,
61: p_validation_start_date in date,
62: p_validation_end_date in date) is
68: t.creation_date
69: from ben_cmbn_ptip_opt_f t
70: where t.cmbn_ptip_opt_id = p_rec.cmbn_ptip_opt_id
71: and t.effective_start_date =
72: ben_cpt_shd.g_old_rec.effective_start_date
73: and t.effective_end_date = (p_validation_start_date - 1);
74: --
75: l_proc varchar2(72) := g_package||'dt_insert_dml';
76: l_created_by ben_cmbn_ptip_opt_f.created_by%TYPE;
125: l_last_updated_by := fnd_global.user_id;
126: l_last_update_login := fnd_global.login_id;
127: End If;
128: --
129: ben_cpt_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_cmbn_ptip_opt_f
132: --
133: insert into ben_cmbn_ptip_opt_f
224: l_last_updated_by,
225: l_last_update_login
226: );
227: --
228: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
229: hr_utility.set_location(' Leaving:'||l_proc, 15);
230: --
231: Exception
232: When hr_api.check_integrity_violated Then
230: --
231: Exception
232: When hr_api.check_integrity_violated Then
233: -- A check constraint has been violated
234: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
235: ben_cpt_shd.constraint_error
236: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
237: When hr_api.unique_integrity_violated Then
238: -- Unique integrity has been violated
231: Exception
232: When hr_api.check_integrity_violated Then
233: -- A check constraint has been violated
234: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
235: ben_cpt_shd.constraint_error
236: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
237: When hr_api.unique_integrity_violated Then
238: -- Unique integrity has been violated
239: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
235: ben_cpt_shd.constraint_error
236: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
237: When hr_api.unique_integrity_violated Then
238: -- Unique integrity has been violated
239: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
240: ben_cpt_shd.constraint_error
241: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
242: When Others Then
243: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
236: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
237: When hr_api.unique_integrity_violated Then
238: -- Unique integrity has been violated
239: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
240: ben_cpt_shd.constraint_error
241: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
242: When Others Then
243: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
244: Raise;
239: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
240: ben_cpt_shd.constraint_error
241: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
242: When Others Then
243: ben_cpt_shd.g_api_dml := false; -- Unset the api dml status
244: Raise;
245: End dt_insert_dml;
246: --
247: -- ----------------------------------------------------------------------------
247: -- ----------------------------------------------------------------------------
248: -- |------------------------------< insert_dml >------------------------------|
249: -- ----------------------------------------------------------------------------
250: Procedure insert_dml
251: (p_rec in out nocopy ben_cpt_shd.g_rec_type,
252: p_effective_date in date,
253: p_datetrack_mode in varchar2,
254: p_validation_start_date in date,
255: p_validation_end_date in date) is
307: --
308: -- {End Of Comments}
309: -- ----------------------------------------------------------------------------
310: Procedure pre_insert
311: (p_rec in out nocopy ben_cpt_shd.g_rec_type,
312: p_effective_date in date,
313: p_datetrack_mode in varchar2,
314: p_validation_start_date in date,
315: p_validation_end_date in date) is
362: --
363: -- {End Of Comments}
364: -- ----------------------------------------------------------------------------
365: Procedure post_insert
366: (p_rec in ben_cpt_shd.g_rec_type,
367: p_effective_date in date,
368: p_datetrack_mode in varchar2,
369: p_validation_start_date in date,
370: p_validation_end_date in date) is
481: -- ----------------------------------------------------------------------------
482: Procedure ins_lck
483: (p_effective_date in date,
484: p_datetrack_mode in varchar2,
485: p_rec in ben_cpt_shd.g_rec_type,
486: p_validation_start_date out nocopy date,
487: p_validation_end_date out nocopy date) is
488: --
489: l_proc varchar2(72) := g_package||'ins_lck';
519: -- |---------------------------------< ins >----------------------------------|
520: -- ----------------------------------------------------------------------------
521: Procedure ins
522: (
523: p_rec in out nocopy ben_cpt_shd.g_rec_type,
524: p_effective_date in date
525: ) is
526: --
527: l_proc varchar2(72) := g_package||'ins';
625: p_opt_id in number,
626: p_effective_date in date
627: ) is
628: --
629: l_rec ben_cpt_shd.g_rec_type;
630: l_proc varchar2(72) := g_package||'ins';
631: --
632: Begin
633: hr_utility.set_location('Entering:'||l_proc, 5);
635: -- Call conversion function to turn arguments into the
636: -- p_rec structure.
637: --
638: l_rec :=
639: ben_cpt_shd.convert_args
640: (
641: null,
642: null,
643: null,