25: --
26:
27: FUNCTION get_unique_id RETURN NUMBER IS
28: CURSOR get_new_id IS
29: SELECT GL_ACCESS_SETS_S.NEXTVAL
30: FROM dual;
31: new_id NUMBER;
32: BEGIN
33: OPEN get_new_id;
38: RETURN (new_id);
39: ELSE
40: CLOSE get_new_id;
41: fnd_message.set_name('SQLGL', 'GL_ERROR_GETTING_UNIQUE_ID');
42: fnd_message.set_token('SEQUENCE', 'GL_ACCESS_SETS_S');
43: app_exception.raise_exception;
44: END IF;
45:
46: EXCEPTION