[Home] [Help]
20: l_text varchar2(2000);
21: l_message varchar2(10);
22: --
23: cursor get_seq is
24: select per_wf_events_s.nextval from dual;
25: --
26: l_proc varchar2(72):=' pay_balance_feeds_be1.create_balance_feed_a';
27: begin
28: hr_utility.set_location('Entering: '||l_proc,10);
27: begin
28: hr_utility.set_location('Entering: '||l_proc,10);
29: -- check the status of the business event
30: l_event_name:='oracle.apps.pay.api.balance_feeds.create_balance_feed';
31: l_message:=wf_event.test(l_event_name);
32: --
33: if (l_message='MESSAGE') then
34: hr_utility.set_location(l_proc,20);
35: --
106: if p_effective_start_date is not NULL and
107: p_effective_start_date > trunc(SYSDATE) and
108: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
109: -- raise the event with the event data, with send date set to effective date
110: wf_event.raise(p_event_name=>l_event_name
111: ,p_event_key=>l_event_key
112: ,p_event_data=>l_event_data
113: ,p_send_date => p_effective_start_date);
114: --
113: ,p_send_date => p_effective_start_date);
114: --
115: else
116: -- raise the event with the event data
117: wf_event.raise(p_event_name=>l_event_name
118: ,p_event_key=>l_event_key
119: ,p_event_data=>l_event_data);
120: end if;
121: elsif (l_message='KEY') then
128: p_effective_start_date > trunc(SYSDATE) and
129: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
130: -- this is a key event, so just raise the event
131: -- without the event data, with send date set to effective date
132: wf_event.raise(p_event_name=>l_event_name
133: ,p_event_key=>l_event_key
134: ,p_send_date => p_effective_start_date);
135: --
136: else
135: --
136: else
137: -- this is a key event, so just raise the event
138: -- without the event data
139: wf_event.raise(p_event_name=>l_event_name
140: ,p_event_key=>l_event_key);
141: end if;
142: elsif (l_message='NONE') then
143: hr_utility.set_location(l_proc,40);