[Home] [Help]
105: l_text varchar2(2000);
106: l_message varchar2(10);
107: --
108: cursor get_seq is
109: select per_wf_events_s.nextval from dual;
110: --
111: l_proc varchar2(72):=' pay_element_types_be1.create_element_type_a';
112: begin
113: hr_utility.set_location('Entering: '||l_proc,10);
112: begin
113: hr_utility.set_location('Entering: '||l_proc,10);
114: -- check the status of the business event
115: l_event_name:='oracle.apps.pay.api.element_types.create_element_type';
116: l_message:=wf_event.test(l_event_name);
117: --
118: if (l_message='MESSAGE') then
119: hr_utility.set_location(l_proc,20);
120: --
531: if p_effective_start_date is not NULL and
532: p_effective_start_date > trunc(SYSDATE) and
533: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
534: -- raise the event with the event data, with send date set to effective date
535: wf_event.raise(p_event_name=>l_event_name
536: ,p_event_key=>l_event_key
537: ,p_event_data=>l_event_data
538: ,p_send_date => p_effective_start_date);
539: --
538: ,p_send_date => p_effective_start_date);
539: --
540: else
541: -- raise the event with the event data
542: wf_event.raise(p_event_name=>l_event_name
543: ,p_event_key=>l_event_key
544: ,p_event_data=>l_event_data);
545: end if;
546: elsif (l_message='KEY') then
553: p_effective_start_date > trunc(SYSDATE) and
554: fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
555: -- this is a key event, so just raise the event
556: -- without the event data, with send date set to effective date
557: wf_event.raise(p_event_name=>l_event_name
558: ,p_event_key=>l_event_key
559: ,p_send_date => p_effective_start_date);
560: --
561: else
560: --
561: else
562: -- this is a key event, so just raise the event
563: -- without the event data
564: wf_event.raise(p_event_name=>l_event_name
565: ,p_event_key=>l_event_key);
566: end if;
567: elsif (l_message='NONE') then
568: hr_utility.set_location(l_proc,40);