[Home] [Help]
92: l_text varchar2(2000);
93: l_message varchar2(10);
94: --
95: cursor get_seq is
96: select per_wf_events_s.nextval from dual;
97: --
98: l_proc varchar2(72):=' hr_contingent_worker_be4.terminate_placement_a';
99: begin
100: hr_utility.set_location('Entering: '||l_proc,10);
99: begin
100: hr_utility.set_location('Entering: '||l_proc,10);
101: -- check the status of the business event
102: l_event_name:='oracle.apps.per.api.contingent_worker.terminate_placement';
103: l_message:=wf_event.test(l_event_name);
104: --
105: if (l_message='MESSAGE') then
106: hr_utility.set_location(l_proc,20);
107: --
502: if p_actual_termination_date is not NULL and
503: p_actual_termination_date > trunc(SYSDATE) and
504: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
505: -- raise the event with the event data, with send date set to effective date
506: wf_event.raise(p_event_name=>l_event_name
507: ,p_event_key=>l_event_key
508: ,p_event_data=>l_event_data
509: ,p_send_date => p_actual_termination_date);
510: --
509: ,p_send_date => p_actual_termination_date);
510: --
511: else
512: -- raise the event with the event data
513: wf_event.raise(p_event_name=>l_event_name
514: ,p_event_key=>l_event_key
515: ,p_event_data=>l_event_data);
516: end if;
517: elsif (l_message='KEY') then
524: p_actual_termination_date > trunc(SYSDATE) and
525: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
526: -- this is a key event, so just raise the event
527: -- without the event data, with send date set to effective date
528: wf_event.raise(p_event_name=>l_event_name
529: ,p_event_key=>l_event_key
530: ,p_send_date => p_actual_termination_date);
531: --
532: else
531: --
532: else
533: -- this is a key event, so just raise the event
534: -- without the event data
535: wf_event.raise(p_event_name=>l_event_name
536: ,p_event_key=>l_event_key);
537: end if;
538: elsif (l_message='NONE') then
539: hr_utility.set_location(l_proc,40);