DBA Data[Home] [Help]

PACKAGE BODY: APPS.CE_DRILLDOWN_PUB_PKG

Source


1 PACKAGE BODY CE_DRILLDOWN_PUB_PKG AS
2 /* $Header: cexladdb.pls 120.2.12010000.1 2009/10/26 23:08:37 vnetan noship $ */
3 
4 /*---------------------------------------------------------------
5 |Private procedure: logMessage
6 +---------------------------------------------------------------*/
7 PROCEDURE logMessage(log_level in number
8                 ,module    in varchar2
9                 ,message   in varchar2)
10 IS
11 
12 BEGIN
13     IF log_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
14       FND_LOG.STRING(log_level, module, message);
15     END IF;
16 END;
17 
18 /*==========================================================================+
19 | PROCEDURE:  DRILLDOWN
20 | COMMENT:    DRILLDOWN procedure provides a public API for XLA to return
21 |             the appropriate information via OUT parameters to open the
22 |             appropriate transaction form.
23 | PARAMETERS:
24 |   p_application_id     : Subledger application internal identifier
25 |   p_ledger_id          : Event ledger identifier
26 |   p_legal_entity_id    : Legal entity identifier
27 |   p_entity_code        : Event entity internal code
28 |   p_event_class_code   : Event class internal code
29 |   p_event_type_code    : Event type internal code
30 |   p_source_id_int_1    : Generic system transaction identifiers
31 |   p_source_id_int_2    : Generic system transaction identifiers
32 |   p_source_id_int_3    : Generic system transaction identifiers
33 |   p_source_id_int_4    : Generic system transaction identifiers
34 |   p_source_id_char_1   : Generic system transaction identifiers
35 |   p_source_id_char_2   : Generic system transaction identifiers
36 |   p_source_id_char_3   : Generic system transaction identifiers
37 |   p_source_id_char_4   : Generic system transaction identifiers
38 |   p_security_id_int_1  : Generic system transaction identifiers
39 |   p_security_id_int_2  : Generic system transaction identifiers
40 |   p_security_id_int_3  : Generic system transaction identifiers
41 |   p_security_id_char_1 : Generic system transaction identifiers
42 |   p_security_id_char_2 : Generic system transaction identifiers
43 |   p_security_id_char_3 : Generic system transaction identifiers
44 |   p_valuation_method   : Valuation Method internal identifier
45 |   p_user_interface_type: This parameter determines the user interface type.
46 |                          The possible values are FORM, HTML, or NONE.
47 |   p_function_name      : The name of the Oracle Application Object
48 |                          Library function defined to open the transaction
49 |                          form. This parameter is used only if the page
50 |                          is a FORM page.
51 |   p_parameters         : An Oracle Application Object Library Function
52 |                          can have its own arguments/parameters. SLA
53 |                          expects developers to return these arguments via
54 |                          p_parameters.
55 |
56 +==========================================================================*/
57 
58 PROCEDURE DRILLDOWN
59   (p_application_id         IN  INTEGER    DEFAULT NULL
60   ,p_ledger_id              IN  INTEGER    DEFAULT NULL
61   ,p_legal_entity_id        IN  INTEGER    DEFAULT NULL
62   ,p_entity_code            IN  VARCHAR2   DEFAULT NULL
63   ,p_event_class_code       IN  VARCHAR2   DEFAULT NULL
64   ,p_event_type_code        IN  VARCHAR2   DEFAULT NULL
65   ,p_source_id_int_1        IN  INTEGER    DEFAULT NULL
66   ,p_source_id_int_2        IN  INTEGER    DEFAULT NULL
67   ,p_source_id_int_3        IN  INTEGER    DEFAULT NULL
68   ,p_source_id_int_4        IN  INTEGER    DEFAULT NULL
69   ,p_source_id_char_1       IN  VARCHAR2   DEFAULT NULL
70   ,p_source_id_char_2       IN  VARCHAR2   DEFAULT NULL
71   ,p_source_id_char_3       IN  VARCHAR2   DEFAULT NULL
72   ,p_source_id_char_4       IN  VARCHAR2   DEFAULT NULL
73   ,p_security_id_int_1      IN  INTEGER    DEFAULT NULL
74   ,p_security_id_int_2      IN  INTEGER    DEFAULT NULL
75   ,p_security_id_int_3      IN  INTEGER    DEFAULT NULL
76   ,p_security_id_char_1     IN  VARCHAR2   DEFAULT NULL
77   ,p_security_id_char_2     IN  VARCHAR2   DEFAULT NULL
78   ,p_security_id_char_3     IN  VARCHAR2   DEFAULT NULL
79   ,p_valuation_method       IN  VARCHAR2   DEFAULT NULL
80   ,p_user_interface_type    IN  OUT  NOCOPY VARCHAR2
81   ,p_function_name          IN  OUT  NOCOPY VARCHAR2
82   ,p_parameters             IN  OUT  NOCOPY VARCHAR2)
83 IS
84   l_cashflow_id      VARCHAR2(100);
85 
86 BEGIN
87 
88     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - BEGIN');
89     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - p_application_id ' || p_application_id);
90     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - cashflow_id ' || p_source_id_int_1);
91     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - p_event_class_code ' || p_event_class_code);
92     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - p_event_type_code ' || p_event_type_code);
93     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - p_entity_code ' || p_entity_code);
94 
95     IF (p_application_id = 260)
96     THEN
97         IF (p_entity_code = 'CE_CASHFLOWS')
98         THEN
99             l_cashflow_id := TO_CHAR(p_source_id_int_1);
100             p_user_interface_type := 'HTML';
101             p_parameters := '/OA_HTML/OA.jsp?OAFunc=CE_CASHFLOWS_DETAILS'||
102                             '&'||'drillDownCall=Y' ||
103                             '&'||'cashflowID='     || l_cashflow_id;
104         END IF;
105     END IF;
106     logMessage(FND_LOG.level_procedure, 'CE_DRILLDOWN_PUB_PKG', 'DRILLDOWN - p_parameters ' || p_parameters);
107 
108 END DRILLDOWN;
109 
110 END CE_DRILLDOWN_PUB_PKG;