6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_mcu_ins.'; -- Global package name
9:
10: g_debug boolean := hr_utility.debug_enabled;
11: --
12: -- ----------------------------------------------------------------------------
13: -- |------------------------------< insert_dml >------------------------------|
14: -- ----------------------------------------------------------------------------
62:
63:
64: if g_debug then
65: l_proc := g_package||'insert_dml';
66: hr_utility.set_location('Entering:'||l_proc, 5);
67: end if;
68: p_rec.object_version_number := 1; -- Initialise the object version
69: --
70: hxc_mcu_shd.g_api_dml := true; -- Set the api dml status
96: --
97: hxc_mcu_shd.g_api_dml := false; -- Unset the api dml status
98: --
99: if g_debug then
100: hr_utility.set_location(' Leaving:'||l_proc, 10);
101: end if;
102: Exception
103: When hr_api.check_integrity_violated Then
104: -- A check constraint has been violated
169:
170:
171: if g_debug then
172: l_proc := g_package||'pre_insert';
173: hr_utility.set_location('Entering:'||l_proc, 5);
174: end if;
175: --
176: --
177: -- Select the next sequence number
180: Fetch C_Sel1 Into p_rec.mapping_comp_usage_id;
181: Close C_Sel1;
182: --
183: if g_debug then
184: hr_utility.set_location(' Leaving:'||l_proc, 10);
185: end if;
186: End pre_insert;
187: --
188: -- ----------------------------------------------------------------------------
227:
228:
229: if g_debug then
230: l_proc := g_package||'post_insert';
231: hr_utility.set_location('Entering:'||l_proc, 5);
232: end if;
233: begin
234: --
235: hxc_mcu_rki.after_insert
253: --
254: end;
255: --
256: if g_debug then
257: hr_utility.set_location(' Leaving:'||l_proc, 10);
258: end if;
259: End post_insert;
260: --
261: -- ----------------------------------------------------------------------------
268: l_proc varchar2(72);
269: --
270: Begin
271:
272: g_debug := hr_utility.debug_enabled;
273:
274: if g_debug then
275: l_proc := g_package||'ins';
276: hr_utility.set_location('Entering:'||l_proc, 5);
272: g_debug := hr_utility.debug_enabled;
273:
274: if g_debug then
275: l_proc := g_package||'ins';
276: hr_utility.set_location('Entering:'||l_proc, 5);
277: end if;
278: --
279: -- Call the supporting insert validate operations
280: --
296: (p_rec
297: );
298: --
299: if g_debug then
300: hr_utility.set_location('Leaving:'||l_proc, 20);
301: end if;
302: end ins;
303: --
304: -- ----------------------------------------------------------------------------
314: l_rec hxc_mcu_shd.g_rec_type;
315: l_proc varchar2(72);
316: --
317: Begin
318: g_debug := hr_utility.debug_enabled;
319:
320: if g_debug then
321: l_proc := g_package||'ins';
322: hr_utility.set_location('Entering:'||l_proc, 5);
318: g_debug := hr_utility.debug_enabled;
319:
320: if g_debug then
321: l_proc := g_package||'ins';
322: hr_utility.set_location('Entering:'||l_proc, 5);
323: end if;
324: --
325: -- Call conversion function to turn arguments into the
326: -- p_rec structure.
346: p_mapping_comp_usage_id := l_rec.mapping_comp_usage_id;
347: p_object_version_number := l_rec.object_version_number;
348: --
349: if g_debug then
350: hr_utility.set_location(' Leaving:'||l_proc, 10);
351: end if;
352: End ins;
353: --
354: end hxc_mcu_ins;