[Home] [Help]
95: l_text varchar2(2000);
96: l_message varchar2(10);
97: --
98: cursor get_seq is
99: select per_wf_events_s.nextval from dual;
100: --
101: l_proc varchar2(72):=' irc_party_be5.create_candidate_internal_a';
102: begin
103: hr_utility.set_location('Entering: '||l_proc,10);
102: begin
103: hr_utility.set_location('Entering: '||l_proc,10);
104: -- check the status of the business event
105: l_event_name:='oracle.apps.per.irc.api.party.create_candidate_internal';
106: l_message:=wf_event.test(l_event_name);
107: --
108: if (l_message='MESSAGE') then
109: hr_utility.set_location(l_proc,20);
110: --
477: if p_effective_start_date is not NULL and
478: p_effective_start_date > trunc(SYSDATE) and
479: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
480: -- raise the event with the event data, with send date set to effective date
481: wf_event.raise(p_event_name=>l_event_name
482: ,p_event_key=>l_event_key
483: ,p_event_data=>l_event_data
484: ,p_send_date => p_effective_start_date);
485: --
484: ,p_send_date => p_effective_start_date);
485: --
486: else
487: -- raise the event with the event data
488: wf_event.raise(p_event_name=>l_event_name
489: ,p_event_key=>l_event_key
490: ,p_event_data=>l_event_data);
491: end if;
492: elsif (l_message='KEY') then
499: p_effective_start_date > trunc(SYSDATE) and
500: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
501: -- this is a key event, so just raise the event
502: -- without the event data, with send date set to effective date
503: wf_event.raise(p_event_name=>l_event_name
504: ,p_event_key=>l_event_key
505: ,p_send_date => p_effective_start_date);
506: --
507: else
506: --
507: else
508: -- this is a key event, so just raise the event
509: -- without the event data
510: wf_event.raise(p_event_name=>l_event_name
511: ,p_event_key=>l_event_key);
512: end if;
513: elsif (l_message='NONE') then
514: hr_utility.set_location(l_proc,40);