[Home] [Help]
90: l_text varchar2(2000);
91: l_message varchar2(10);
92: --
93: cursor get_seq is
94: select per_wf_events_s.nextval from dual;
95: --
96: l_proc varchar2(72):=' irc_party_be5.create_candidate_internal_a';
97: begin
98: hr_utility.set_location('Entering: '||l_proc,10);
97: begin
98: hr_utility.set_location('Entering: '||l_proc,10);
99: -- check the status of the business event
100: l_event_name:='oracle.apps.per.irc.api.party.create_candidate_internal';
101: l_message:=wf_event.test(l_event_name);
102: --
103: if (l_message='MESSAGE') then
104: hr_utility.set_location(l_proc,20);
105: --
452: if p_effective_start_date is not NULL and
453: p_effective_start_date > trunc(SYSDATE) and
454: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
455: -- raise the event with the event data, with send date set to effective date
456: wf_event.raise(p_event_name=>l_event_name
457: ,p_event_key=>l_event_key
458: ,p_event_data=>l_event_data
459: ,p_send_date => p_effective_start_date);
460: --
459: ,p_send_date => p_effective_start_date);
460: --
461: else
462: -- raise the event with the event data
463: wf_event.raise(p_event_name=>l_event_name
464: ,p_event_key=>l_event_key
465: ,p_event_data=>l_event_data);
466: end if;
467: elsif (l_message='KEY') then
474: p_effective_start_date > trunc(SYSDATE) and
475: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
476: -- this is a key event, so just raise the event
477: -- without the event data, with send date set to effective date
478: wf_event.raise(p_event_name=>l_event_name
479: ,p_event_key=>l_event_key
480: ,p_send_date => p_effective_start_date);
481: --
482: else
481: --
482: else
483: -- this is a key event, so just raise the event
484: -- without the event data
485: wf_event.raise(p_event_name=>l_event_name
486: ,p_event_key=>l_event_key);
487: end if;
488: elsif (l_message='NONE') then
489: hr_utility.set_location(l_proc,40);