[Home] [Help]
16: l_text varchar2(2000);
17: l_message varchar2(10);
18: --
19: cursor get_seq is
20: select per_wf_events_s.nextval from dual;
21: --
22: l_proc varchar2(72):=' hr_assignment_beA.final_process_emp_asg_a';
23: begin
24: hr_utility.set_location('Entering: '||l_proc,10);
23: begin
24: hr_utility.set_location('Entering: '||l_proc,10);
25: -- check the status of the business event
26: l_event_name:='oracle.apps.per.api.assignment.final_process_emp_asg';
27: l_message:=wf_event.test(l_event_name);
28: --
29: if (l_message='MESSAGE') then
30: hr_utility.set_location(l_proc,20);
31: --
90: if p_effective_start_date is not NULL and
91: p_effective_start_date > trunc(SYSDATE) and
92: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
93: -- raise the event with the event data, with send date set to effective date
94: wf_event.raise(p_event_name=>l_event_name
95: ,p_event_key=>l_event_key
96: ,p_event_data=>l_event_data
97: ,p_send_date => p_effective_start_date);
98: --
97: ,p_send_date => p_effective_start_date);
98: --
99: else
100: -- raise the event with the event data
101: wf_event.raise(p_event_name=>l_event_name
102: ,p_event_key=>l_event_key
103: ,p_event_data=>l_event_data);
104: end if;
105: elsif (l_message='KEY') then
112: p_effective_start_date > trunc(SYSDATE) and
113: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
114: -- this is a key event, so just raise the event
115: -- without the event data, with send date set to effective date
116: wf_event.raise(p_event_name=>l_event_name
117: ,p_event_key=>l_event_key
118: ,p_send_date => p_effective_start_date);
119: --
120: else
119: --
120: else
121: -- this is a key event, so just raise the event
122: -- without the event data
123: wf_event.raise(p_event_name=>l_event_name
124: ,p_event_key=>l_event_key);
125: end if;
126: elsif (l_message='NONE') then
127: hr_utility.set_location(l_proc,40);