26: --
27: -- Other variables
28: l_proc varchar2(72) := g_package ||'create_vac_rec_area_value';
29: Begin
30: hr_utility.set_location(' Entering:' || l_proc,10);
31: --
32: -- Issue a savepoint
33: --
34: savepoint create_vac_rec_area_value_swi;
77: -- messages of any type exist in the Multiple Message List.
78: -- Also disable Multiple Message Detection.
79: --
80: p_return_status := hr_multi_message.get_return_status_disable;
81: hr_utility.set_location(' Leaving:' || l_proc,20);
82: --
83: exception
84: when hr_multi_message.error_message_exist then
85: --
93: --
94: p_vac_rec_area_id := null;
95: p_object_version_number := null;
96: p_return_status := hr_multi_message.get_return_status_disable;
97: hr_utility.set_location(' Leaving:' || l_proc, 30);
98: when others then
99: --
100: -- When Multiple Message Detection is enabled catch
101: -- any Application specific or other unexpected
104: -- error.
105: --
106: rollback to create_vac_rec_area_value_swi;
107: if hr_multi_message.unexpected_error_add(l_proc) then
108: hr_utility.set_location(' Leaving:' || l_proc,40);
109: raise;
110: end if;
111: --
112: -- Reset IN OUT and set OUT parameters
113: --
114: p_vac_rec_area_id := null;
115: p_object_version_number := null;
116: p_return_status := hr_multi_message.get_return_status_disable;
117: hr_utility.set_location(' Leaving:' || l_proc,50);
118: end create_vac_rec_area_value;
119: --
120: -- ----------------------------------------------------------------------------
121: -- |----------------------< delete_location_preference >----------------------|
134: --
135: -- Other variables
136: l_proc varchar2(72) := g_package ||'delete_location_preference';
137: Begin
138: hr_utility.set_location(' Entering:' || l_proc,10);
139: --
140: -- Issue a savepoint
141: --
142: savepoint delete_location_preference_swi;
176: -- messages of any type exist in the Multiple Message List.
177: -- Also disable Multiple Message Detection.
178: --
179: p_return_status := hr_multi_message.get_return_status_disable;
180: hr_utility.set_location(' Leaving:' || l_proc,20);
181: --
182: exception
183: when hr_multi_message.error_message_exist then
184: --
190: --
191: -- Reset IN OUT parameters and set OUT parameters
192: --
193: p_return_status := hr_multi_message.get_return_status_disable;
194: hr_utility.set_location(' Leaving:' || l_proc, 30);
195: when others then
196: --
197: -- When Multiple Message Detection is enabled catch
198: -- any Application specific or other unexpected
201: -- error.
202: --
203: rollback to delete_location_preference_swi;
204: if hr_multi_message.unexpected_error_add(l_proc) then
205: hr_utility.set_location(' Leaving:' || l_proc,40);
206: raise;
207: end if;
208: --
209: -- Reset IN OUT and set OUT parameters
208: --
209: -- Reset IN OUT and set OUT parameters
210: --
211: p_return_status := hr_multi_message.get_return_status_disable;
212: hr_utility.set_location(' Leaving:' || l_proc,50);
213: end delete_location_preference;
214: --
215: -- ----------------------------------------------------------------------------
216: -- |----------------------< create_location_preference >----------------------|
268: -- Other variables
269: l_location_pref_id number;
270: l_proc varchar2(72) := g_package ||'create_location_preference';
271: Begin
272: hr_utility.set_location(' Entering:' || l_proc,10);
273: --
274: -- Issue a savepoint
275: --
276: savepoint create_location_preference_swi;
351: -- messages of any type exist in the Multiple Message List.
352: -- Also disable Multiple Message Detection.
353: --
354: p_return_status := hr_multi_message.get_return_status_disable;
355: hr_utility.set_location(' Leaving:' || l_proc,20);
356: --
357: exception
358: when hr_multi_message.error_message_exist then
359: --
366: -- Reset IN OUT parameters and set OUT parameters
367: --
368: p_object_version_number := null;
369: p_return_status := hr_multi_message.get_return_status_disable;
370: hr_utility.set_location(' Leaving:' || l_proc, 30);
371: when others then
372: --
373: -- When Multiple Message Detection is enabled catch
374: -- any Application specific or other unexpected
377: -- error.
378: --
379: rollback to create_location_preference_swi;
380: if hr_multi_message.unexpected_error_add(l_proc) then
381: hr_utility.set_location(' Leaving:' || l_proc,40);
382: raise;
383: end if;
384: --
385: -- Reset IN OUT and set OUT parameters
385: -- Reset IN OUT and set OUT parameters
386: --
387: p_object_version_number := null;
388: p_return_status := hr_multi_message.get_return_status_disable;
389: hr_utility.set_location(' Leaving:' || l_proc,50);
390: end create_location_preference;
391: --
392: -- ----------------------------------------------------------------------------
393: -- |-----------------------< delete_vac_rec_area_value >----------------------|
406: --
407: -- Other variables
408: l_proc varchar2(72) := g_package ||'delete_vac_rec_area_value';
409: Begin
410: hr_utility.set_location(' Entering:' || l_proc,10);
411: --
412: -- Issue a savepoint
413: --
414: savepoint delete_vac_rec_area_value_swi;
448: -- messages of any type exist in the Multiple Message List.
449: -- Also disable Multiple Message Detection.
450: --
451: p_return_status := hr_multi_message.get_return_status_disable;
452: hr_utility.set_location(' Leaving:' || l_proc,20);
453: --
454: exception
455: when hr_multi_message.error_message_exist then
456: --
462: --
463: -- Reset IN OUT parameters and set OUT parameters
464: --
465: p_return_status := hr_multi_message.get_return_status_disable;
466: hr_utility.set_location(' Leaving:' || l_proc, 30);
467: when others then
468: --
469: -- When Multiple Message Detection is enabled catch
470: -- any Application specific or other unexpected
473: -- error.
474: --
475: rollback to delete_vac_rec_area_value_swi;
476: if hr_multi_message.unexpected_error_add(l_proc) then
477: hr_utility.set_location(' Leaving:' || l_proc,40);
478: raise;
479: end if;
480: --
481: -- Reset IN OUT and set OUT parameters
480: --
481: -- Reset IN OUT and set OUT parameters
482: --
483: p_return_status := hr_multi_message.get_return_status_disable;
484: hr_utility.set_location(' Leaving:' || l_proc,50);
485: end delete_vac_rec_area_value;
486: --
487: -- ----------------------------------------------------------------------------
488: -- |-----------------------< update_vac_rec_area_value >----------------------|
506: -- Other variables
507: l_proc varchar2(72) := g_package ||'update_vac_rec_area_value';
508: l_object_version_number number;
509: Begin
510: hr_utility.set_location(' Entering:' || l_proc,10);
511: --
512: -- Issue a savepoint
513: --
514: savepoint update_vac_rec_area_value_swi;
552: -- messages of any type exist in the Multiple Message List.
553: -- Also disable Multiple Message Detection.
554: --
555: p_return_status := hr_multi_message.get_return_status_disable;
556: hr_utility.set_location(' Leaving:' || l_proc,20);
557: --
558: exception
559: when hr_multi_message.error_message_exist then
560: --
567: -- Reset IN OUT parameters and set OUT parameters
568: --
569: p_object_version_number := l_object_version_number;
570: p_return_status := hr_multi_message.get_return_status_disable;
571: hr_utility.set_location(' Leaving:' || l_proc, 30);
572: when others then
573: --
574: -- When Multiple Message Detection is enabled catch
575: -- any Application specific or other unexpected
578: -- error.
579: --
580: rollback to update_vac_rec_area_value_swi;
581: if hr_multi_message.unexpected_error_add(l_proc) then
582: hr_utility.set_location(' Leaving:' || l_proc,40);
583: raise;
584: end if;
585: --
586: -- Reset IN OUT and set OUT parameters
586: -- Reset IN OUT and set OUT parameters
587: --
588: p_object_version_number := l_object_version_number;
589: p_return_status := hr_multi_message.get_return_status_disable;
590: hr_utility.set_location(' Leaving:' || l_proc,50);
591: end update_vac_rec_area_value;
592: --
593: -- ----------------------------------------------------------------------------
594: -- |-------------------------< process_vac_rec_area_api >---------------------|
615: l_effective_date date := trunc(sysdate);
616: --
617: BEGIN
618: --
619: hr_utility.set_location(' Entering:' || l_proc,10);
620: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
621: --
622: l_parser := xmlparser.newParser;
623: xmlparser.ParseCLOB(l_parser,p_document);
616: --
617: BEGIN
618: --
619: hr_utility.set_location(' Entering:' || l_proc,10);
620: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
621: --
622: l_parser := xmlparser.newParser;
623: xmlparser.ParseCLOB(l_parser,p_document);
624: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
623: xmlparser.ParseCLOB(l_parser,p_document);
624: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
625: --
626:
627: hr_utility.set_location('Extracting the PostState:' || l_proc,20);
628:
629: l_commitElement := xmldom.makeElement(l_CommitNode);
630: l_postState := xmldom.getAttribute(l_commitElement, 'PS');
631: --
646: end if;
647: --
648:
649: if l_postState = '0' then
650: hr_utility.set_location('updating :' || l_proc,30);
651: -- Call Create Rec Area Value
652: create_vac_rec_area_value(
653: p_validate => p_validate
654: ,p_effective_date => l_effective_date
660: ,p_return_status => l_return_status
661: ) ;
662: --
663: elsif l_postState = '2' then
664: hr_utility.set_location('updating :' || l_proc,32);
665: -- Call Create Rec Area Value
666: update_vac_rec_area_value(
667: p_validate => p_validate
668: ,p_effective_date => l_effective_date
674: ,p_return_status => l_return_status
675: ) ;
676: --
677: elsif l_postState = '3' then
678: hr_utility.set_location('updating :' || l_proc,33);
679: --
680: -- call delete rec area value
681: --
682: delete_vac_rec_area_value(
688: --
689: end if;
690: --
691: p_return_status := l_return_status;
692: hr_utility.set_location('Exiting:' || l_proc,40);
693: --
694: end process_vac_rec_area_api;
695: --
696: -- ----------------------------------------------------------------------------
717: l_effective_date date := trunc(sysdate);
718: --
719: BEGIN
720: --
721: hr_utility.set_location(' Entering:' || l_proc,10);
722: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
723: --
724: l_parser := xmlparser.newParser;
725: xmlparser.ParseCLOB(l_parser,p_document);
718: --
719: BEGIN
720: --
721: hr_utility.set_location(' Entering:' || l_proc,10);
722: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
723: --
724: l_parser := xmlparser.newParser;
725: xmlparser.ParseCLOB(l_parser,p_document);
726: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
725: xmlparser.ParseCLOB(l_parser,p_document);
726: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
727: --
728:
729: hr_utility.set_location('Extracting the PostState:' || l_proc,20);
730:
731: l_commitElement := xmldom.makeElement(l_CommitNode);
732: l_postState := xmldom.getAttribute(l_commitElement, 'PS');
733: --
808: --
809: end if;
810: --
811: p_return_status := l_return_status;
812: hr_utility.set_location('Exiting:' || l_proc,40);
813: --
814: end process_location_pref_api;
815: --
816: end irc_location_preferences_swi;