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);
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: --
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: --
108: -- get a key for the event
109: --
110: open get_seq;
503: wf_event.raise(p_event_name=>l_event_name
504: ,p_event_key=>l_event_key
505: ,p_event_data=>l_event_data);
506: elsif (l_message='KEY') then
507: hr_utility.set_location(l_proc,30);
508: -- get a key for the event
509: open get_seq;
510: fetch get_seq into l_event_key;
511: close get_seq;
513: -- without the event data
514: wf_event.raise(p_event_name=>l_event_name
515: ,p_event_key=>l_event_key);
516: elsif (l_message='NONE') then
517: hr_utility.set_location(l_proc,40);
518: -- no event is required, so do nothing
519: null;
520: end if;
521: hr_utility.set_location('Leaving: '||l_proc,50);
517: hr_utility.set_location(l_proc,40);
518: -- no event is required, so do nothing
519: null;
520: end if;
521: hr_utility.set_location('Leaving: '||l_proc,50);
522: end terminate_placement_a;
523: end hr_contingent_worker_be4;