92: savepoint create_person_deployment_swi;
93: --
94: -- Initialise Multiple Message Detection
95: --
96: hr_multi_message.enable_message_list;
97: --
98: -- Remember IN OUT parameter IN values
99: --
100: --
184: /*
185: NOT IN USE FOR INITIAL RELEASE
186: if l_policy_duration_warning then
187: fnd_message.set_name('EDIT HERE: APP_CODE', 'EDIT_HERE: MESSAGE_NAME ');
188: hr_multi_message.add
189: (p_message_type => hr_multi_message.g_warning_msg
190: );
191: end if; --
192: */
185: NOT IN USE FOR INITIAL RELEASE
186: if l_policy_duration_warning then
187: fnd_message.set_name('EDIT HERE: APP_CODE', 'EDIT_HERE: MESSAGE_NAME ');
188: hr_multi_message.add
189: (p_message_type => hr_multi_message.g_warning_msg
190: );
191: end if; --
192: */
193: -- Convert API non-warning boolean parameter values
196: -- Derive the API return status value based on whether
197: -- messages of any type exist in the Multiple Message List.
198: -- Also disable Multiple Message Detection.
199: --
200: p_return_status := hr_multi_message.get_return_status_disable;
201: hr_utility.set_location(' Leaving:' || l_proc,20);
202: --
203: exception
204: when hr_multi_message.error_message_exist then
200: p_return_status := hr_multi_message.get_return_status_disable;
201: hr_utility.set_location(' Leaving:' || l_proc,20);
202: --
203: exception
204: when hr_multi_message.error_message_exist then
205: --
206: -- Catch the Multiple Message List exception which
207: -- indicates API processing has been aborted because
208: -- at least one message exists in the list.
211: --
212: -- Reset IN OUT parameters and set OUT parameters
213: --
214: p_object_version_number := null;
215: p_return_status := hr_multi_message.get_return_status_disable;
216: hr_utility.set_location(' Leaving:' || l_proc, 30);
217: when others then
218: --
219: -- When Multiple Message Detection is enabled catch
222: -- Multiple Message List. Otherwise re-raise the
223: -- error.
224: --
225: rollback to create_person_deployment_swi;
226: if hr_multi_message.unexpected_error_add(l_proc) then
227: hr_utility.set_location(' Leaving:' || l_proc,40);
228: raise;
229: end if;
230: --
230: --
231: -- Reset IN OUT and set OUT parameters
232: --
233: p_object_version_number := null;
234: p_return_status := hr_multi_message.get_return_status_disable;
235: hr_utility.set_location(' Leaving:' || l_proc,50);
236: end create_person_deployment;
237: -- ----------------------------------------------------------------------------
238: -- |-----------------------< update_person_deployment >-----------------------|
317: savepoint update_person_deployment_swi;
318: --
319: -- Initialise Multiple Message Detection
320: --
321: hr_multi_message.enable_message_list;
322: --
323: -- Remember IN OUT parameter IN values
324: --
325: l_object_version_number := p_object_version_number;
404: /*
405: NOT IN USE FOR INITIAL RELEASE
406: if l_policy_duration_warning then
407: fnd_message.set_name('EDIT HERE: APP_CODE', 'EDIT_HERE: MESSAGE_NAME ');
408: hr_multi_message.add
409: (p_message_type => hr_multi_message.g_warning_msg
410: );
411: end if; --
412: */
405: NOT IN USE FOR INITIAL RELEASE
406: if l_policy_duration_warning then
407: fnd_message.set_name('EDIT HERE: APP_CODE', 'EDIT_HERE: MESSAGE_NAME ');
408: hr_multi_message.add
409: (p_message_type => hr_multi_message.g_warning_msg
410: );
411: end if; --
412: */
413: -- Convert API non-warning boolean parameter values
416: -- Derive the API return status value based on whether
417: -- messages of any type exist in the Multiple Message List.
418: -- Also disable Multiple Message Detection.
419: --
420: p_return_status := hr_multi_message.get_return_status_disable;
421: hr_utility.set_location(' Leaving:' || l_proc,20);
422: --
423: exception
424: when hr_multi_message.error_message_exist then
420: p_return_status := hr_multi_message.get_return_status_disable;
421: hr_utility.set_location(' Leaving:' || l_proc,20);
422: --
423: exception
424: when hr_multi_message.error_message_exist then
425: --
426: -- Catch the Multiple Message List exception which
427: -- indicates API processing has been aborted because
428: -- at least one message exists in the list.
431: --
432: -- Reset IN OUT parameters and set OUT parameters
433: --
434: p_object_version_number := l_object_version_number;
435: p_return_status := hr_multi_message.get_return_status_disable;
436: hr_utility.set_location(' Leaving:' || l_proc, 30);
437: when others then
438: --
439: -- When Multiple Message Detection is enabled catch
442: -- Multiple Message List. Otherwise re-raise the
443: -- error.
444: --
445: rollback to update_person_deployment_swi;
446: if hr_multi_message.unexpected_error_add(l_proc) then
447: hr_utility.set_location(' Leaving:' || l_proc,40);
448: raise;
449: end if;
450: --
450: --
451: -- Reset IN OUT and set OUT parameters
452: --
453: p_object_version_number := l_object_version_number;
454: p_return_status := hr_multi_message.get_return_status_disable;
455: hr_utility.set_location(' Leaving:' || l_proc,50);
456: end update_person_deployment;
457: -- ----------------------------------------------------------------------------
458: -- |-----------------------< delete_person_deployment >-----------------------|
489: savepoint delete_person_deployment_swi;
490: --
491: -- Initialise Multiple Message Detection
492: --
493: hr_multi_message.enable_message_list;
494: --
495: -- Remember IN OUT parameter IN values
496: --
497: --
529: -- Derive the API return status value based on whether
530: -- messages of any type exist in the Multiple Message List.
531: -- Also disable Multiple Message Detection.
532: --
533: p_return_status := hr_multi_message.get_return_status_disable;
534: hr_utility.set_location(' Leaving:' || l_proc,20);
535: --
536: exception
537: when hr_multi_message.error_message_exist then
533: p_return_status := hr_multi_message.get_return_status_disable;
534: hr_utility.set_location(' Leaving:' || l_proc,20);
535: --
536: exception
537: when hr_multi_message.error_message_exist then
538: --
539: -- Catch the Multiple Message List exception which
540: -- indicates API processing has been aborted because
541: -- at least one message exists in the list.
543: rollback to delete_person_deployment_swi;
544: --
545: -- Reset IN OUT parameters and set OUT parameters
546: --
547: p_return_status := hr_multi_message.get_return_status_disable;
548: hr_utility.set_location(' Leaving:' || l_proc, 30);
549: when others then
550: --
551: -- When Multiple Message Detection is enabled catch
554: -- Multiple Message List. Otherwise re-raise the
555: -- error.
556: --
557: rollback to delete_person_deployment_swi;
558: if hr_multi_message.unexpected_error_add(l_proc) then
559: hr_utility.set_location(' Leaving:' || l_proc,40);
560: raise;
561: end if;
562: --
561: end if;
562: --
563: -- Reset IN OUT and set OUT parameters
564: --
565: p_return_status := hr_multi_message.get_return_status_disable;
566: hr_utility.set_location(' Leaving:' || l_proc,50);
567: end delete_person_deployment;
568: -- ----------------------------------------------------------------------------
569: -- |-----------------------< initiate_deployment >----------------------------|
596: savepoint initiate_deployment_swi;
597: --
598: -- Initialise Multiple Message Detection
599: --
600: hr_multi_message.enable_message_list;
601: --
602: -- Remember IN OUT parameter IN values
603: --
604: l_object_version_number := p_object_version_number;
629: -- messages and add them to Multiple Message List
630: --
631: if l_already_applicant_warning then
632: fnd_message.set_name('PER','HR_449649_DPL_NO_INIT_APL');
633: hr_multi_message.add
634: (p_message_type => hr_multi_message.g_warning_msg
635: );
636: end if;
637: --
630: --
631: if l_already_applicant_warning then
632: fnd_message.set_name('PER','HR_449649_DPL_NO_INIT_APL');
633: hr_multi_message.add
634: (p_message_type => hr_multi_message.g_warning_msg
635: );
636: end if;
637: --
638: -- Convert API non-warning boolean parameter values
641: -- Derive the API return status value based on whether
642: -- messages of any type exist in the Multiple Message List.
643: -- Also disable Multiple Message Detection.
644: --
645: p_return_status := hr_multi_message.get_return_status_disable;
646: hr_utility.set_location(' Leaving:' || l_proc,20);
647: --
648: exception
649: when hr_multi_message.error_message_exist then
645: p_return_status := hr_multi_message.get_return_status_disable;
646: hr_utility.set_location(' Leaving:' || l_proc,20);
647: --
648: exception
649: when hr_multi_message.error_message_exist then
650: --
651: -- Catch the Multiple Message List exception which
652: -- indicates API processing has been aborted because
653: -- at least one message exists in the list.
660: p_host_person_id := null;
661: p_host_per_ovn := null;
662: p_host_assignment_id := null;
663: p_host_asg_ovn := null;
664: p_return_status := hr_multi_message.get_return_status_disable;
665: hr_utility.set_location(' Leaving:' || l_proc, 30);
666: when others then
667: --
668: -- When Multiple Message Detection is enabled catch
671: -- Multiple Message List. Otherwise re-raise the
672: -- error.
673: --
674: rollback to initiate_deployment_swi;
675: if hr_multi_message.unexpected_error_add(l_proc) then
676: hr_utility.set_location(' Leaving:' || l_proc,40);
677: raise;
678: end if;
679: --
683: p_host_person_id := null;
684: p_host_per_ovn := null;
685: p_host_assignment_id := null;
686: p_host_asg_ovn := null;
687: p_return_status := hr_multi_message.get_return_status_disable;
688: hr_utility.set_location(' Leaving:' || l_proc,50);
689: end initiate_deployment;
690: -- ----------------------------------------------------------------------------
691: -- |-----------------------< change_deployment_dates >------------------------|
717: savepoint change_deployment_dates_swi;
718: --
719: -- Initialise Multiple Message Detection
720: --
721: hr_multi_message.enable_message_list;
722: --
723: -- Remember IN OUT parameter IN values
724: --
725: l_object_version_number := p_object_version_number;
754: -- Derive the API return status value based on whether
755: -- messages of any type exist in the Multiple Message List.
756: -- Also disable Multiple Message Detection.
757: --
758: p_return_status := hr_multi_message.get_return_status_disable;
759: hr_utility.set_location(' Leaving:' || l_proc,20);
760: --
761: exception
762: when hr_multi_message.error_message_exist then
758: p_return_status := hr_multi_message.get_return_status_disable;
759: hr_utility.set_location(' Leaving:' || l_proc,20);
760: --
761: exception
762: when hr_multi_message.error_message_exist then
763: --
764: -- Catch the Multiple Message List exception which
765: -- indicates API processing has been aborted because
766: -- at least one message exists in the list.
769: --
770: -- Reset IN OUT parameters and set OUT parameters
771: --
772: p_object_version_number := l_object_version_number;
773: p_return_status := hr_multi_message.get_return_status_disable;
774: hr_utility.set_location(' Leaving:' || l_proc, 30);
775: when others then
776: --
777: -- When Multiple Message Detection is enabled catch
780: -- Multiple Message List. Otherwise re-raise the
781: -- error.
782: --
783: rollback to change_deployment_dates_swi;
784: if hr_multi_message.unexpected_error_add(l_proc) then
785: hr_utility.set_location(' Leaving:' || l_proc,40);
786: raise;
787: end if;
788: --
788: --
789: -- Reset IN OUT and set OUT parameters
790: --
791: p_object_version_number := l_object_version_number;
792: p_return_status := hr_multi_message.get_return_status_disable;
793: hr_utility.set_location(' Leaving:' || l_proc,50);
794: end change_deployment_dates;
795: -- ----------------------------------------------------------------------------
796: -- |-----------------------< return_from_deployment >-------------------------|
822: savepoint return_from_deployment_swi;
823: --
824: -- Initialise Multiple Message Detection
825: --
826: hr_multi_message.enable_message_list;
827: --
828: -- Remember IN OUT parameter IN values
829: --
830: l_object_version_number := p_object_version_number;
859: -- Derive the API return status value based on whether
860: -- messages of any type exist in the Multiple Message List.
861: -- Also disable Multiple Message Detection.
862: --
863: p_return_status := hr_multi_message.get_return_status_disable;
864: hr_utility.set_location(' Leaving:' || l_proc,20);
865: --
866: exception
867: when hr_multi_message.error_message_exist then
863: p_return_status := hr_multi_message.get_return_status_disable;
864: hr_utility.set_location(' Leaving:' || l_proc,20);
865: --
866: exception
867: when hr_multi_message.error_message_exist then
868: --
869: -- Catch the Multiple Message List exception which
870: -- indicates API processing has been aborted because
871: -- at least one message exists in the list.
874: --
875: -- Reset IN OUT parameters and set OUT parameters
876: --
877: p_object_version_number := l_object_version_number;
878: p_return_status := hr_multi_message.get_return_status_disable;
879: hr_utility.set_location(' Leaving:' || l_proc, 30);
880: when others then
881: --
882: -- When Multiple Message Detection is enabled catch
885: -- Multiple Message List. Otherwise re-raise the
886: -- error.
887: --
888: rollback to return_from_deployment_swi;
889: if hr_multi_message.unexpected_error_add(l_proc) then
890: hr_utility.set_location(' Leaving:' || l_proc,40);
891: raise;
892: end if;
893: --
893: --
894: -- Reset IN OUT and set OUT parameters
895: --
896: p_object_version_number := l_object_version_number;
897: p_return_status := hr_multi_message.get_return_status_disable;
898: hr_utility.set_location(' Leaving:' || l_proc,50);
899: end return_from_deployment;
900:
901: -- ----------------------------------------------------------------------------
1156: savepoint attachments_person_absence_swi;
1157: --
1158: -- Initialise Multiple Message Detection
1159: --
1160: hr_multi_message.enable_message_list;
1161:
1162: for attached_documents_rec in csr_get_attached_doc loop
1163: OPEN C (attached_documents_rec.attached_document_id);
1164: FETCH C INTO l_rowid;
1174: ,p_rowid=>l_rowid);
1175:
1176: end loop;
1177:
1178: p_return_status := hr_multi_message.get_return_status_disable;
1179:
1180: hr_utility.set_location(' Leaving:' || l_proc,20);
1181: --
1182: exception
1188: -- Multiple Message List. Otherwise re-raise the
1189: -- error.
1190: --
1191: rollback to attachments_person_absence_swi;
1192: if hr_multi_message.unexpected_error_add(l_proc) then
1193: hr_utility.set_location(' Leaving:' || l_proc,40);
1194: raise;
1195: end if;
1196: --
1194: raise;
1195: end if;
1196: --
1197: -- Reset IN OUT and set OUT parameters
1198: p_return_status := hr_multi_message.get_return_status_disable;
1199:
1200: hr_utility.set_location(' Leaving:' || l_proc,50);
1201: end merge_attachments;
1202: