[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_lge_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_ler_chg_pgm_enrt_f t
70: where t.ler_chg_pgm_enrt_id = p_rec.ler_chg_pgm_enrt_id
71: and t.effective_start_date =
72: ben_lge_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_ler_chg_pgm_enrt_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_lge_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_ler_chg_pgm_enrt_f
132: --
133: insert into ben_ler_chg_pgm_enrt_f
236: l_last_updated_by,
237: l_last_update_login
238: );
239: --
240: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
241: hr_utility.set_location(' Leaving:'||l_proc, 15);
242: --
243: Exception
244: When hr_api.check_integrity_violated Then
242: --
243: Exception
244: When hr_api.check_integrity_violated Then
245: -- A check constraint has been violated
246: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
247: ben_lge_shd.constraint_error
248: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
249: When hr_api.unique_integrity_violated Then
250: -- Unique integrity has been violated
243: Exception
244: When hr_api.check_integrity_violated Then
245: -- A check constraint has been violated
246: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
247: ben_lge_shd.constraint_error
248: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
249: When hr_api.unique_integrity_violated Then
250: -- Unique integrity has been violated
251: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
247: ben_lge_shd.constraint_error
248: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
249: When hr_api.unique_integrity_violated Then
250: -- Unique integrity has been violated
251: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
252: ben_lge_shd.constraint_error
253: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
254: When Others Then
255: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
248: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
249: When hr_api.unique_integrity_violated Then
250: -- Unique integrity has been violated
251: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
252: ben_lge_shd.constraint_error
253: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
254: When Others Then
255: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
256: Raise;
251: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
252: ben_lge_shd.constraint_error
253: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
254: When Others Then
255: ben_lge_shd.g_api_dml := false; -- Unset the api dml status
256: Raise;
257: End dt_insert_dml;
258: --
259: -- ----------------------------------------------------------------------------
259: -- ----------------------------------------------------------------------------
260: -- |------------------------------< insert_dml >------------------------------|
261: -- ----------------------------------------------------------------------------
262: Procedure insert_dml
263: (p_rec in out nocopy ben_lge_shd.g_rec_type,
264: p_effective_date in date,
265: p_datetrack_mode in varchar2,
266: p_validation_start_date in date,
267: p_validation_end_date in date) is
319: --
320: -- {End Of Comments}
321: -- ----------------------------------------------------------------------------
322: Procedure pre_insert
323: (p_rec in out nocopy ben_lge_shd.g_rec_type,
324: p_effective_date in date,
325: p_datetrack_mode in varchar2,
326: p_validation_start_date in date,
327: p_validation_end_date in date) is
374: --
375: -- {End Of Comments}
376: -- ----------------------------------------------------------------------------
377: Procedure post_insert
378: (p_rec in ben_lge_shd.g_rec_type,
379: p_effective_date in date,
380: p_datetrack_mode in varchar2,
381: p_validation_start_date in date,
382: p_validation_end_date in date) is
499: -- ----------------------------------------------------------------------------
500: Procedure ins_lck
501: (p_effective_date in date,
502: p_datetrack_mode in varchar2,
503: p_rec in ben_lge_shd.g_rec_type,
504: p_validation_start_date out nocopy date,
505: p_validation_end_date out nocopy date) is
506: --
507: l_proc varchar2(72) := g_package||'ins_lck';
543: -- |---------------------------------< ins >----------------------------------|
544: -- ----------------------------------------------------------------------------
545: Procedure ins
546: (
547: p_rec in out nocopy ben_lge_shd.g_rec_type,
548: p_effective_date in date
549: ) is
550: --
551: l_proc varchar2(72) := g_package||'ins';
655: p_object_version_number out nocopy number,
656: p_effective_date in date
657: ) is
658: --
659: l_rec ben_lge_shd.g_rec_type;
660: l_proc varchar2(72) := g_package||'ins';
661: --
662: Begin
663: hr_utility.set_location('Entering:'||l_proc, 5);
665: -- Call conversion function to turn arguments into the
666: -- p_rec structure.
667: --
668: l_rec :=
669: ben_lge_shd.convert_args
670: (
671: null,
672: null,
673: null,