6: g_package varchar2(33) := ' hxc_application_set_comp_api.';
7:
8: g_entity_type varchar2(16) := 'TIME_RECIPIENTS';
9:
10: g_debug boolean :=hr_utility.debug_enabled;
11: -- ----------------------------------------------------------------------------
12: -- |--------------------< create_application_set_comp>--------------------------|
13: -- ----------------------------------------------------------------------------
14: --
60: l_application_set_comp_id hxc_entity_group_comps.entity_group_comp_id%TYPE;
61: --
62: begin
63: --
64: g_debug:=hr_utility.debug_enabled;
65: if g_debug then
66: l_proc := g_package||' create_application_set_comp';
67: hr_utility.set_location('Entering:'|| l_proc, 10);
68: end if;
63: --
64: g_debug:=hr_utility.debug_enabled;
65: if g_debug then
66: l_proc := g_package||' create_application_set_comp';
67: hr_utility.set_location('Entering:'|| l_proc, 10);
68: end if;
69: --
70: -- Issue a savepoint if operating in validation only mode
71: --
71: --
72: savepoint create_application_set_comp;
73: --
74: if g_debug then
75: hr_utility.set_location(l_proc, 20);
76: end if;
77:
78: chk_as_unique ( p_application_set_comp_id => p_application_set_comp_id
79: ,p_application_set_id => p_application_set_id
128: );
129: end;
130: --
131: if g_debug then
132: hr_utility.set_location(l_proc, 30);
133: end if;
134: --
135: -- Process Logic
136: --
135: -- Process Logic
136: --
137: --
138: if g_debug then
139: hr_utility.set_location(l_proc, 40);
140: end if;
141: --
142: -- call row handler
143: --
181: ,p_attribute30 => p_attribute30
182: ,p_called_from_form => p_called_from_form );
183: --
184: if g_debug then
185: hr_utility.set_location(l_proc, 50);
186: end if;
187: --
188: -- Call After Process User Hook
189: --
232: );
233: end;
234: --
235: if g_debug then
236: hr_utility.set_location(l_proc, 60);
237: end if;
238: --
239: -- When in validation only mode raise the Validate_Enabled exception
240: --
242: raise hr_api.validate_enabled;
243: end if;
244: --
245: if g_debug then
246: hr_utility.set_location(' Leaving:'||l_proc, 70);
247: end if;
248: --
249: -- Set all output arguments
250: --
267: p_application_set_comp_id := null;
268: p_object_version_number := null;
269: --
270: if g_debug then
271: hr_utility.set_location(' Leaving:'||l_proc, 80);
272: end if;
273: --
274: when others then
275: --
275: --
276: -- A validation or unexpected error has occured
277: --
278: if g_debug then
279: hr_utility.trace('In exeception');
280: end if;
281: ROLLBACK TO create_application_set_comp;
282: raise;
283: --
334: l_object_version_number hxc_entity_group_comps.object_version_number%TYPE := p_object_version_number;
335: --
336: begin
337: --
338: g_debug:=hr_utility.debug_enabled;
339: if g_debug then
340: l_proc := g_package||' update_application_set_comp';
341: hr_utility.set_location('Entering:'|| l_proc, 10);
342: end if;
337: --
338: g_debug:=hr_utility.debug_enabled;
339: if g_debug then
340: l_proc := g_package||' update_application_set_comp';
341: hr_utility.set_location('Entering:'|| l_proc, 10);
342: end if;
343: --
344: -- Issue a savepoint if operating in validation only mode
345: --
345: --
346: savepoint update_application_set_comp;
347: --
348: if g_debug then
349: hr_utility.set_location(l_proc, 20);
350: end if;
351:
352: chk_as_unique ( p_application_set_comp_id => p_application_set_comp_id
353: ,p_application_set_id => p_application_set_id
402: );
403: end;
404: --
405: if g_debug then
406: hr_utility.set_location(l_proc, 30);
407: end if;
408: --
409: -- Process Logic
410: --
449: ,p_called_from_form => p_called_from_form );
450: --
451: --
452: if g_debug then
453: hr_utility.set_location(l_proc, 40);
454: end if;
455: --
456: -- Call After Process User Hook
457: --
501: );
502: end;
503: --
504: if g_debug then
505: hr_utility.set_location(l_proc, 50);
506: end if;
507: --
508: -- When in validation only mode raise the Validate_Enabled exception
509: --
511: raise hr_api.validate_enabled;
512: end if;
513: --
514: if g_debug then
515: hr_utility.set_location(' Leaving:'||l_proc, 60);
516: end if;
517: --
518: -- Set all output arguments
519: --
534: --
535: p_object_version_number := null;
536: --
537: if g_debug then
538: hr_utility.set_location(' Leaving:'||l_proc, 60);
539: end if;
540: --
541: when others then
542: --
542: --
543: -- A validation or unexpected error has occured
544: --
545: if g_debug then
546: hr_utility.trace('In exeception');
547: end if;
548: ROLLBACK TO update_application_set_comp;
549: raise;
550: --
566: l_proc varchar2(72);
567: --
568: begin
569: --
570: g_debug:=hr_utility.debug_enabled;
571: if g_debug then
572: l_proc := g_package||'delete_application_set_comp';
573: hr_utility.set_location('Entering:'|| l_proc, 10);
574: end if;
569: --
570: g_debug:=hr_utility.debug_enabled;
571: if g_debug then
572: l_proc := g_package||'delete_application_set_comp';
573: hr_utility.set_location('Entering:'|| l_proc, 10);
574: end if;
575: --
576: -- Issue a savepoint if operating in validation only mode
577: --
577: --
578: savepoint delete_application_set_comp;
579: --
580: if g_debug then
581: hr_utility.set_location(l_proc, 20);
582: end if;
583:
584: -- Call Before Process User Hook
585:
597: );
598: end;
599: --
600: if g_debug then
601: hr_utility.set_location(l_proc, 30);
602: end if;
603: --
604: -- Process Logic
605: --
609: ,p_object_version_number => p_object_version_number
610: );
611: --
612: if g_debug then
613: hr_utility.set_location(l_proc, 40);
614: end if;
615: --
616: -- Call After Process User Hook
617: --
635: raise hr_api.validate_enabled;
636: end if;
637: --
638: if g_debug then
639: hr_utility.set_location(' Leaving:'||l_proc, 50);
640: end if;
641: --
642: exception
643: --
705: --
706: l_error varchar2(5) := NULL;
707: --
708: BEGIN
709: g_debug:=hr_utility.debug_enabled;
710: if g_debug then
711: l_proc := g_package||'chk_as_unique';
712: hr_utility.set_location('Entering:'||l_proc, 5);
713: end if;
708: BEGIN
709: g_debug:=hr_utility.debug_enabled;
710: if g_debug then
711: l_proc := g_package||'chk_as_unique';
712: hr_utility.set_location('Entering:'||l_proc, 5);
713: end if;
714: --
715: -- check that ter is unique within the grouping
716: --
720: --
721: IF l_error IS NOT NULL
722: THEN
723: --
724: hr_utility.set_message(809, 'HXC_EGC_AS_NOT_UNIQUE');
725: hr_utility.raise_error;
726: --
727: END IF;
728: --
721: IF l_error IS NOT NULL
722: THEN
723: --
724: hr_utility.set_message(809, 'HXC_EGC_AS_NOT_UNIQUE');
725: hr_utility.raise_error;
726: --
727: END IF;
728: --
729: if g_debug then
726: --
727: END IF;
728: --
729: if g_debug then
730: hr_utility.set_location('Leaving:'||l_proc, 20);
731: end if;
732: --
733: END chk_as_unique;
734: --
801: --
802: BEGIN
803: if g_debug then
804: l_proc := g_package||'chk_appl_as_unique';
805: hr_utility.set_location('Entering:'||l_proc, 5);
806: end if;
807: --
808: -- check that list of time recipients in the currnet application set are not present
809: -- in any other Application Set in the system
814: --
815: IF l_error IS NOT NULL
816: THEN
817: --
818: hr_utility.set_message(809, 'HXC_APPL_AS_NOT_UNIQUE');
819: hr_utility.raise_error;
820: --
821: END IF;
822: --
815: IF l_error IS NOT NULL
816: THEN
817: --
818: hr_utility.set_message(809, 'HXC_APPL_AS_NOT_UNIQUE');
819: hr_utility.raise_error;
820: --
821: END IF;
822: --
823: if g_debug then
820: --
821: END IF;
822: --
823: if g_debug then
824: hr_utility.set_location('Leaving:'||l_proc, 20);
825: end if;
826: --
827: END chk_appl_as_unique;
828: --