49: savepoint actual_term_placement_swi;
50: --
51: -- Initialise Multiple Message Detection
52: --
53: hr_multi_message.enable_message_list;
54: --
55: -- Remember IN OUT parameter IN values
56: --
57: l_object_version_number := p_object_version_number;
93: --
94: /*
95: if l_supervisor_warning then
96: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
97: hr_multi_message.add
98: (p_message_type => hr_multi_message.g_warning_msg
99: );
100: end if;
101: if l_event_warning then
94: /*
95: if l_supervisor_warning then
96: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
97: hr_multi_message.add
98: (p_message_type => hr_multi_message.g_warning_msg
99: );
100: end if;
101: if l_event_warning then
102: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
99: );
100: end if;
101: if l_event_warning then
102: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
103: hr_multi_message.add
104: (p_message_type => hr_multi_message.g_warning_msg
105: );
106: end if;
107: if l_interview_warning then
100: end if;
101: if l_event_warning then
102: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
103: hr_multi_message.add
104: (p_message_type => hr_multi_message.g_warning_msg
105: );
106: end if;
107: if l_interview_warning then
108: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
105: );
106: end if;
107: if l_interview_warning then
108: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
109: hr_multi_message.add
110: (p_message_type => hr_multi_message.g_warning_msg
111: );
112: end if;
113: if l_review_warning then
106: end if;
107: if l_interview_warning then
108: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
109: hr_multi_message.add
110: (p_message_type => hr_multi_message.g_warning_msg
111: );
112: end if;
113: if l_review_warning then
114: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
111: );
112: end if;
113: if l_review_warning then
114: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
115: hr_multi_message.add
116: (p_message_type => hr_multi_message.g_warning_msg
117: );
118: end if;
119: if l_recruiter_warning then
112: end if;
113: if l_review_warning then
114: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
115: hr_multi_message.add
116: (p_message_type => hr_multi_message.g_warning_msg
117: );
118: end if;
119: if l_recruiter_warning then
120: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
117: );
118: end if;
119: if l_recruiter_warning then
120: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
121: hr_multi_message.add
122: (p_message_type => hr_multi_message.g_warning_msg
123: );
124: end if;
125: if l_asg_future_changes_warning then
118: end if;
119: if l_recruiter_warning then
120: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
121: hr_multi_message.add
122: (p_message_type => hr_multi_message.g_warning_msg
123: );
124: end if;
125: if l_asg_future_changes_warning then
126: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
123: );
124: end if;
125: if l_asg_future_changes_warning then
126: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
127: hr_multi_message.add
128: (p_message_type => hr_multi_message.g_warning_msg
129: );
130: end if;
131: -- l_pay_proposal_warning Reserved for future Use
124: end if;
125: if l_asg_future_changes_warning then
126: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
127: hr_multi_message.add
128: (p_message_type => hr_multi_message.g_warning_msg
129: );
130: end if;
131: -- l_pay_proposal_warning Reserved for future Use
132: if l_pay_proposal_warning then
130: end if;
131: -- l_pay_proposal_warning Reserved for future Use
132: if l_pay_proposal_warning then
133: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
134: hr_multi_message.add
135: (p_message_type => hr_multi_message.g_warning_msg
136: );
137: end if;
138: if l_dod_warning then
131: -- l_pay_proposal_warning Reserved for future Use
132: if l_pay_proposal_warning then
133: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
134: hr_multi_message.add
135: (p_message_type => hr_multi_message.g_warning_msg
136: );
137: end if;
138: if l_dod_warning then
139: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
136: );
137: end if;
138: if l_dod_warning then
139: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
140: hr_multi_message.add
141: (p_message_type => hr_multi_message.g_warning_msg
142: );
143: end if;
144: */
137: end if;
138: if l_dod_warning then
139: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
140: hr_multi_message.add
141: (p_message_type => hr_multi_message.g_warning_msg
142: );
143: end if;
144: */
145: --
149: -- Derive the API return status value based on whether
150: -- messages of any type exist in the Multiple Message List.
151: -- Also disable Multiple Message Detection.
152: --
153: p_return_status := hr_multi_message.get_return_status_disable;
154: hr_utility.set_location(' Leaving:' || l_proc,20);
155: --
156: exception
157: when hr_multi_message.error_message_exist then
153: p_return_status := hr_multi_message.get_return_status_disable;
154: hr_utility.set_location(' Leaving:' || l_proc,20);
155: --
156: exception
157: when hr_multi_message.error_message_exist then
158: --
159: -- Catch the Multiple Message List exception which
160: -- indicates API processing has been aborted because
161: -- at least one message exists in the list.
165: -- Reset IN OUT parameters and set OUT parameters
166: --
167: p_object_version_number := l_object_version_number;
168: p_last_standard_process_date := l_last_standard_process_date;
169: p_return_status := hr_multi_message.get_return_status_disable;
170: hr_utility.set_location(' Leaving:' || l_proc, 30);
171: when others then
172: --
173: -- When Multiple Message Detection is enabled catch
176: -- Multiple Message List. Otherwise re-raise the
177: -- error.
178: --
179: rollback to actual_term_placement_swi;
180: if hr_multi_message.unexpected_error_add(l_proc) then
181: hr_utility.set_location(' Leaving:' || l_proc,40);
182: raise;
183: end if;
184: --
185: -- Reset IN OUT and set OUT parameters
186: --
187: p_object_version_number := l_object_version_number;
188: p_last_standard_process_date := l_last_standard_process_date;
189: p_return_status := hr_multi_message.get_return_status_disable;
190: hr_utility.set_location(' Leaving:' || l_proc,50);
191: end actual_termination_placement;
192: -- ----------------------------------------------------------------------------
193: -- |------------------------< final_process_placement >-----------------------|
221: savepoint final_process_placement_swi;
222: --
223: -- Initialise Multiple Message Detection
224: --
225: hr_multi_message.enable_message_list;
226: --
227: -- Remember IN OUT parameter IN values
228: --
229: l_object_version_number := p_object_version_number;
254: --
255: /*
256: if l_org_now_no_manager_warning then
257: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
258: hr_multi_message.add
259: (p_message_type => hr_multi_message.g_warning_msg
260: );
261: end if;
262: if l_asg_future_changes_warning then
255: /*
256: if l_org_now_no_manager_warning then
257: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
258: hr_multi_message.add
259: (p_message_type => hr_multi_message.g_warning_msg
260: );
261: end if;
262: if l_asg_future_changes_warning then
263: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
260: );
261: end if;
262: if l_asg_future_changes_warning then
263: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
264: hr_multi_message.add
265: (p_message_type => hr_multi_message.g_warning_msg
266: );
267: end if;
268: */
261: end if;
262: if l_asg_future_changes_warning then
263: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
264: hr_multi_message.add
265: (p_message_type => hr_multi_message.g_warning_msg
266: );
267: end if;
268: */
269: --
273: -- Derive the API return status value based on whether
274: -- messages of any type exist in the Multiple Message List.
275: -- Also disable Multiple Message Detection.
276: --
277: p_return_status := hr_multi_message.get_return_status_disable;
278: hr_utility.set_location(' Leaving:' || l_proc,20);
279: --
280: exception
281: when hr_multi_message.error_message_exist then
277: p_return_status := hr_multi_message.get_return_status_disable;
278: hr_utility.set_location(' Leaving:' || l_proc,20);
279: --
280: exception
281: when hr_multi_message.error_message_exist then
282: --
283: -- Catch the Multiple Message List exception which
284: -- indicates API processing has been aborted because
285: -- at least one message exists in the list.
289: -- Reset IN OUT parameters and set OUT parameters
290: --
291: p_object_version_number := l_object_version_number;
292: p_final_process_date := l_final_process_date;
293: p_return_status := hr_multi_message.get_return_status_disable;
294: hr_utility.set_location(' Leaving:' || l_proc, 30);
295: when others then
296: --
297: -- When Multiple Message Detection is enabled catch
300: -- Multiple Message List. Otherwise re-raise the
301: -- error.
302: --
303: rollback to final_process_placement_swi;
304: if hr_multi_message.unexpected_error_add(l_proc) then
305: hr_utility.set_location(' Leaving:' || l_proc,40);
306: raise;
307: end if;
308: --
309: -- Reset IN OUT and set OUT parameters
310: --
311: p_object_version_number := l_object_version_number;
312: p_final_process_date := l_final_process_date;
313: p_return_status := hr_multi_message.get_return_status_disable;
314: hr_utility.set_location(' Leaving:' || l_proc,50);
315: end final_process_placement;
316: -- ----------------------------------------------------------------------------
317: -- |------------------------< get_length_of_placement >-----------------------|
340: savepoint get_length_of_placement_swi;
341: --
342: -- Initialise Multiple Message Detection
343: --
344: hr_multi_message.enable_message_list;
345: --
346: -- Remember IN OUT parameter IN values
347: --
348: --
373: -- Derive the API return status value based on whether
374: -- messages of any type exist in the Multiple Message List.
375: -- Also disable Multiple Message Detection.
376: --
377: p_return_status := hr_multi_message.get_return_status_disable;
378: hr_utility.set_location(' Leaving:' || l_proc,20);
379: --
380: exception
381: when hr_multi_message.error_message_exist then
377: p_return_status := hr_multi_message.get_return_status_disable;
378: hr_utility.set_location(' Leaving:' || l_proc,20);
379: --
380: exception
381: when hr_multi_message.error_message_exist then
382: --
383: -- Catch the Multiple Message List exception which
384: -- indicates API processing has been aborted because
385: -- at least one message exists in the list.
389: -- Reset IN OUT parameters and set OUT parameters
390: --
391: p_total_years := null;
392: p_total_months := null;
393: p_return_status := hr_multi_message.get_return_status_disable;
394: hr_utility.set_location(' Leaving:' || l_proc, 30);
395: when others then
396: --
397: -- When Multiple Message Detection is enabled catch
400: -- Multiple Message List. Otherwise re-raise the
401: -- error.
402: --
403: rollback to get_length_of_placement_swi;
404: if hr_multi_message.unexpected_error_add(l_proc) then
405: hr_utility.set_location(' Leaving:' || l_proc,40);
406: raise;
407: end if;
408: --
409: -- Reset IN OUT and set OUT parameters
410: --
411: p_total_years := null;
412: p_total_months := null;
413: p_return_status := hr_multi_message.get_return_status_disable;
414: hr_utility.set_location(' Leaving:' || l_proc,50);
415: end get_length_of_placement;
416: -- ----------------------------------------------------------------------------
417: -- |----------------------< reverse_terminate_placement >---------------------|
440: savepoint reverse_term_placement_swi;
441: --
442: -- Initialise Multiple Message Detection
443: --
444: hr_multi_message.enable_message_list;
445: --
446: -- Remember IN OUT parameter IN values
447: --
448: --
468: --
469: -- l_fut_actns_exist_warning Reserved for Future Use
470: /* if l_fut_actns_exist_warning then
471: fnd_message.set_name('PER', 'EDIT_HERE: MESSAGE_NAME ');
472: hr_multi_message.add
473: (p_message_type => hr_multi_message.g_warning_msg
474: );
475: end if;
476: */
469: -- l_fut_actns_exist_warning Reserved for Future Use
470: /* if l_fut_actns_exist_warning then
471: fnd_message.set_name('PER', 'EDIT_HERE: MESSAGE_NAME ');
472: hr_multi_message.add
473: (p_message_type => hr_multi_message.g_warning_msg
474: );
475: end if;
476: */
477:
481: -- Derive the API return status value based on whether
482: -- messages of any type exist in the Multiple Message List.
483: -- Also disable Multiple Message Detection.
484: --
485: p_return_status := hr_multi_message.get_return_status_disable;
486: hr_utility.set_location(' Leaving:' || l_proc,20);
487: --
488: exception
489: when hr_multi_message.error_message_exist then
485: p_return_status := hr_multi_message.get_return_status_disable;
486: hr_utility.set_location(' Leaving:' || l_proc,20);
487: --
488: exception
489: when hr_multi_message.error_message_exist then
490: --
491: -- Catch the Multiple Message List exception which
492: -- indicates API processing has been aborted because
493: -- at least one message exists in the list.
495: rollback to reverse_term_placement_swi;
496: --
497: -- Reset IN OUT parameters and set OUT parameters
498: --
499: p_return_status := hr_multi_message.get_return_status_disable;
500: hr_utility.set_location(' Leaving:' || l_proc, 30);
501: when others then
502: --
503: -- When Multiple Message Detection is enabled catch
506: -- Multiple Message List. Otherwise re-raise the
507: -- error.
508: --
509: rollback to reverse_term_placement_swi;
510: if hr_multi_message.unexpected_error_add(l_proc) then
511: hr_utility.set_location(' Leaving:' || l_proc,40);
512: raise;
513: end if;
514: --
513: end if;
514: --
515: -- Reset IN OUT and set OUT parameters
516: --
517: p_return_status := hr_multi_message.get_return_status_disable;
518: hr_utility.set_location(' Leaving:' || l_proc,50);
519: end reverse_terminate_placement;
520: -- ----------------------------------------------------------------------------
521: -- |--------------------------< terminate_placement >-------------------------|
629: savepoint terminate_placement_swi;
630: --
631: -- Initialise Multiple Message Detection
632: --
633: hr_multi_message.enable_message_list;
634: --
635: -- Remember IN OUT parameter IN values
636: --
637: l_object_version_number := p_object_version_number;
797: --
798: /*
799: if l_supervisor_warning then
800: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
801: hr_multi_message.add
802: (p_message_type => hr_multi_message.g_warning_msg
803: );
804: end if;
805: if l_event_warning then
798: /*
799: if l_supervisor_warning then
800: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
801: hr_multi_message.add
802: (p_message_type => hr_multi_message.g_warning_msg
803: );
804: end if;
805: if l_event_warning then
806: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
803: );
804: end if;
805: if l_event_warning then
806: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
807: hr_multi_message.add
808: (p_message_type => hr_multi_message.g_warning_msg
809: );
810: end if;
811: if l_interview_warning then
804: end if;
805: if l_event_warning then
806: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
807: hr_multi_message.add
808: (p_message_type => hr_multi_message.g_warning_msg
809: );
810: end if;
811: if l_interview_warning then
812: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
809: );
810: end if;
811: if l_interview_warning then
812: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
813: hr_multi_message.add
814: (p_message_type => hr_multi_message.g_warning_msg
815: );
816: end if;
817: if l_review_warning then
810: end if;
811: if l_interview_warning then
812: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
813: hr_multi_message.add
814: (p_message_type => hr_multi_message.g_warning_msg
815: );
816: end if;
817: if l_review_warning then
818: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
815: );
816: end if;
817: if l_review_warning then
818: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
819: hr_multi_message.add
820: (p_message_type => hr_multi_message.g_warning_msg
821: );
822: end if;
823: if l_recruiter_warning then
816: end if;
817: if l_review_warning then
818: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
819: hr_multi_message.add
820: (p_message_type => hr_multi_message.g_warning_msg
821: );
822: end if;
823: if l_recruiter_warning then
824: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
821: );
822: end if;
823: if l_recruiter_warning then
824: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
825: hr_multi_message.add
826: (p_message_type => hr_multi_message.g_warning_msg
827: );
828: end if;
829: if l_asg_future_changes_warning then
822: end if;
823: if l_recruiter_warning then
824: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
825: hr_multi_message.add
826: (p_message_type => hr_multi_message.g_warning_msg
827: );
828: end if;
829: if l_asg_future_changes_warning then
830: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
827: );
828: end if;
829: if l_asg_future_changes_warning then
830: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
831: hr_multi_message.add
832: (p_message_type => hr_multi_message.g_warning_msg
833: );
834: end if;
835: -- l_pay_proposal_warning Reserved for future Use
828: end if;
829: if l_asg_future_changes_warning then
830: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
831: hr_multi_message.add
832: (p_message_type => hr_multi_message.g_warning_msg
833: );
834: end if;
835: -- l_pay_proposal_warning Reserved for future Use
836: if l_pay_proposal_warning then
834: end if;
835: -- l_pay_proposal_warning Reserved for future Use
836: if l_pay_proposal_warning then
837: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
838: hr_multi_message.add
839: (p_message_type => hr_multi_message.g_warning_msg
840: );
841: end if;
842:
835: -- l_pay_proposal_warning Reserved for future Use
836: if l_pay_proposal_warning then
837: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
838: hr_multi_message.add
839: (p_message_type => hr_multi_message.g_warning_msg
840: );
841: end if;
842:
843: if l_dod_warning then
841: end if;
842:
843: if l_dod_warning then
844: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
845: hr_multi_message.add
846: (p_message_type => hr_multi_message.g_warning_msg
847: );
848: end if;
849: if l_org_now_no_manager_warning then
842:
843: if l_dod_warning then
844: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
845: hr_multi_message.add
846: (p_message_type => hr_multi_message.g_warning_msg
847: );
848: end if;
849: if l_org_now_no_manager_warning then
850: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
847: );
848: end if;
849: if l_org_now_no_manager_warning then
850: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
851: hr_multi_message.add
852: (p_message_type => hr_multi_message.g_warning_msg
853: );
854: end if;
855: */
848: end if;
849: if l_org_now_no_manager_warning then
850: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
851: hr_multi_message.add
852: (p_message_type => hr_multi_message.g_warning_msg
853: );
854: end if;
855: */
856: -- Fix Bug 1370960
855: */
856: -- Fix Bug 1370960
857: if l_addl_rights_warning and p_validate then
858: fnd_message.set_name('PER', 'PER_449140_OPEN_CWK_ADDL_RIGHT');
859: hr_multi_message.add
860: (p_message_type => hr_multi_message.g_warning_msg
861: );
862: end if;
863: --
856: -- Fix Bug 1370960
857: if l_addl_rights_warning and p_validate then
858: fnd_message.set_name('PER', 'PER_449140_OPEN_CWK_ADDL_RIGHT');
859: hr_multi_message.add
860: (p_message_type => hr_multi_message.g_warning_msg
861: );
862: end if;
863: --
864: -- Convert API non-warning boolean parameter values
867: -- Derive the API return status value based on whether
868: -- messages of any type exist in the Multiple Message List.
869: -- Also disable Multiple Message Detection.
870: --
871: p_return_status := hr_multi_message.get_return_status_disable;
872: hr_utility.set_location(' Leaving:' || l_proc,20);
873: --
874: exception
875: when hr_multi_message.error_message_exist then
871: p_return_status := hr_multi_message.get_return_status_disable;
872: hr_utility.set_location(' Leaving:' || l_proc,20);
873: --
874: exception
875: when hr_multi_message.error_message_exist then
876: --
877: -- Catch the Multiple Message List exception which
878: -- indicates API processing has been aborted because
879: -- at least one message exists in the list.
884: --
885: p_object_version_number := l_object_version_number;
886: p_final_process_date := l_final_process_date;
887: p_last_standard_process_date := l_last_standard_process_date;
888: p_return_status := hr_multi_message.get_return_status_disable;
889: hr_utility.set_location(' Leaving:' || l_proc, 30);
890: when others then
891: --
892: -- When Multiple Message Detection is enabled catch
895: -- Multiple Message List. Otherwise re-raise the
896: -- error.
897: --
898: rollback to terminate_placement_swi;
899: if hr_multi_message.unexpected_error_add(l_proc) then
900: hr_utility.set_location(' Leaving:' || l_proc,40);
901: raise;
902: end if;
903: --
905: --
906: p_object_version_number := l_object_version_number;
907: p_final_process_date := l_final_process_date;
908: p_last_standard_process_date := l_last_standard_process_date;
909: p_return_status := hr_multi_message.get_return_status_disable;
910: hr_utility.set_location(' Leaving:' || l_proc,50);
911: end terminate_placement;
912:
913: PROCEDURE process_save
1599: WHEN validate_exception THEN
1600: -- Multi Messaging: Do not raise exception.
1601: -- The Calling Proc in Java will look at this status
1602: -- and retrieve all Messages
1603: p_return_status := hr_multi_message.get_return_status_disable;
1604:
1605: END process_save;
1606:
1607: PROCEDURE getTransactionDetails
2319: ,p_return_status => l_return_status
2320: );
2321:
2322: if l_return_status = 'E' then
2323: raise hr_multi_message.error_message_exist;
2324: end if;
2325: hr_utility.set_location(' Leaving:' || l_proc, 10);
2326: END;
2327: