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: per_pds_ins.g_period_of_service_id_i := p_period_of_service_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: per_pds_ins.g_period_of_service_id_i := p_period_of_service_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
29: End set_base_key_value;
30: --
31: --
32: -- ----------------------------------------------------------------------------
76: --
77: l_proc varchar2(72) := g_package||'insert_dml';
78: --
79: Begin
80: hr_utility.set_location('Entering:'||l_proc, 5);
81: p_rec.object_version_number := 1; -- Initialise the object version
82: --
83: per_pds_shd.g_api_dml := true; -- Set the api dml status
84: --
236: );
237: --
238: per_pds_shd.g_api_dml := false; -- Unset the api dml status
239: --
240: hr_utility.set_location(' Leaving:'||l_proc, 10);
241: Exception
242: When hr_api.check_integrity_violated Then
243: -- A check constraint has been violated
244: per_pds_shd.g_api_dml := false; -- Unset the api dml status
302: --
303: Cursor C_Sel1 is select per_periods_of_service_s.nextval from sys.dual;
304: --
305: Begin
306: hr_utility.set_location('Entering:'||l_proc, 5);
307: --
308: --
309: -- Select the next sequence number
310: --
311: Open C_Sel1;
312: Fetch C_Sel1 Into p_rec.period_of_service_id;
313: Close C_Sel1;
314: --
315: hr_utility.set_location(' Leaving:'||l_proc, 10);
316: End pre_insert;
317: --
318: -- ----------------------------------------------------------------------------
319: -- |-----------------------------< post_insert >------------------------------|
359: -- END WWBUG 1390173 fix
360: --
361: --
362: Begin
363: hr_utility.set_location('Entering:'||l_proc, 5);
364: --
365: -- GP
366: --
367: -- BEGIN of FIX for WWBUG 1390173
477: );
478: end;
479: -- End of API User Hook for post_insert.
480: --
481: hr_utility.set_location(' Leaving:'||l_proc, 10);
482: End post_insert;
483: --
484: -- ----------------------------------------------------------------------------
485: -- |---------------------------------< ins >----------------------------------|
494: --
495: l_proc varchar2(72) := g_package||'ins';
496: --
497: Begin
498: hr_utility.set_location('Entering:'||l_proc, 5);
499: --
500: -- Determine if the business process is to be validated.
501: --
502: If p_validate then
529: If p_validate then
530: Raise HR_Api.Validate_Enabled;
531: End If;
532: --
533: hr_utility.set_location(' Leaving:'||l_proc, 10);
534: Exception
535: When HR_Api.Validate_Enabled Then
536: --
537: -- As the Validate_Enabled exception has been raised
621: l_rec per_pds_shd.g_rec_type;
622: l_proc varchar2(72) := g_package||'ins';
623: --
624: Begin
625: hr_utility.set_location('Entering:'||l_proc, 5);
626: --
627: -- Call conversion function to turn arguments into the
628: -- p_rec structure.
629: --
717: --
718: p_period_of_service_id := l_rec.period_of_service_id;
719: p_object_version_number := l_rec.object_version_number;
720: --
721: hr_utility.set_location(' Leaving:'||l_proc, 10);
722: End ins;
723: --
724: end per_pds_ins;