[Home] [Help]
184: l_text varchar2(2000);
185: l_message varchar2(10);
186: --
187: cursor get_seq is
188: select per_wf_events_s.nextval from dual;
189: --
190: l_proc varchar2(72):=' hr_assignment_be5.update_apl_asg_a';
191: begin
192: hr_utility.set_location('Entering: '||l_proc,10);
191: begin
192: hr_utility.set_location('Entering: '||l_proc,10);
193: -- check the status of the business event
194: l_event_name:='oracle.apps.per.api.assignment.update_apl_asg';
195: l_message:=wf_event.test(l_event_name);
196: --
197: if (l_message='MESSAGE') then
198: hr_utility.set_location(l_proc,20);
199: --
922: if p_effective_start_date is not NULL and
923: p_effective_start_date > trunc(SYSDATE) and
924: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
925: -- raise the event with the event data, with send date set to effective date
926: wf_event.raise(p_event_name=>l_event_name
927: ,p_event_key=>l_event_key
928: ,p_event_data=>l_event_data
929: ,p_send_date => p_effective_start_date);
930: --
929: ,p_send_date => p_effective_start_date);
930: --
931: else
932: -- raise the event with the event data
933: wf_event.raise(p_event_name=>l_event_name
934: ,p_event_key=>l_event_key
935: ,p_event_data=>l_event_data);
936: end if;
937: elsif (l_message='KEY') then
944: p_effective_start_date > trunc(SYSDATE) and
945: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
946: -- this is a key event, so just raise the event
947: -- without the event data, with send date set to effective date
948: wf_event.raise(p_event_name=>l_event_name
949: ,p_event_key=>l_event_key
950: ,p_send_date => p_effective_start_date);
951: --
952: else
951: --
952: else
953: -- this is a key event, so just raise the event
954: -- without the event data
955: wf_event.raise(p_event_name=>l_event_name
956: ,p_event_key=>l_event_key);
957: end if;
958: elsif (l_message='NONE') then
959: hr_utility.set_location(l_proc,40);