[Home] [Help]
54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ben_prc_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_reimbmt_rqst_f t
70: where t.prtt_reimbmt_rqst_id = p_rec.prtt_reimbmt_rqst_id
71: and t.effective_start_date =
72: ben_prc_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_reimbmt_rqst_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_prc_shd.g_api_dml := true; -- Set the api dml status
130: --
131: -- Insert the row into: ben_prtt_reimbmt_rqst_f
132: --
133: insert into ben_prtt_reimbmt_rqst_f
290: p_rec.aprvd_for_pymt_amt,
291: p_rec.exp_incurd_dt
292: );
293: --
294: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
295: hr_utility.set_location(' Leaving:'||l_proc, 15);
296: --
297: Exception
298: When hr_api.check_integrity_violated Then
296: --
297: Exception
298: When hr_api.check_integrity_violated Then
299: -- A check constraint has been violated
300: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
301: ben_prc_shd.constraint_error
302: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
303: When hr_api.unique_integrity_violated Then
304: -- Unique integrity has been violated
297: Exception
298: When hr_api.check_integrity_violated Then
299: -- A check constraint has been violated
300: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
301: ben_prc_shd.constraint_error
302: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
303: When hr_api.unique_integrity_violated Then
304: -- Unique integrity has been violated
305: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
301: ben_prc_shd.constraint_error
302: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
303: When hr_api.unique_integrity_violated Then
304: -- Unique integrity has been violated
305: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
306: ben_prc_shd.constraint_error
307: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
308: When Others Then
309: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
302: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
303: When hr_api.unique_integrity_violated Then
304: -- Unique integrity has been violated
305: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
306: ben_prc_shd.constraint_error
307: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
308: When Others Then
309: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
310: Raise;
305: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
306: ben_prc_shd.constraint_error
307: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
308: When Others Then
309: ben_prc_shd.g_api_dml := false; -- Unset the api dml status
310: Raise;
311: End dt_insert_dml;
312: --
313: -- ----------------------------------------------------------------------------
313: -- ----------------------------------------------------------------------------
314: -- |------------------------------< insert_dml >------------------------------|
315: -- ----------------------------------------------------------------------------
316: Procedure insert_dml
317: (p_rec in out nocopy ben_prc_shd.g_rec_type,
318: p_effective_date in date,
319: p_datetrack_mode in varchar2,
320: p_validation_start_date in date,
321: p_validation_end_date in date) is
375: --
376: -- {End Of Comments}
377: -- ----------------------------------------------------------------------------
378: Procedure pre_insert
379: (p_rec in out nocopy ben_prc_shd.g_rec_type,
380: p_effective_date in date,
381: p_datetrack_mode in varchar2,
382: p_validation_start_date in date,
383: p_validation_end_date in date) is
440: --
441: -- {End Of Comments}
442: -- ----------------------------------------------------------------------------
443: Procedure post_insert
444: (p_rec in ben_prc_shd.g_rec_type,
445: p_effective_date in date,
446: p_datetrack_mode in varchar2,
447: p_validation_start_date in date,
448: p_validation_end_date in date) is
592: -- ----------------------------------------------------------------------------
593: Procedure ins_lck
594: (p_effective_date in date,
595: p_datetrack_mode in varchar2,
596: p_rec in ben_prc_shd.g_rec_type,
597: p_validation_start_date out nocopy date,
598: p_validation_end_date out nocopy date) is
599: --
600: l_proc varchar2(72) := g_package||'ins_lck';
633: -- |---------------------------------< ins >----------------------------------|
634: -- ----------------------------------------------------------------------------
635: Procedure ins
636: (
637: p_rec in out nocopy ben_prc_shd.g_rec_type,
638: p_effective_date in date
639: ) is
640: --
641: l_proc varchar2(72) := g_package||'ins';
780: p_exp_incurd_dt in date ,
781: p_effective_date in date
782: ) is
783: --
784: l_rec ben_prc_shd.g_rec_type;
785: l_proc varchar2(72) := g_package||'ins';
786: --
787: Begin
788: hr_utility.set_location('Entering:'||l_proc, 5);
790: -- Call conversion function to turn arguments into the
791: -- p_rec structure.
792: --
793: l_rec :=
794: ben_prc_shd.convert_args
795: (
796: null,
797: null,
798: null,