89: --
90: -- Other variables
91: l_proc varchar2(72) := g_package ||'create_appraisal';
92: Begin
93: hr_utility.set_location(' Entering:' || l_proc,10);
94: --
95: -- Issue a savepoint
96: --
97: savepoint create_appraisal_swi;
201: -- messages of any type exist in the Multiple Message List.
202: -- Also disable Multiple Message Detection.
203: --
204: p_return_status := hr_multi_message.get_return_status_disable;
205: hr_utility.set_location(' Leaving:' || l_proc,20);
206: --
207: exception
208: when hr_multi_message.error_message_exist then
209: --
216: -- Reset IN OUT parameters and set OUT parameters
217: --
218: p_object_version_number := null;
219: p_return_status := hr_multi_message.get_return_status_disable;
220: hr_utility.set_location(' Leaving:' || l_proc, 30);
221: when others then
222: --
223: -- When Multiple Message Detection is enabled catch
224: -- any Application specific or other unexpected
227: -- error.
228: --
229: rollback to create_appraisal_swi;
230: if hr_multi_message.unexpected_error_add(l_proc) then
231: hr_utility.set_location(' Leaving:' || l_proc,40);
232: raise;
233: end if;
234: --
235: -- Reset IN OUT and set OUT parameters
235: -- Reset IN OUT and set OUT parameters
236: --
237: p_object_version_number := null;
238: p_return_status := hr_multi_message.get_return_status_disable;
239: hr_utility.set_location(' Leaving:' || l_proc,50);
240: end create_appraisal;
241: -- ----------------------------------------------------------------------------
242: -- |---------------------------< delete_appraisal >---------------------------|
243: -- ----------------------------------------------------------------------------
268: where appraisal_id= p_appraisal_id ;
269: --
270:
271: Begin
272: hr_utility.set_location(' Entering:' || l_proc,10);
273: --
274: -- Issue a savepoint
275: --
276: savepoint delete_appraisal_swi;
358:
359: END IF; -- l_del_mode
360:
361:
362: hr_utility.set_location(' Leaving:' || l_proc,20);
363: --
364: exception
365: when hr_multi_message.error_message_exist then
366: --
372: --
373: -- Reset IN OUT parameters and set OUT parameters
374: --
375: p_return_status := hr_multi_message.get_return_status_disable;
376: hr_utility.set_location(' Leaving:' || l_proc, 30);
377: when others then
378: --
379: -- When Multiple Message Detection is enabled catch
380: -- any Application specific or other unexpected
383: -- error.
384: --
385: rollback to delete_appraisal_swi;
386: if hr_multi_message.unexpected_error_add(l_proc) then
387: hr_utility.set_location(' Leaving:' || l_proc,40);
388: raise;
389: end if;
390: --
391: -- Reset IN OUT and set OUT parameters
390: --
391: -- Reset IN OUT and set OUT parameters
392: --
393: p_return_status := hr_multi_message.get_return_status_disable;
394: hr_utility.set_location(' Leaving:' || l_proc,50);
395: end delete_appraisal;
396: -- ----------------------------------------------------------------------------
397: -- |---------------------------< update_appraisal >---------------------------|
398: -- ----------------------------------------------------------------------------
472: --
473: -- Other variables
474: l_proc varchar2(72) := g_package ||'update_appraisal';
475: Begin
476: hr_utility.set_location(' Entering:' || l_proc,10);
477: --
478: -- Issue a savepoint
479: --
480: savepoint update_appraisal_swi;
577: -- messages of any type exist in the Multiple Message List.
578: -- Also disable Multiple Message Detection.
579: --
580: p_return_status := hr_multi_message.get_return_status_disable;
581: hr_utility.set_location(' Leaving:' || l_proc,20);
582: --
583: exception
584: when hr_multi_message.error_message_exist then
585: --
592: -- Reset IN OUT parameters and set OUT parameters
593: --
594: p_object_version_number := l_object_version_number;
595: p_return_status := hr_multi_message.get_return_status_disable;
596: hr_utility.set_location(' Leaving:' || l_proc, 30);
597: when others then
598: --
599: -- When Multiple Message Detection is enabled catch
600: -- any Application specific or other unexpected
603: -- error.
604: --
605: rollback to update_appraisal_swi;
606: if hr_multi_message.unexpected_error_add(l_proc) then
607: hr_utility.set_location(' Leaving:' || l_proc,40);
608: raise;
609: end if;
610: --
611: -- Reset IN OUT and set OUT parameters
611: -- Reset IN OUT and set OUT parameters
612: --
613: p_object_version_number := l_object_version_number;
614: p_return_status := hr_multi_message.get_return_status_disable;
615: hr_utility.set_location(' Leaving:' || l_proc,50);
616: end update_appraisal;
617:
618: -- ----------------------------------------------------------------------------
619: -- |---------------------------< process_api >--------------------------------|
635: l_proc varchar2(72) := g_package || 'process_api';
636:
637: BEGIN
638:
639: hr_utility.set_location(' Entering:' || l_proc,10);
640: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
641:
642: l_parser := xmlparser.newParser;
643: xmlparser.ParseCLOB(l_parser,p_document);
636:
637: BEGIN
638:
639: hr_utility.set_location(' Entering:' || l_proc,10);
640: hr_utility.set_location(' CLOB --> xmldom.DOMNode:' || l_proc,15);
641:
642: l_parser := xmlparser.newParser;
643: xmlparser.ParseCLOB(l_parser,p_document);
644: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
642: l_parser := xmlparser.newParser;
643: xmlparser.ParseCLOB(l_parser,p_document);
644: l_CommitNode := xmldom.makeNode(xmldom.getDocumentElement(xmlparser.getDocument(l_parser)));
645:
646: hr_utility.set_location('Extracting the PostState:' || l_proc,20);
647:
648: l_commitElement := xmldom.makeElement(l_CommitNode);
649: l_postState := xmldom.getAttribute(l_commitElement, 'PS');
650: l_object_version_number := hr_transaction_swi.getNumberValue(l_CommitNode,'ObjectVersionNumber');
804: p_return_status := l_return_status;
805:
806: end if;
807:
808: hr_utility.set_location('Exiting:' || l_proc,40);
809:
810: END process_api;
811: end hr_appraisals_swi;