[Home] [Help]
130: --
131: -- {End Of Comments}
132: -- ----------------------------------------------------------------------------
133: Procedure dt_insert_dml
134: (p_rec in out nocopy ame_rul_shd.g_rec_type
135: ,p_effective_date in date
136: ,p_datetrack_mode in varchar2
137: ,p_validation_start_date in date
138: ,p_validation_end_date in date
143: select t.creation_date
144: from ame_rules t
145: where t.rule_id = p_rec.rule_id
146: and t.start_date =
147: ame_rul_shd.g_old_rec.start_date
148: and t.end_date = p_validation_start_date;
149: --
150: Cursor C_Sel2 Is
151: select created_by
181: --
182: -- Get the object version number for the insert
183: --
184: p_rec.object_version_number :=
185: ame_rul_shd.get_object_version_number
186: (p_rule_id => p_rec.rule_id
187: );
188: --
189: -- Select the 'old' created values
292: Exception
293: When hr_api.check_integrity_violated Then
294: -- A check constraint has been violated
295: --
296: ame_rul_shd.constraint_error
297: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
298: When hr_api.unique_integrity_violated Then
299: -- Unique integrity has been violated
300: --
297: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
298: When hr_api.unique_integrity_violated Then
299: -- Unique integrity has been violated
300: --
301: ame_rul_shd.constraint_error
302: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
303: When Others Then
304: --
305: Raise;
308: -- ----------------------------------------------------------------------------
309: -- |------------------------------< insert_dml >------------------------------|
310: -- ----------------------------------------------------------------------------
311: Procedure insert_dml
312: (p_rec in out nocopy ame_rul_shd.g_rec_type
313: ,p_effective_date in date
314: ,p_datetrack_mode in varchar2
315: ,p_validation_start_date in date
316: ,p_validation_end_date in date
371: --
372: -- {End Of Comments}
373: -- ----------------------------------------------------------------------------
374: Procedure pre_insert
375: (p_rec in out nocopy ame_rul_shd.g_rec_type
376: ,p_effective_date in date
377: ,p_datetrack_mode in varchar2
378: ,p_validation_start_date in date
379: ,p_validation_end_date in date
474: --
475: -- {End Of Comments}
476: -- ----------------------------------------------------------------------------
477: Procedure post_insert
478: (p_rec in ame_rul_shd.g_rec_type
479: ,p_effective_date in date
480: ,p_datetrack_mode in varchar2
481: ,p_validation_start_date in date
482: ,p_validation_end_date in date
568: -- ----------------------------------------------------------------------------
569: Procedure ins_lck
570: (p_effective_date in date
571: ,p_datetrack_mode in varchar2
572: ,p_rec in ame_rul_shd.g_rec_type
573: ,p_validation_start_date out nocopy date
574: ,p_validation_end_date out nocopy date
575: ) is
576: --
601: -- |---------------------------------< ins >----------------------------------|
602: -- ----------------------------------------------------------------------------
603: Procedure ins
604: (p_effective_date in date
605: ,p_rec in out nocopy ame_rul_shd.g_rec_type
606: ) is
607: --
608: l_proc varchar2(72) := g_package||'ins';
609: l_datetrack_mode varchar2(30) := hr_api.g_insert;
696: ,p_rule_id out nocopy number
697: ,p_object_version_number out nocopy number
698: ) is
699: --
700: l_rec ame_rul_shd.g_rec_type;
701: l_proc varchar2(72) := g_package||'ins';
702: --
703: Begin
704: hr_utility.set_location('Entering:'||l_proc, 5);
706: -- Call conversion function to turn arguments into the
707: -- p_rec structure.
708: --
709: l_rec :=
710: ame_rul_shd.convert_args
711: (null
712: ,p_rule_type
713: ,p_action_id
714: ,p_start_date