1933: -- bes caching implementation
1934: l_event_name varchar2(240);
1935: l_event_obj wf_event_obj;
1936: l_subs_list wf_event_subs_tab;
1937: l_sub wf_event_subs_obj;
1938: begin
1939: l_event_name := p_event.Event_Name;
1940:
1941: -- Deleting any previous Event parameter indexes.
2600: lphasestart number;
2601: lsrc varchar2(10);
2602:
2603: -- bes caching implementation
2604: l_sub wf_event_subs_obj;
2605: l_event_name varchar2(240);
2606: begin
2607:
2608: if (wf_log_pkg.level_procedure >= fnd_log.g_current_runtime_level) then