50: END;
51: RETURN (TRUE);
52: END BEFOREREPORT;
53: FUNCTION GET_COMPANY_NAME RETURN BOOLEAN IS
54: L_NAME GL_SETS_OF_BOOKS.NAME%TYPE;
55: BEGIN
56: SELECT
57: GL.NAME
58: INTO L_NAME
56: SELECT
57: GL.NAME
58: INTO L_NAME
59: FROM
60: GL_SETS_OF_BOOKS GL,
61: PA_IMPLEMENTATIONS PI
62: WHERE GL.SET_OF_BOOKS_ID = PI.SET_OF_BOOKS_ID;
63: C_COMPANY_NAME_HEADER := L_NAME;
64: RETURN (TRUE);