DBA Data[Home] [Help]

PACKAGE BODY: APPS.INV_INVIRRCR_XMLP_PKG

Source


1 PACKAGE BODY INV_INVIRRCR_XMLP_PKG AS
2 /* $Header: INVIRRCRB.pls 120.2 2007/12/25 10:29:15 dwkrishn noship $ */
3   FUNCTION C_FORMATTEDCURRENCYCODEFORMULA(CURRENCY_CODE IN VARCHAR2) RETURN VARCHAR2 IS
4   BEGIN
5     DECLARE
6       TEMP_C VARCHAR2(20);
7     BEGIN
8       TEMP_C := '(' || CURRENCY_CODE || ')';
9       RETURN (TEMP_C);
10     END;
11     RETURN NULL;
12   END C_FORMATTEDCURRENCYCODEFORMULA;
13 
14   FUNCTION BEFOREREPORT RETURN BOOLEAN IS
15   BEGIN
16 
17 
18 
19     BEGIN
20       P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
21       /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
22     EXCEPTION
23       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
24         /*SRW.MESSAGE(1
25                    ,'Before Report: Init')*/NULL;
26         RAISE;
27     END;
28     SELECT
29       CHART_OF_ACCOUNTS_ID
30     INTO P_EXPENSEACCOUNT_FLEXNUM
31     FROM
32       ORG_ORGANIZATION_DEFINITIONS
33     WHERE ORGANIZATION_ID = P_ORG_ID;
34     BEGIN
35       NULL;
36     EXCEPTION
37       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
38         /*SRW.MESSAGE(1
39                    ,'Before Report:
40                                    ExpenseAccountFlex')*/NULL;
41         RAISE;
42     END;
43     BEGIN
44       NULL;
45     EXCEPTION
46       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
47         /*SRW.MESSAGE(1
48                    ,'Before Report: LocatorFlex')*/NULL;
49         RAISE;
50     END;
51     BEGIN
52       NULL;
53     EXCEPTION
54       WHEN /*SRW.USER_EXIT_FAILURE*/OTHERS THEN
55         /*SRW.MESSAGE(1
56                    ,'Before Report: ItemFlex')*/NULL;
57         RAISE;
58     END;
59     RETURN (TRUE);
60   END BEFOREREPORT;
61 
62   FUNCTION AFTERREPORT RETURN BOOLEAN IS
63   BEGIN
64     BEGIN
65       /*SRW.USER_EXIT('FND SRWEXIT')*/NULL;
66       RETURN (TRUE);
67     END;
68     RETURN (TRUE);
69   END AFTERREPORT;
70 
71   FUNCTION AFTERPFORM RETURN BOOLEAN IS
72   BEGIN
73     RETURN (TRUE);
74   END AFTERPFORM;
75 
76 END INV_INVIRRCR_XMLP_PKG;
77