109: return (TRUE);
110: end;
111:
112: FUNCTION get_company_name RETURN BOOLEAN IS
113: l_name gl_sets_of_books.name%TYPE;
114: BEGIN
115: SELECT gl.name
116: INTO l_name
117: FROM gl_sets_of_books gl,pa_implementations pi
113: l_name gl_sets_of_books.name%TYPE;
114: BEGIN
115: SELECT gl.name
116: INTO l_name
117: FROM gl_sets_of_books gl,pa_implementations pi
118: WHERE gl.set_of_books_id = pi.set_of_books_id;
119:
120: c_company_name_header := l_name;
121:
232: begin
233:
234: select gl.name
235: into l_name
236: from gl_sets_of_books gl
237: where gl.set_of_books_id = uncst_sob;
238:
239: return l_name;
240: exception