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: -- ----------------------------------------------------------------------------
630: savepoint terminate_placement_swi;
631: --
632: -- Initialise Multiple Message Detection
633: --
634: hr_multi_message.enable_message_list;
635: --
636: -- Remember IN OUT parameter IN values
637: --
638: l_object_version_number := p_object_version_number;
794: --
795: /*
796: if l_supervisor_warning then
797: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
798: hr_multi_message.add
799: (p_message_type => hr_multi_message.g_warning_msg
800: );
801: end if;
802: if l_event_warning then
795: /*
796: if l_supervisor_warning then
797: fnd_message.set_name('PER', 'HR_289757_CWK_IS_SUPER');
798: hr_multi_message.add
799: (p_message_type => hr_multi_message.g_warning_msg
800: );
801: end if;
802: if l_event_warning then
803: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
800: );
801: end if;
802: if l_event_warning then
803: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
804: hr_multi_message.add
805: (p_message_type => hr_multi_message.g_warning_msg
806: );
807: end if;
808: if l_interview_warning then
801: end if;
802: if l_event_warning then
803: fnd_message.set_name('PER', 'HR_289759_CWK_HAS_EVENTS');
804: hr_multi_message.add
805: (p_message_type => hr_multi_message.g_warning_msg
806: );
807: end if;
808: if l_interview_warning then
809: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
806: );
807: end if;
808: if l_interview_warning then
809: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
810: hr_multi_message.add
811: (p_message_type => hr_multi_message.g_warning_msg
812: );
813: end if;
814: if l_review_warning then
807: end if;
808: if l_interview_warning then
809: fnd_message.set_name('PER', 'HR_289760_CWK_IS_INTERVIEWER');
810: hr_multi_message.add
811: (p_message_type => hr_multi_message.g_warning_msg
812: );
813: end if;
814: if l_review_warning then
815: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
812: );
813: end if;
814: if l_review_warning then
815: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
816: hr_multi_message.add
817: (p_message_type => hr_multi_message.g_warning_msg
818: );
819: end if;
820: if l_recruiter_warning then
813: end if;
814: if l_review_warning then
815: fnd_message.set_name('PER', 'HR_289761_CWK_DUE_REVIEW');
816: hr_multi_message.add
817: (p_message_type => hr_multi_message.g_warning_msg
818: );
819: end if;
820: if l_recruiter_warning then
821: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
818: );
819: end if;
820: if l_recruiter_warning then
821: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
822: hr_multi_message.add
823: (p_message_type => hr_multi_message.g_warning_msg
824: );
825: end if;
826: if l_asg_future_changes_warning then
819: end if;
820: if l_recruiter_warning then
821: fnd_message.set_name('PER', 'HR_289762_CWK_VAC_RECRUITER');
822: hr_multi_message.add
823: (p_message_type => hr_multi_message.g_warning_msg
824: );
825: end if;
826: if l_asg_future_changes_warning then
827: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
824: );
825: end if;
826: if l_asg_future_changes_warning then
827: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
828: hr_multi_message.add
829: (p_message_type => hr_multi_message.g_warning_msg
830: );
831: end if;
832: -- l_pay_proposal_warning Reserved for future Use
825: end if;
826: if l_asg_future_changes_warning then
827: fnd_message.set_name('PER', 'HR_EMP_ASG_FUTURE');
828: hr_multi_message.add
829: (p_message_type => hr_multi_message.g_warning_msg
830: );
831: end if;
832: -- l_pay_proposal_warning Reserved for future Use
833: if l_pay_proposal_warning then
831: end if;
832: -- l_pay_proposal_warning Reserved for future Use
833: if l_pay_proposal_warning then
834: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
835: hr_multi_message.add
836: (p_message_type => hr_multi_message.g_warning_msg
837: );
838: end if;
839:
832: -- l_pay_proposal_warning Reserved for future Use
833: if l_pay_proposal_warning then
834: fnd_message.set_name('PER', 'HR_PAY_PROPOSAL_WARN');
835: hr_multi_message.add
836: (p_message_type => hr_multi_message.g_warning_msg
837: );
838: end if;
839:
840: if l_dod_warning then
838: end if;
839:
840: if l_dod_warning then
841: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
842: hr_multi_message.add
843: (p_message_type => hr_multi_message.g_warning_msg
844: );
845: end if;
846: if l_org_now_no_manager_warning then
839:
840: if l_dod_warning then
841: fnd_message.set_name('PER', 'PER_52475_DEATH_TERM_DATES');
842: hr_multi_message.add
843: (p_message_type => hr_multi_message.g_warning_msg
844: );
845: end if;
846: if l_org_now_no_manager_warning then
847: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
844: );
845: end if;
846: if l_org_now_no_manager_warning then
847: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
848: hr_multi_message.add
849: (p_message_type => hr_multi_message.g_warning_msg
850: );
851: end if;
852: */
845: end if;
846: if l_org_now_no_manager_warning then
847: fnd_message.set_name('PER', 'HR_ORG_NOW_NO_MANAGER_WARN');
848: hr_multi_message.add
849: (p_message_type => hr_multi_message.g_warning_msg
850: );
851: end if;
852: */
853: -- Fix Bug 1370960
852: */
853: -- Fix Bug 1370960
854: if l_addl_rights_warning and p_validate then
855: fnd_message.set_name('PER', 'PER_449140_OPEN_CWK_ADDL_RIGHT');
856: hr_multi_message.add
857: (p_message_type => hr_multi_message.g_warning_msg
858: );
859: end if;
860: --
853: -- Fix Bug 1370960
854: if l_addl_rights_warning and p_validate then
855: fnd_message.set_name('PER', 'PER_449140_OPEN_CWK_ADDL_RIGHT');
856: hr_multi_message.add
857: (p_message_type => hr_multi_message.g_warning_msg
858: );
859: end if;
860: --
861: -- Convert API non-warning boolean parameter values
864: -- Derive the API return status value based on whether
865: -- messages of any type exist in the Multiple Message List.
866: -- Also disable Multiple Message Detection.
867: --
868: p_return_status := hr_multi_message.get_return_status_disable;
869: hr_utility.set_location(' Leaving:' || l_proc,20);
870: --
871: exception
872: when hr_multi_message.error_message_exist then
868: p_return_status := hr_multi_message.get_return_status_disable;
869: hr_utility.set_location(' Leaving:' || l_proc,20);
870: --
871: exception
872: when hr_multi_message.error_message_exist then
873: --
874: -- Catch the Multiple Message List exception which
875: -- indicates API processing has been aborted because
876: -- at least one message exists in the list.
881: --
882: p_object_version_number := l_object_version_number;
883: p_final_process_date := l_final_process_date;
884: p_last_standard_process_date := l_last_standard_process_date;
885: p_return_status := hr_multi_message.get_return_status_disable;
886: hr_utility.set_location(' Leaving:' || l_proc, 30);
887: when others then
888: --
889: -- When Multiple Message Detection is enabled catch
892: -- Multiple Message List. Otherwise re-raise the
893: -- error.
894: --
895: rollback to terminate_placement_swi;
896: if hr_multi_message.unexpected_error_add(l_proc) then
897: hr_utility.set_location(' Leaving:' || l_proc,40);
898: raise;
899: end if;
900: --
902: --
903: p_object_version_number := l_object_version_number;
904: p_final_process_date := l_final_process_date;
905: p_last_standard_process_date := l_last_standard_process_date;
906: p_return_status := hr_multi_message.get_return_status_disable;
907: hr_utility.set_location(' Leaving:' || l_proc,50);
908: end terminate_placement;
909:
910: PROCEDURE process_save
1666: WHEN validate_exception THEN
1667: -- Multi Messaging: Do not raise exception.
1668: -- The Calling Proc in Java will look at this status
1669: -- and retrieve all Messages
1670: p_return_status := hr_multi_message.get_return_status_disable;
1671:
1672: END process_save;
1673:
1674: PROCEDURE getTransactionDetails
2475: END;
2476: -- Quick Termination changes ends here
2477:
2478: if l_return_status = 'E' then
2479: raise hr_multi_message.error_message_exist;
2480: end if;
2481: hr_utility.set_location(' Leaving:' || l_proc, 10);
2482: END;
2483: