[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
284: where t.cm_typ_id = p_rec.cm_typ_id
285: and t.effective_start_date = p_rec.effective_start_date
286: and t.language = l.language_code);
287: --
288: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
289: hr_utility.set_location(' Leaving:'||l_proc, 15);
290: --
291: Exception
292: When hr_api.check_integrity_violated Then
290: --
291: Exception
292: When hr_api.check_integrity_violated Then
293: -- A check constraint has been violated
294: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
295: ben_cct_shd.constraint_error
296: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
297: When hr_api.unique_integrity_violated Then
298: -- Unique integrity has been violated
291: Exception
292: When hr_api.check_integrity_violated Then
293: -- A check constraint has been violated
294: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
295: ben_cct_shd.constraint_error
296: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
297: When hr_api.unique_integrity_violated Then
298: -- Unique integrity has been violated
299: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
295: ben_cct_shd.constraint_error
296: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
297: When hr_api.unique_integrity_violated Then
298: -- Unique integrity has been violated
299: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
300: ben_cct_shd.constraint_error
301: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
302: When Others Then
303: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
296: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
297: When hr_api.unique_integrity_violated Then
298: -- Unique integrity has been violated
299: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
300: ben_cct_shd.constraint_error
301: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
302: When Others Then
303: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
304: Raise;
299: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
300: ben_cct_shd.constraint_error
301: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
302: When Others Then
303: ben_cct_shd.g_api_dml := false; -- Unset the api dml status
304: Raise;
305: End dt_insert_dml;
306: --
307: -- ----------------------------------------------------------------------------
307: -- ----------------------------------------------------------------------------
308: -- |------------------------------< insert_dml >------------------------------|
309: -- ----------------------------------------------------------------------------
310: Procedure insert_dml
311: (p_rec in out nocopy ben_cct_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
367: --
368: -- {End Of Comments}
369: -- ----------------------------------------------------------------------------
370: Procedure pre_insert
371: (p_rec in out nocopy ben_cct_shd.g_rec_type,
372: p_effective_date in date,
373: p_datetrack_mode in varchar2,
374: p_validation_start_date in date,
375: p_validation_end_date in date) is
424: --
425: -- {End Of Comments}
426: -- ----------------------------------------------------------------------------
427: Procedure post_insert
428: (p_rec in ben_cct_shd.g_rec_type,
429: p_effective_date in date,
430: p_datetrack_mode in varchar2,
431: p_validation_start_date in date,
432: p_validation_end_date in date) is
552: -- ----------------------------------------------------------------------------
553: Procedure ins_lck
554: (p_effective_date in date,
555: p_datetrack_mode in varchar2,
556: p_rec in ben_cct_shd.g_rec_type,
557: p_validation_start_date out nocopy date,
558: p_validation_end_date out nocopy date) is
559: --
560: l_proc varchar2(72) := g_package||'ins_lck';
593: -- |---------------------------------< ins >----------------------------------|
594: -- ----------------------------------------------------------------------------
595: Procedure ins
596: (
597: p_rec in out nocopy ben_cct_shd.g_rec_type,
598: p_effective_date in date
599: ) is
600: --
601: l_proc varchar2(72) := g_package||'ins';
710: p_object_version_number out nocopy number,
711: p_effective_date in date
712: ) is
713: --
714: l_rec ben_cct_shd.g_rec_type;
715: l_proc varchar2(72) := g_package||'ins';
716: --
717: Begin
718: hr_utility.set_location('Entering:'||l_proc, 5);
720: -- Call conversion function to turn arguments into the
721: -- p_rec structure.
722: --
723: l_rec :=
724: ben_cct_shd.convert_args
725: (
726: null,
727: null,
728: null,