DBA Data[Home] [Help]

PACKAGE BODY: APPS.FND_FLEX_ORACLE_REPORTS_APIS

Source


1 PACKAGE BODY fnd_flex_oracle_reports_apis AS
2 /* $Header: AFFFORAB.pls 120.1.12010000.1 2008/07/25 14:14:12 appldev ship $ */
3 
4 g_newline VARCHAR2(100);
5 
6 ----------------------------------------------------------------------
7 PROCEDURE flexsql(p_appl_short_name IN VARCHAR2,
8                   p_code            IN VARCHAR2,
9                   p_mode            IN VARCHAR2,
10                   p_num             IN NUMBER DEFAULT 101,
11                   p_multinum        IN VARCHAR2 DEFAULT 'N',
12                   p_display         IN VARCHAR2 DEFAULT 'ALL',
13                   p_showdepseg      IN VARCHAR2 DEFAULT 'Y',
14                   p_tablealias      IN VARCHAR2 DEFAULT NULL,
15                   p_operator        IN VARCHAR2 DEFAULT NULL,
16                   p_operand1        IN VARCHAR2 DEFAULT NULL,
17                   p_operand2        IN VARCHAR2 DEFAULT NULL,
18                   x_output          OUT nocopy VARCHAR2)
19   IS
20 BEGIN
21    x_output := 'This API has not been implemented yet...';
22 END flexsql;
23 
24 ----------------------------------------------------------------------
25 PROCEDURE flexidval(p_appl_short_name   IN VARCHAR2,
26                     p_code              IN VARCHAR2,
27                     p_data              IN VARCHAR2,
28                     p_num               IN NUMBER DEFAULT 101,
29                     p_multinum          IN VARCHAR2 DEFAULT 'N',
30                     p_display           IN VARCHAR2 DEFAULT 'ALL',
31                     p_idisplay          IN VARCHAR2 DEFAULT 'ALL',
32                     p_showdepseg        IN VARCHAR2 DEFAULT 'Y',
33                     p_dinsert           IN VARCHAR2 DEFAULT 'N',
34                     p_output_array_size IN BINARY_INTEGER,
35                     px_output_array     IN OUT nocopy flexidval_output_arr_type)
36   IS
37 BEGIN
38    FOR i IN 1..p_output_array_size LOOP
39       px_output_array(i).value := 'This API has not been implemented yet...';
40    END LOOP;
41 END flexidval;
42 
43 ----------------------------------------------------------------------
44 -- PROCEDURE : sample_package
45 --
46 -- PL/SQL examples of public APIs in this package.
47 --
48 ----------------------------------------------------------------------
49 PROCEDURE sample_package
50   IS
51      l_p_flexdata VARCHAR2(32000);
52      l_p_where    VARCHAR2(32000);
53      l_p_operand1 VARCHAR2(32000);
54 BEGIN
55    --
56    -- Before Report Trigger actions
57    --
58 
59    --
60    -- Get the SELECT portion of my query for SQLGL/GL#/101 KFF
61    --
62    fnd_flex_oracle_reports_apis.flexsql
63      (p_appl_short_name => 'SQLGL',
64       p_code            => 'GL#',
65       p_mode            => fnd_flex_oracle_reports_apis.mode_select,
66       p_num             => 101,
67       x_output          => l_p_flexdata);
68 
69    --
70    -- Get the WHERE portion of my query for SQLGL/GL#/101 KFF
71    --
72    fnd_flex_oracle_reports_apis.flexsql
73      (p_appl_short_name => 'SQLGL',
74       p_code            => 'GL#',
75       p_mode            => fnd_flex_oracle_reports_apis.mode_where,
76       p_num             => 101,
77       p_display         => 'GL_BALANCING',
78       p_operator        => fnd_flex_oracle_reports_apis.operator_equal,
79       p_operand1        => l_p_operand1,
80       x_output          => l_p_where);
81 
82 
83    --
84    -- To be continued...
85    --
86 
87 END sample_package;
88 
89 BEGIN
90    g_newline := fnd_global.newline();
91 END fnd_flex_oracle_reports_apis;