[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_edg_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_elig_dpnt_cvrd_othr_pgm_f t
70: where t.elig_dpnt_cvrd_othr_pgm_id = p_rec.elig_dpnt_cvrd_othr_pgm_id
71: and t.effective_start_date =
72: ben_edg_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_elig_dpnt_cvrd_othr_pgm_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_edg_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_elig_dpnt_cvrd_othr_pgm_f
132: --
133: insert into ben_elig_dpnt_cvrd_othr_pgm_f
228: l_last_updated_by,
229: l_last_update_login
230: );
231: --
232: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
233: hr_utility.set_location(' Leaving:'||l_proc, 15);
234: --
235: Exception
236: When hr_api.check_integrity_violated Then
234: --
235: Exception
236: When hr_api.check_integrity_violated Then
237: -- A check constraint has been violated
238: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
239: ben_edg_shd.constraint_error
240: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
241: When hr_api.unique_integrity_violated Then
242: -- Unique integrity has been violated
235: Exception
236: When hr_api.check_integrity_violated Then
237: -- A check constraint has been violated
238: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
239: ben_edg_shd.constraint_error
240: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
241: When hr_api.unique_integrity_violated Then
242: -- Unique integrity has been violated
243: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
239: ben_edg_shd.constraint_error
240: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
241: When hr_api.unique_integrity_violated Then
242: -- Unique integrity has been violated
243: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
244: ben_edg_shd.constraint_error
245: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
246: When Others Then
247: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
240: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
241: When hr_api.unique_integrity_violated Then
242: -- Unique integrity has been violated
243: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
244: ben_edg_shd.constraint_error
245: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
246: When Others Then
247: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
248: Raise;
243: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
244: ben_edg_shd.constraint_error
245: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
246: When Others Then
247: ben_edg_shd.g_api_dml := false; -- Unset the api dml status
248: Raise;
249: End dt_insert_dml;
250: --
251: -- ----------------------------------------------------------------------------
251: -- ----------------------------------------------------------------------------
252: -- |------------------------------< insert_dml >------------------------------|
253: -- ----------------------------------------------------------------------------
254: Procedure insert_dml
255: (p_rec in out nocopy ben_edg_shd.g_rec_type,
256: p_effective_date in date,
257: p_datetrack_mode in varchar2,
258: p_validation_start_date in date,
259: p_validation_end_date in date) is
311: --
312: -- {End Of Comments}
313: -- ----------------------------------------------------------------------------
314: Procedure pre_insert
315: (p_rec in out nocopy ben_edg_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
368: --
369: -- {End Of Comments}
370: -- ----------------------------------------------------------------------------
371: Procedure post_insert
372: (p_rec in ben_edg_shd.g_rec_type,
373: p_effective_date in date,
374: p_datetrack_mode in varchar2,
375: p_validation_start_date in date,
376: p_validation_end_date in date) is
489: -- ----------------------------------------------------------------------------
490: Procedure ins_lck
491: (p_effective_date in date,
492: p_datetrack_mode in varchar2,
493: p_rec in ben_edg_shd.g_rec_type,
494: p_validation_start_date out nocopy date,
495: p_validation_end_date out nocopy date) is
496: --
497: l_proc varchar2(72) := g_package||'ins_lck';
533: -- |---------------------------------< ins >----------------------------------|
534: -- ----------------------------------------------------------------------------
535: Procedure ins
536: (
537: p_rec in out nocopy ben_edg_shd.g_rec_type,
538: p_effective_date in date
539: ) is
540: --
541: l_proc varchar2(72) := g_package||'ins';
641: p_object_version_number out nocopy number,
642: p_effective_date in date
643: ) is
644: --
645: l_rec ben_edg_shd.g_rec_type;
646: l_proc varchar2(72) := g_package||'ins';
647: --
648: Begin
649: hr_utility.set_location('Entering:'||l_proc, 5);
651: -- Call conversion function to turn arguments into the
652: -- p_rec structure.
653: --
654: l_rec :=
655: ben_edg_shd.convert_args
656: (
657: null,
658: null,
659: null,