PACKAGE BODY: APPS.GR_GRRPT009_XMLP_PKG

Source

1 PACKAGE BODY GR_GRRPT009_XMLP_PKG AS
2 /* $Header: GRRPT009B.pls 120.1 2007/12/27 14:39:27 dwkrishn noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4   BEGIN
5     RETURN (TRUE);
6   END BEFOREREPORT;
7 
8   PROCEDURE GR_GRRPT009_XMLP_PKG_HEADER IS
9   BEGIN
10     NULL;
11   END GR_GRRPT009_XMLP_PKG_HEADER;
12 
13   FUNCTION CF_REPORT_TYPEFORMULA RETURN CHAR IS
14     X_FIELD VARCHAR2(30);
15   BEGIN
16     SELECT
17       MEANING
18     INTO X_FIELD
19     FROM
20       FND_LOOKUP_VALUES
21     WHERE LOOKUP_TYPE = 'GR_GRRPT009_REPORT_TYPE'
22       AND LOOKUP_CODE = P_REPORT_TYPE
23       AND LANGUAGE = USERENV('LANG');
24     IF SQL%NOTFOUND THEN
25       X_FIELD := ' ';
26     END IF;
27     RETURN (X_FIELD);
28   END CF_REPORT_TYPEFORMULA;
29 
30 END GR_GRRPT009_XMLP_PKG;
31 
32