[Home] [Help]
104: l_text varchar2(2000);
105: l_message varchar2(10);
106: --
107: cursor get_seq is
108: select per_wf_events_s.nextval from dual;
109: --
110: l_proc varchar2(72):=' hr_personal_pay_method_be2.update_personal_pay_method_a';
111: begin
112: hr_utility.set_location('Entering: '||l_proc,10);
111: begin
112: hr_utility.set_location('Entering: '||l_proc,10);
113: -- check the status of the business event
114: l_event_name:='oracle.apps.per.api.personal_pay_method.update_personal_pay_method';
115: l_message:=wf_event.test(l_event_name);
116: --
117: if (l_message='MESSAGE') then
118: hr_utility.set_location(l_proc,20);
119: --
522: if p_effective_start_date is not NULL and
523: p_effective_start_date > trunc(SYSDATE) and
524: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
525: -- raise the event with the event data, with send date set to effective date
526: wf_event.raise(p_event_name=>l_event_name
527: ,p_event_key=>l_event_key
528: ,p_event_data=>l_event_data
529: ,p_send_date => p_effective_start_date);
530: --
529: ,p_send_date => p_effective_start_date);
530: --
531: else
532: -- raise the event with the event data
533: wf_event.raise(p_event_name=>l_event_name
534: ,p_event_key=>l_event_key
535: ,p_event_data=>l_event_data);
536: end if;
537: elsif (l_message='KEY') then
544: p_effective_start_date > trunc(SYSDATE) and
545: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
546: -- this is a key event, so just raise the event
547: -- without the event data, with send date set to effective date
548: wf_event.raise(p_event_name=>l_event_name
549: ,p_event_key=>l_event_key
550: ,p_send_date => p_effective_start_date);
551: --
552: else
551: --
552: else
553: -- this is a key event, so just raise the event
554: -- without the event data
555: wf_event.raise(p_event_name=>l_event_name
556: ,p_event_key=>l_event_key);
557: end if;
558: elsif (l_message='NONE') then
559: hr_utility.set_location(l_proc,40);