[Home] [Help]
21: l_text varchar2(2000);
22: l_message varchar2(10);
23: --
24: cursor get_seq is
25: select per_wf_events_s.nextval from dual;
26: --
27: l_proc varchar2(72):=' hr_applicant_be2. hire_applicant_a';
28: begin
29: hr_utility.set_location('Entering: '||l_proc,10);
28: begin
29: hr_utility.set_location('Entering: '||l_proc,10);
30: -- check the status of the business event
31: l_event_name:='oracle.apps.per.api.applicant. hire_applicant';
32: l_message:=wf_event.test(l_event_name);
33: --
34: if (l_message='MESSAGE') then
35: hr_utility.set_location(l_proc,20);
36: --
115: if p_per_effective_start_date is not NULL and
116: p_per_effective_start_date > trunc(SYSDATE) and
117: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
118: -- raise the event with the event data, with send date set to effective date
119: wf_event.raise(p_event_name=>l_event_name
120: ,p_event_key=>l_event_key
121: ,p_event_data=>l_event_data
122: ,p_send_date => p_per_effective_start_date);
123: --
122: ,p_send_date => p_per_effective_start_date);
123: --
124: else
125: -- raise the event with the event data
126: wf_event.raise(p_event_name=>l_event_name
127: ,p_event_key=>l_event_key
128: ,p_event_data=>l_event_data);
129: end if;
130: elsif (l_message='KEY') then
137: p_per_effective_start_date > trunc(SYSDATE) and
138: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
139: -- this is a key event, so just raise the event
140: -- without the event data, with send date set to effective date
141: wf_event.raise(p_event_name=>l_event_name
142: ,p_event_key=>l_event_key
143: ,p_send_date => p_per_effective_start_date);
144: --
145: else
144: --
145: else
146: -- this is a key event, so just raise the event
147: -- without the event data
148: wf_event.raise(p_event_name=>l_event_name
149: ,p_event_key=>l_event_key);
150: end if;
151: elsif (l_message='NONE') then
152: hr_utility.set_location(l_proc,40);