[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_cct_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_cm_typ_f t
70: where t.cm_typ_id = p_rec.cm_typ_id
71: and t.effective_start_date =
72: ben_cct_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_cm_typ_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_cct_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_cm_typ_f
132: --
133: insert into ben_cm_typ_f
286: where t.cm_typ_id = p_rec.cm_typ_id
287: and t.effective_start_date = p_rec.effective_start_date
288: and t.language = l.language_code);
289: --
290: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
291: hr_utility.set_location(' Leaving:'||l_proc, 15);
292: --
293: Exception
294: When hr_api.check_integrity_violated Then
292: --
293: Exception
294: When hr_api.check_integrity_violated Then
295: -- A check constraint has been violated
296: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
297: ben_cct_shd.constraint_error
298: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
299: When hr_api.unique_integrity_violated Then
300: -- Unique integrity has been violated
293: Exception
294: When hr_api.check_integrity_violated Then
295: -- A check constraint has been violated
296: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
297: ben_cct_shd.constraint_error
298: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
299: When hr_api.unique_integrity_violated Then
300: -- Unique integrity has been violated
301: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
297: ben_cct_shd.constraint_error
298: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
299: When hr_api.unique_integrity_violated Then
300: -- Unique integrity has been violated
301: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
302: ben_cct_shd.constraint_error
303: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
304: When Others Then
305: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
298: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
299: When hr_api.unique_integrity_violated Then
300: -- Unique integrity has been violated
301: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
302: ben_cct_shd.constraint_error
303: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
304: When Others Then
305: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
306: Raise;
301: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
302: ben_cct_shd.constraint_error
303: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
304: When Others Then
305: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
306: Raise;
307: End dt_insert_dml;
308: --
309: -- ----------------------------------------------------------------------------
309: -- ----------------------------------------------------------------------------
310: -- |------------------------------< insert_dml >------------------------------|
311: -- ----------------------------------------------------------------------------
312: Procedure insert_dml
313: (p_rec in out nocopy ben_cct_shd.g_rec_type,
314: p_effective_date in date,
315: p_datetrack_mode in varchar2,
316: p_validation_start_date in date,
317: p_validation_end_date in date) is
369: --
370: -- {End Of Comments}
371: -- ----------------------------------------------------------------------------
372: Procedure pre_insert
373: (p_rec in out nocopy ben_cct_shd.g_rec_type,
374: p_effective_date in date,
375: p_datetrack_mode in varchar2,
376: p_validation_start_date in date,
377: p_validation_end_date in date) is
426: --
427: -- {End Of Comments}
428: -- ----------------------------------------------------------------------------
429: Procedure post_insert
430: (p_rec in ben_cct_shd.g_rec_type,
431: p_effective_date in date,
432: p_datetrack_mode in varchar2,
433: p_validation_start_date in date,
434: p_validation_end_date in date) is
555: -- ----------------------------------------------------------------------------
556: Procedure ins_lck
557: (p_effective_date in date,
558: p_datetrack_mode in varchar2,
559: p_rec in ben_cct_shd.g_rec_type,
560: p_validation_start_date out nocopy date,
561: p_validation_end_date out nocopy date) is
562: --
563: l_proc varchar2(72) := g_package||'ins_lck';
596: -- |---------------------------------< ins >----------------------------------|
597: -- ----------------------------------------------------------------------------
598: Procedure ins
599: (
600: p_rec in out nocopy ben_cct_shd.g_rec_type,
601: p_effective_date in date
602: ) is
603: --
604: l_proc varchar2(72) := g_package||'ins';
714: p_object_version_number out nocopy number,
715: p_effective_date in date
716: ) is
717: --
718: l_rec ben_cct_shd.g_rec_type;
719: l_proc varchar2(72) := g_package||'ins';
720: --
721: Begin
722: hr_utility.set_location('Entering:'||l_proc, 5);
724: -- Call conversion function to turn arguments into the
725: -- p_rec structure.
726: --
727: l_rec :=
728: ben_cct_shd.convert_args
729: (
730: null,
731: null,
732: null,