191: savepoint create_position_swi;
192: --
193: -- Initialise Multiple Message Detection
194: --
195: hr_multi_message.enable_message_list;
196: --
197: -- Remember IN OUT parameter IN values
198: --
199: --
385: -- Derive the API return status value based on whether
386: -- messages of any type exist in the Multiple Message List.
387: -- Also disable Multiple Message Detection.
388: --
389: p_return_status := hr_multi_message.get_return_status_disable;
390: hr_utility.set_location(' Leaving:' || l_proc,20);
391: --
392: exception
393: when hr_multi_message.error_message_exist then
389: p_return_status := hr_multi_message.get_return_status_disable;
390: hr_utility.set_location(' Leaving:' || l_proc,20);
391: --
392: exception
393: when hr_multi_message.error_message_exist then
394: --
395: -- Catch the Multiple Message List exception which
396: -- indicates API processing has been aborted because
397: -- at least one message exists in the list.
405: p_effective_end_date := null;
406: p_position_definition_id := null;
407: p_name := null;
408: p_object_version_number := null;
409: p_return_status := hr_multi_message.get_return_status_disable;
410: hr_utility.set_location(' Leaving:' || l_proc, 30);
411: when others then
412: --
413: -- When Multiple Message Detection is enabled catch
416: -- Multiple Message List. Otherwise re-raise the
417: -- error.
418: --
419: rollback to create_position_swi;
420: if hr_multi_message.unexpected_error_add(l_proc) then
421: hr_utility.set_location(' Leaving:' || l_proc,40);
422: raise;
423: end if;
424: --
429: p_effective_end_date := null;
430: p_position_definition_id := null;
431: p_name := null;
432: p_object_version_number := null;
433: p_return_status := hr_multi_message.get_return_status_disable;
434: hr_utility.set_location(' Leaving:' || l_proc,50);
435: end create_position;
436: -- ----------------------------------------------------------------------------
437: -- |----------------------------< delete_position >---------------------------|
464: savepoint delete_position_swi;
465: --
466: -- Initialise Multiple Message Detection
467: --
468: hr_multi_message.enable_message_list;
469: --
470: -- Remember IN OUT parameter IN values
471: --
472: l_object_version_number := p_object_version_number;
503: -- Derive the API return status value based on whether
504: -- messages of any type exist in the Multiple Message List.
505: -- Also disable Multiple Message Detection.
506: --
507: p_return_status := hr_multi_message.get_return_status_disable;
508: hr_utility.set_location(' Leaving:' || l_proc,20);
509: --
510: exception
511: when hr_multi_message.error_message_exist then
507: p_return_status := hr_multi_message.get_return_status_disable;
508: hr_utility.set_location(' Leaving:' || l_proc,20);
509: --
510: exception
511: when hr_multi_message.error_message_exist then
512: --
513: -- Catch the Multiple Message List exception which
514: -- indicates API processing has been aborted because
515: -- at least one message exists in the list.
520: --
521: p_effective_start_date := null;
522: p_effective_end_date := null;
523: p_object_version_number := l_object_version_number;
524: p_return_status := hr_multi_message.get_return_status_disable;
525: hr_utility.set_location(' Leaving:' || l_proc, 30);
526: when others then
527: --
528: -- When Multiple Message Detection is enabled catch
531: -- Multiple Message List. Otherwise re-raise the
532: -- error.
533: --
534: rollback to delete_position_swi;
535: if hr_multi_message.unexpected_error_add(l_proc) then
536: hr_utility.set_location(' Leaving:' || l_proc,40);
537: raise;
538: end if;
539: --
541: --
542: p_effective_start_date := null;
543: p_effective_end_date := null;
544: p_object_version_number := l_object_version_number;
545: p_return_status := hr_multi_message.get_return_status_disable;
546: hr_utility.set_location(' Leaving:' || l_proc,50);
547: end delete_position;
548: -- ----------------------------------------------------------------------------
549: -- |----------------------------------< lck >---------------------------------|
572: savepoint lck_swi;
573: --
574: -- Initialise Multiple Message Detection
575: --
576: hr_multi_message.enable_message_list;
577: --
578: -- Remember IN OUT parameter IN values
579: --
580: --
605: -- Derive the API return status value based on whether
606: -- messages of any type exist in the Multiple Message List.
607: -- Also disable Multiple Message Detection.
608: --
609: p_return_status := hr_multi_message.get_return_status_disable;
610: hr_utility.set_location(' Leaving:' || l_proc,20);
611: --
612: exception
613: when hr_multi_message.error_message_exist then
609: p_return_status := hr_multi_message.get_return_status_disable;
610: hr_utility.set_location(' Leaving:' || l_proc,20);
611: --
612: exception
613: when hr_multi_message.error_message_exist then
614: --
615: -- Catch the Multiple Message List exception which
616: -- indicates API processing has been aborted because
617: -- at least one message exists in the list.
621: -- Reset IN OUT parameters and set OUT parameters
622: --
623: p_validation_start_date := null;
624: p_validation_end_date := null;
625: p_return_status := hr_multi_message.get_return_status_disable;
626: hr_utility.set_location(' Leaving:' || l_proc, 30);
627: when others then
628: --
629: -- When Multiple Message Detection is enabled catch
632: -- Multiple Message List. Otherwise re-raise the
633: -- error.
634: --
635: rollback to lck_swi;
636: if hr_multi_message.unexpected_error_add(l_proc) then
637: hr_utility.set_location(' Leaving:' || l_proc,40);
638: raise;
639: end if;
640: --
641: -- Reset IN OUT and set OUT parameters
642: --
643: p_validation_start_date := null;
644: p_validation_end_date := null;
645: p_return_status := hr_multi_message.get_return_status_disable;
646: hr_utility.set_location(' Leaving:' || l_proc,50);
647: end lck;
648: -- ----------------------------------------------------------------------------
649: -- |----------------------------< update_position >---------------------------|
830: savepoint update_position_swi;
831: --
832: -- Initialise Multiple Message Detection
833: --
834: hr_multi_message.enable_message_list;
835: --
836: -- Remember IN OUT parameter IN values
837: --
838: l_object_version_number := p_object_version_number;
1017: -- messages and add them to Multiple Message List
1018: --
1019: if l_valid_grades_changed_warning then
1020: fnd_message.set_name('PER', 'HR_51095_VGR_POS_GRD_COMBO');
1021: hr_multi_message.add
1022: (p_message_type => hr_multi_message.g_warning_msg
1023: );
1024: end if; --
1025: -- Convert API non-warning boolean parameter values
1018: --
1019: if l_valid_grades_changed_warning then
1020: fnd_message.set_name('PER', 'HR_51095_VGR_POS_GRD_COMBO');
1021: hr_multi_message.add
1022: (p_message_type => hr_multi_message.g_warning_msg
1023: );
1024: end if; --
1025: -- Convert API non-warning boolean parameter values
1026: --
1028: -- Derive the API return status value based on whether
1029: -- messages of any type exist in the Multiple Message List.
1030: -- Also disable Multiple Message Detection.
1031: --
1032: p_return_status := hr_multi_message.get_return_status_disable;
1033: hr_utility.set_location(' Leaving:' || l_proc,20);
1034: --
1035: exception
1036: when hr_multi_message.error_message_exist then
1032: p_return_status := hr_multi_message.get_return_status_disable;
1033: hr_utility.set_location(' Leaving:' || l_proc,20);
1034: --
1035: exception
1036: when hr_multi_message.error_message_exist then
1037: --
1038: -- Catch the Multiple Message List exception which
1039: -- indicates API processing has been aborted because
1040: -- at least one message exists in the list.
1047: p_effective_end_date := null;
1048: p_position_definition_id := null;
1049: p_name := null;
1050: p_object_version_number := l_object_version_number;
1051: p_return_status := hr_multi_message.get_return_status_disable;
1052: hr_utility.set_location(' Leaving:' || l_proc, 30);
1053: when others then
1054: --
1055: -- When Multiple Message Detection is enabled catch
1058: -- Multiple Message List. Otherwise re-raise the
1059: -- error.
1060: --
1061: rollback to update_position_swi;
1062: if hr_multi_message.unexpected_error_add(l_proc) then
1063: hr_utility.set_location(' Leaving:' || l_proc,40);
1064: raise;
1065: end if;
1066: --
1070: p_effective_end_date := null;
1071: p_position_definition_id := null;
1072: p_name := null;
1073: p_object_version_number := l_object_version_number;
1074: p_return_status := hr_multi_message.get_return_status_disable;
1075: hr_utility.set_location(' Leaving:' || l_proc,50);
1076: end update_position;
1077: end hr_position_swi;