20: --
21: l_proc varchar2(72) := g_package||'set_base_key_value';
22: --
23: Begin
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: pay_rcu_ins.g_retro_component_usage_id_i := p_retro_component_usage_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: pay_rcu_ins.g_retro_component_usage_id_i := p_retro_component_usage_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
29: End set_base_key_value;
30: --
31: --
32: -- ----------------------------------------------------------------------------
126: --
127: l_proc varchar2(72) := g_package||'insert_dml';
128: --
129: Begin
130: hr_utility.set_location('Entering:'||l_proc, 5);
131: p_rec.object_version_number := 1; -- Initialise the object version
132: --
133: --
134: --
162: );
163: --
164: --
165: --
166: hr_utility.set_location(' Leaving:'||l_proc, 10);
167: Exception
168: When hr_api.check_integrity_violated Then
169: -- A check constraint has been violated
170: --
237: l_proc varchar2(72) := g_package||'pre_insert';
238: l_exists varchar2(1);
239: --
240: Begin
241: hr_utility.set_location('Entering:'||l_proc, 5);
242: --
243: If (pay_rcu_ins.g_retro_component_usage_id_i is not null) Then
244: --
245: -- Verify registered primary key values not already in use
273: Fetch C_Sel1 Into p_rec.retro_component_usage_id;
274: Close C_Sel1;
275: End If;
276: --
277: hr_utility.set_location(' Leaving:'||l_proc, 10);
278: End pre_insert;
279: --
280: -- ----------------------------------------------------------------------------
281: -- |-----------------------------< post_insert >------------------------------|
316: --
317: l_proc varchar2(72) := g_package||'post_insert';
318: --
319: Begin
320: hr_utility.set_location('Entering:'||l_proc, 5);
321: begin
322: --
323: -- insert ownerships if applicable
324: create_app_ownerships
361: ,p_hook_type => 'AI');
362: --
363: end;
364: --
365: hr_utility.set_location(' Leaving:'||l_proc, 10);
366: End post_insert;
367: --
368: -- ----------------------------------------------------------------------------
369: -- |---------------------------------< ins >----------------------------------|
375: --
376: l_proc varchar2(72) := g_package||'ins';
377: --
378: Begin
379: hr_utility.set_location('Entering:'||l_proc, 5);
380: --
381: -- Call the supporting insert validate operations
382: --
383: pay_rcu_bus.insert_validate
405: --
406: -- Call to raise any errors on multi-message list
407: hr_multi_message.end_validation_set;
408: --
409: hr_utility.set_location('Leaving:'||l_proc, 20);
410: end ins;
411: --
412: -- ----------------------------------------------------------------------------
413: -- |---------------------------------< ins >----------------------------------|
430: l_rec pay_rcu_shd.g_rec_type;
431: l_proc varchar2(72) := g_package||'ins';
432: --
433: Begin
434: hr_utility.set_location('Entering:'||l_proc, 5);
435: --
436: -- Call conversion function to turn arguments into the
437: -- p_rec structure.
438: --
464: --
465: p_retro_component_usage_id := l_rec.retro_component_usage_id;
466: p_object_version_number := l_rec.object_version_number;
467: --
468: hr_utility.set_location(' Leaving:'||l_proc, 10);
469: End ins;
470: --
471: end pay_rcu_ins;