Line 23: SELECT hr_ki_be_s.nextval INTO l_event_key FROM dual;
19: BEGIN
20: --
21: -- Obtain a unique eventkey, which is based on a sequence
22: -- 23: SELECT hr_ki_be_s.nextval INTO l_event_key FROM dual; 24: --
25: -- Set required profile values
26: --
27: l_user_name := fnd_profile.value('USERNAME');