[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_pen_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_prtt_enrt_rslt_f t
70: where t.prtt_enrt_rslt_id = p_rec.prtt_enrt_rslt_id
71: and t.effective_start_date =
72: ben_pen_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_prtt_enrt_rslt_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_pen_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_prtt_enrt_rslt_f
132: --
133: insert into ben_prtt_enrt_rslt_f
288: l_last_updated_by,
289: l_last_update_login
290: );
291: --
292: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
293: hr_utility.set_location(' Leaving:'||l_proc, 15);
294: --
295: Exception
296: When hr_api.check_integrity_violated Then
294: --
295: Exception
296: When hr_api.check_integrity_violated Then
297: -- A check constraint has been violated
298: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
299: ben_pen_shd.constraint_error
300: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
301: When hr_api.unique_integrity_violated Then
302: -- Unique integrity has been violated
295: Exception
296: When hr_api.check_integrity_violated Then
297: -- A check constraint has been violated
298: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
299: ben_pen_shd.constraint_error
300: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
301: When hr_api.unique_integrity_violated Then
302: -- Unique integrity has been violated
303: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
299: ben_pen_shd.constraint_error
300: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
301: When hr_api.unique_integrity_violated Then
302: -- Unique integrity has been violated
303: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
304: ben_pen_shd.constraint_error
305: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
306: When Others Then
307: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
300: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
301: When hr_api.unique_integrity_violated Then
302: -- Unique integrity has been violated
303: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
304: ben_pen_shd.constraint_error
305: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
306: When Others Then
307: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
308: Raise;
303: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
304: ben_pen_shd.constraint_error
305: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
306: When Others Then
307: ben_pen_shd.g_api_dml := false; -- Unset the api dml status
308: Raise;
309: End dt_insert_dml;
310: --
311: -- ----------------------------------------------------------------------------
311: -- ----------------------------------------------------------------------------
312: -- |------------------------------< insert_dml >------------------------------|
313: -- ----------------------------------------------------------------------------
314: Procedure insert_dml
315: (p_rec in out nocopy ben_pen_shd.g_rec_type,
316: p_effective_date in date,
317: p_datetrack_mode in varchar2,
318: p_validation_start_date in date,
319: p_validation_end_date in date) is
371: --
372: -- {End Of Comments}
373: -- ----------------------------------------------------------------------------
374: Procedure pre_insert
375: (p_rec in out nocopy ben_pen_shd.g_rec_type,
376: p_effective_date in date,
377: p_datetrack_mode in varchar2,
378: p_validation_start_date in date,
379: p_validation_end_date in date) is
435: --
436: -- {End Of Comments}
437: -- ----------------------------------------------------------------------------
438: Procedure post_insert
439: (p_rec in ben_pen_shd.g_rec_type,
440: p_effective_date in date,
441: p_datetrack_mode in varchar2,
442: p_validation_start_date in date,
443: p_validation_end_date in date) is
594: -- ----------------------------------------------------------------------------
595: Procedure ins_lck
596: (p_effective_date in date,
597: p_datetrack_mode in varchar2,
598: p_rec in ben_pen_shd.g_rec_type,
599: p_validation_start_date out nocopy date,
600: p_validation_end_date out nocopy date) is
601: l_proc varchar2(72) := g_package||'ins_lck';
602: l_validation_start_date date;
651: -- |---------------------------------< ins >----------------------------------|
652: -- ----------------------------------------------------------------------------
653: Procedure ins
654: (
655: p_rec in out nocopy ben_pen_shd.g_rec_type,
656: p_effective_date in date
657: ) is
658: --
659: l_proc varchar2(72) := g_package||'ins';
814: p_comp_lvl_cd in varchar2 default null,
815: p_effective_date in date
816: ) is
817: --
818: l_rec ben_pen_shd.g_rec_type;
819: l_proc varchar2(72) := g_package||'ins';
820: --
821: Begin
822: hr_utility.set_location('Entering:'||l_proc, 5);
824: -- Call conversion function to turn arguments into the
825: -- p_rec structure.
826: --
827: l_rec :=
828: ben_pen_shd.convert_args
829: (
830: null,
831: null,
832: null,