PACKAGE BODY: APPS.BOM_BOMRDRSO_XMLP_PKG

Source

1 PACKAGE BODY BOM_BOMRDRSO_XMLP_PKG AS
2 /* $Header: BOMRDRSOB.pls 120.0 2007/12/24 09:44:16 dwkrishn noship $ */
3   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
4   BEGIN
5     DECLARE
6       L_CURRENCY_CODE GL_SETS_OF_BOOKS.CURRENCY_CODE%TYPE;
7       L_ORG_NAME ORG_ORGANIZATION_DEFINITIONS.ORGANIZATION_NAME%TYPE;
8       L_DTL_SUM_CHAR MFG_LOOKUPS.MEANING%TYPE;
9     BEGIN
10       P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
11       /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
12       SELECT
13         BOOKS.CURRENCY_CODE,
14         ORG.ORGANIZATION_NAME,
15         LU.MEANING
16       INTO L_CURRENCY_CODE,L_ORG_NAME,L_DTL_SUM_CHAR
17       FROM
18         GL_SETS_OF_BOOKS BOOKS,
19         ORG_ORGANIZATION_DEFINITIONS ORG,
20         MFG_LOOKUPS LU
21       WHERE ORG.ORGANIZATION_ID = P_ORG_ID
22         AND BOOKS.SET_OF_BOOKS_ID = ORG.SET_OF_BOOKS_ID
23         AND LU.LOOKUP_CODE = P_DETAIL_OR_SUMMARY
24         AND LU.LOOKUP_TYPE = 'CST_RPT_DETAIL_OPTION';
25       P_ORG_NAME := L_ORG_NAME;
26       P_CURRENCY_CODE := L_CURRENCY_CODE;
27       P_DTL_SUM_CHAR := L_DTL_SUM_CHAR;
28       IF P_DETAIL_OR_SUMMARY = 1 THEN
29         /*SRW.SET_MAXROW('Q_std_op_sum'
30                       ,0)*/NULL;
31       ELSE
32         /*SRW.SET_MAXROW('Q_std_op_dtl'
33                       ,0)*/NULL;
34         /*SRW.SET_MAXROW('Q_std_op_rsc'
35                       ,0)*/NULL;
36       END IF;
37     END;
38     RETURN (TRUE);
39   END BEFOREREPORT;
40 
41   FUNCTION AFTERREPORT RETURN BOOLEAN IS
42   BEGIN
43     /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
44     RETURN (TRUE);
45   END AFTERREPORT;
46 
47 END BOM_BOMRDRSO_XMLP_PKG;
48