51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy ame_cal_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: l_current_user_id number;
95: Exception
96: When hr_api.check_integrity_violated Then
97: -- A check constraint has been violated
98: --
99: ame_cal_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.parent_integrity_violated Then
102: -- Parent integrity has been violated
103: --
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.parent_integrity_violated Then
102: -- Parent integrity has been violated
103: --
104: ame_cal_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.unique_integrity_violated Then
107: -- Unique integrity has been violated
108: --
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When hr_api.unique_integrity_violated Then
107: -- Unique integrity has been violated
108: --
109: ame_cal_shd.constraint_error
110: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When Others Then
112: --
113: Raise;
145: --
146: -- {End Of Comments}
147: -- ----------------------------------------------------------------------------
148: Procedure pre_update
149: (p_rec in ame_cal_shd.g_rec_type
150: ) is
151: --
152: l_proc varchar2(72) := g_package||'pre_update';
153: --
189: --
190: -- {End Of Comments}
191: -- ----------------------------------------------------------------------------
192: Procedure post_update
193: (p_rec in ame_cal_shd.g_rec_type
194: ) is
195: --
196: l_proc varchar2(72) := g_package||'post_update';
197: --
208: => p_rec.source_lang
209: ,p_application_name
210: => p_rec.application_name
211: ,p_source_lang_o
212: => ame_cal_shd.g_old_rec.source_lang
213: ,p_application_name_o
214: => ame_cal_shd.g_old_rec.application_name
215: );
216: --
210: => p_rec.application_name
211: ,p_source_lang_o
212: => ame_cal_shd.g_old_rec.source_lang
213: ,p_application_name_o
214: => ame_cal_shd.g_old_rec.application_name
215: );
216: --
217: exception
218: --
270: --
271: -- {End Of Comments}
272: -- ----------------------------------------------------------------------------
273: Procedure convert_defs
274: (p_rec in out nocopy ame_cal_shd.g_rec_type
275: ) is
276: --
277: Begin
278: --
282: -- is being used then we must set to the 'current' argument value.
283: --
284: If (p_rec.source_lang = hr_api.g_varchar2) then
285: p_rec.source_lang :=
286: ame_cal_shd.g_old_rec.source_lang;
287: End If;
288: If (p_rec.application_name = hr_api.g_varchar2) then
289: p_rec.application_name :=
290: ame_cal_shd.g_old_rec.application_name;
286: ame_cal_shd.g_old_rec.source_lang;
287: End If;
288: If (p_rec.application_name = hr_api.g_varchar2) then
289: p_rec.application_name :=
290: ame_cal_shd.g_old_rec.application_name;
291: End If;
292: --
293: End convert_defs;
294: --
295: -- ----------------------------------------------------------------------------
296: -- |---------------------------------< upd >----------------------------------|
297: -- ----------------------------------------------------------------------------
298: Procedure upd
299: (p_rec in out nocopy ame_cal_shd.g_rec_type
300: ) is
301: --
302: l_proc varchar2(72) := g_package||'upd';
303: --
305: hr_utility.set_location('Entering:'||l_proc, 5);
306: --
307: -- We must lock the row which we need to update.
308: --
309: ame_cal_shd.lck
310: (p_rec.application_id
311: ,p_rec.language
312: );
313: --
352: ,p_source_lang in varchar2 default hr_api.g_varchar2
353: ,p_application_name in varchar2 default hr_api.g_varchar2
354: ) is
355: --
356: l_rec ame_cal_shd.g_rec_type;
357: l_proc varchar2(72) := g_package||'upd';
358: --
359: Begin
360: hr_utility.set_location('Entering:'||l_proc, 5);
362: -- Call conversion function to turn arguments into the
363: -- l_rec structure.
364: --
365: l_rec :=
366: ame_cal_shd.convert_args
367: (p_application_id
368: ,p_language
369: ,p_source_lang
370: ,p_application_name