[Home] [Help]
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_hat_ins.'; -- Global package name
9: g_debug boolean :=hr_utility.debug_enabled;
10: --
11: -- The following global variables are only to be used by
12: -- the set_base_key_value and pre_insert procedures.
13: --
21: --
22: l_proc varchar2(72);
23: --
24: Begin
25: g_debug:=hr_utility.debug_enabled;
26: if g_debug then
27: l_proc := g_package||'set_base_key_value';
28: hr_utility.set_location('Entering:'||l_proc, 10);
29: end if;
24: Begin
25: g_debug:=hr_utility.debug_enabled;
26: if g_debug then
27: l_proc := g_package||'set_base_key_value';
28: hr_utility.set_location('Entering:'||l_proc, 10);
29: end if;
30: --
31: hxc_hat_ins.g_alias_type_id_i := p_alias_type_id;
32: --
30: --
31: hxc_hat_ins.g_alias_type_id_i := p_alias_type_id;
32: --
33: if g_debug then
34: hr_utility.set_location(' Leaving:'||l_proc, 20);
35: end if;
36: End set_base_key_value;
37: --
38: --
87: --
88: Begin
89: if g_debug then
90: l_proc := g_package||'insert_dml';
91: hr_utility.set_location('Entering:'||l_proc, 5);
92: end if;
93: p_rec.object_version_number := 1; -- Initialise the object version
94: --
95: --
121: --
122: --
123: --
124: if g_debug then
125: hr_utility.set_location(' Leaving:'||l_proc, 10);
126: end if;
127: Exception
128: When hr_api.check_integrity_violated Then
129: -- A check constraint has been violated
199: --
200: Begin
201: if g_debug then
202: l_proc:= g_package||'pre_insert';
203: hr_utility.set_location('Entering:'||l_proc, 5);
204: end if;
205: --
206: /* If (hxc_hat_ins.g_alias_type_id_i is not null) Then
207: --
237: Close C_Sel1;
238: -- End If;
239: --
240: if g_debug then
241: hr_utility.set_location(' Leaving:'||l_proc, 10);
242: end if;
243: End pre_insert;
244: --
245: -- ----------------------------------------------------------------------------
282: --
283: Begin
284: if g_debug then
285: l_proc := g_package||'post_insert';
286: hr_utility.set_location('Entering:'||l_proc, 5);
287: end if;
288: begin
289: --
290: hxc_hat_rki.after_insert
308: --
309: end;
310: --
311: if g_debug then
312: hr_utility.set_location(' Leaving:'||l_proc, 10);
313: end if;
314: End post_insert;
315: --
316: -- ----------------------------------------------------------------------------
322: --
323: l_proc varchar2(72);
324: --
325: Begin
326: g_debug:=hr_utility.debug_enabled;
327: if g_debug then
328: l_proc := g_package||'ins';
329: hr_utility.set_location('Entering:'||l_proc, 5);
330: end if;
325: Begin
326: g_debug:=hr_utility.debug_enabled;
327: if g_debug then
328: l_proc := g_package||'ins';
329: hr_utility.set_location('Entering:'||l_proc, 5);
330: end if;
331: --
332: -- Call the supporting insert validate operations
333: --
355: -- Call to raise any errors on multi-message list
356: hr_multi_message.end_validation_set;
357: --
358: if g_debug then
359: hr_utility.set_location('Leaving:'||l_proc, 20);
360: end if;
361: end ins;
362: --
363: -- ----------------------------------------------------------------------------
373: l_rec hxc_hat_shd.g_rec_type;
374: l_proc varchar2(72);
375: --
376: Begin
377: g_debug:=hr_utility.debug_enabled;
378: if g_debug then
379: l_proc := g_package||'ins';
380: hr_utility.set_location('Entering:'||l_proc, 5);
381: end if;
376: Begin
377: g_debug:=hr_utility.debug_enabled;
378: if g_debug then
379: l_proc := g_package||'ins';
380: hr_utility.set_location('Entering:'||l_proc, 5);
381: end if;
382: --
383: -- Call conversion function to turn arguments into the
384: -- p_rec structure.
404: p_alias_type_id := l_rec.alias_type_id;
405: p_object_version_number := l_rec.object_version_number;
406: --
407: if g_debug then
408: hr_utility.set_location(' Leaving:'||l_proc, 10);
409: end if;
410: End ins;
411: --
412: end hxc_hat_ins;