DBA Data[Home] [Help]

PACKAGE BODY: APPS.BSC_BIS_WRAPPER_PUB

Source


1 PACKAGE BODY BSC_BIS_WRAPPER_PUB AS
2 /* $Header: BSCPBISB.pls 115.9 2003/02/12 14:26:12 adrao ship $ */
3 
4 /************************************************************************************
5   Get_Actual_Value by KPi
6 ************************************************************************************/
7 FUNCTION Get_Actual_Value_By_Kpi(
8     p_kpi_code 		IN NUMBER,
9     p_user_id 		IN VARCHAR2,
10     p_responsibility_id	IN VARCHAR2
11 ) RETURN VARCHAR2 IS
12 
13     l_value VARCHAR2(2000);
14     l_analysis_option0	NUMBER;
15     l_analysis_option1	NUMBER;
16     l_analysis_option2	NUMBER;
17     l_series_id		NUMBER;
18 
19 BEGIN
20     l_value  := NULL;
21 
22     -- Get defaults
23     BSC_BIS_WRAPPER_PVT.Get_AO_Defaults(
24 	    			p_kpi_code  => p_kpi_code,
25 	    			x_analysis_option0 => l_analysis_option0,
26 	    			x_analysis_option1 => l_analysis_option1,
27 	    			x_analysis_option2 => l_analysis_option2,
28 	    			x_series_id => l_series_id);
29 
30 
31     l_value := BSC_BIS_WRAPPER_PVT.Get_Actual_Value(
32 				p_kpi_code => p_kpi_code,
33         			p_analysis_option0 => l_analysis_option0,
34         			p_analysis_option1 => l_analysis_option1,
35         			p_analysis_option2 => l_analysis_option2,
36 				p_series_id => l_series_id,
37         			p_user_id => p_user_id,
38         			p_responsibility_id => p_responsibility_id);
39 
40    RETURN l_value ;
41 
42 EXCEPTION
43     WHEN OTHERS THEN
44         RETURN l_value ;
45 END Get_Actual_Value_By_Kpi;
46 
47 
48 /************************************************************************************
49   Get_Actual_Value by KPi Analysis option Comb
50 ************************************************************************************/
51 FUNCTION Get_Actual_Value(
52     p_kpi_code 		IN NUMBER,
53     p_analysis_option0	IN NUMBER,
54     p_analysis_option1	IN NUMBER,
55     p_analysis_option2	IN NUMBER,
56     p_series_id		IN NUMBER,
57     p_user_id 		IN VARCHAR2,
58     p_responsibility_id	IN VARCHAR2
59 ) RETURN VARCHAR2 IS
60 
61     l_value  VARCHAR2(2000);
62 
63     l_return_status VARCHAR2(2000);
64     l_msg_count NUMBER;
65     l_msg_data VARCHAR2(32000);
66 
67 BEGIN
68     l_value  := NULL;
69 
70     l_value := BSC_BIS_WRAPPER_PVT.Get_Actual_Value(
71 				p_kpi_code => p_kpi_code,
72         			p_analysis_option0 => p_analysis_option0,
73         			p_analysis_option1 => p_analysis_option1,
74         			p_analysis_option2 => p_analysis_option2,
75 				p_series_id => p_series_id,
76         			p_user_id => p_user_id,
77         			p_responsibility_id => p_responsibility_id);
78 
79    RETURN l_value ;
80 
81 EXCEPTION
82     WHEN OTHERS THEN
83         RETURN l_value ;
84 END Get_Actual_Value;
85 
86 
87 /************************************************************************************
88   Get_Current_Period by KPi
89 ************************************************************************************/
90 FUNCTION Get_Current_Period_By_Kpi(
91     p_kpi_code 		IN NUMBER
92 ) RETURN VARCHAR2 IS
93 
94     l_value VARCHAR2(2000);
95     l_analysis_option0	NUMBER;
96     l_analysis_option1	NUMBER;
97     l_analysis_option2	NUMBER;
98     l_series_id		NUMBER;
99 
100 BEGIN
101     l_value  := NULL;
102 
103     -- Get defaults
104     BSC_BIS_WRAPPER_PVT.Get_AO_Defaults(
105 	    			p_kpi_code  => p_kpi_code,
106 	    			x_analysis_option0 => l_analysis_option0,
107 	    			x_analysis_option1 => l_analysis_option1,
108 	    			x_analysis_option2 => l_analysis_option2,
109 	    			x_series_id => l_series_id);
110 
111 
112     l_value := BSC_BIS_WRAPPER_PVT.Get_Current_Period(
113 				p_kpi_code => p_kpi_code,
114         			p_analysis_option0 => l_analysis_option0,
115         			p_analysis_option1 => l_analysis_option1,
116         			p_analysis_option2 => l_analysis_option2,
117 				p_series_id => l_series_id);
118 
119    RETURN l_value ;
120 
121 EXCEPTION
122     WHEN OTHERS THEN
123         RETURN l_value ;
124 END Get_Current_Period_By_Kpi;
125 
126 
127 /************************************************************************************
128   Get_Current_Period by KPi Analysis option Comb
129 ************************************************************************************/
130 FUNCTION Get_Current_Period(
131     p_kpi_code 		IN NUMBER,
132     p_analysis_option0	IN NUMBER,
133     p_analysis_option1	IN NUMBER,
134     p_analysis_option2	IN NUMBER,
135     p_series_id		IN NUMBER
136 ) RETURN VARCHAR2 IS
137 
138     l_value  VARCHAR2(2000);
139 
140 BEGIN
141     l_value  := NULL;
142 
143     l_value := BSC_BIS_WRAPPER_PVT.Get_Current_Period(
144 				p_kpi_code => p_kpi_code,
145         			p_analysis_option0 => p_analysis_option0,
146         			p_analysis_option1 => p_analysis_option1,
147         			p_analysis_option2 => p_analysis_option2,
148 				p_series_id => p_series_id);
149 
150    RETURN l_value ;
151 
152 EXCEPTION
153     WHEN OTHERS THEN
154         RETURN l_value ;
155 END Get_Current_Period;
156 
157 /************************************************************************************
158   Get_Current_Period by KPi Analysis option Comb
159 ************************************************************************************/
160 FUNCTION Get_DBI_Current_Period(
161    p_dimension_short_name IN VARCHAR2,
162    p_level_short_name IN VARCHAR2,
163    p_as_of_date IN VARCHAR2
164 
165 ) RETURN VARCHAR2 IS
166 
167     l_value  VARCHAR2(2000);
168     l_time_dimension_level      BSC_BIS_WRAPPER_PUB.Dim_level_Rec_Type;
169 
170 BEGIN
171     l_value  := NULL;
172     l_time_dimension_level.dimension_short_name := p_dimension_short_name;
173     l_time_dimension_level.level_short_name := p_level_short_name;
174 
175 
176     l_value := BSC_BIS_WRAPPER_PVT.Get_DBI_Current_Period(
177                  p_time_dimension_level =>   l_time_dimension_level,
178                  p_as_of_date => p_as_of_date
179 			   );
180 
181    RETURN l_value ;
182 
183 EXCEPTION
184     WHEN OTHERS THEN
185         RETURN l_value ;
186 END Get_DBI_Current_Period;
187 
188 /************************************************************************************
189   Get_Target _Value by KPi
190 ************************************************************************************/
191 FUNCTION Get_Target_Value_By_Kpi(
192     p_kpi_code 		IN NUMBER,
193     p_user_id 		IN VARCHAR2,
194     p_responsibility_id	IN VARCHAR2
195 ) RETURN VARCHAR2 IS
196 
197     l_value VARCHAR2(100);
198     l_analysis_option0	NUMBER;
199     l_analysis_option1	NUMBER;
200     l_analysis_option2	NUMBER;
201     l_series_id		NUMBER;
202 
203 BEGIN
204     l_value  := NULL;
205 
206     -- Get defaults
207     BSC_BIS_WRAPPER_PVT.Get_AO_Defaults(
208 	    			p_kpi_code  => p_kpi_code,
209 	    			x_analysis_option0 => l_analysis_option0,
210 	    			x_analysis_option1 => l_analysis_option1,
211 	    			x_analysis_option2 => l_analysis_option2,
212 	    			x_series_id => l_series_id);
213 
214     l_value := BSC_BIS_WRAPPER_PVT.Get_Target_Value(
215 				p_kpi_code => p_kpi_code,
216         			p_analysis_option0 => l_analysis_option0,
217         			p_analysis_option1 => l_analysis_option1,
218         			p_analysis_option2 => l_analysis_option2,
219 				p_series_id => l_series_id,
220         			p_user_id => p_user_id,
221         			p_responsibility_id => p_responsibility_id);
222 
223     RETURN l_value ;
224 
225 EXCEPTION
226     WHEN OTHERS THEN
227         RETURN l_value ;
228 END Get_Target_Value_By_Kpi;
229 
230 
231 /************************************************************************************
232   Get target Value by KPi Analysis option Comb
233 ************************************************************************************/
234 FUNCTION Get_Target_Value(
235     p_kpi_code 		IN NUMBER,
236     p_analysis_option0	IN NUMBER,
237     p_analysis_option1	IN NUMBER,
238     p_analysis_option2	IN NUMBER,
239     p_series_id		IN NUMBER,
240     p_user_id 		IN VARCHAR2,
241     p_responsibility_id	IN VARCHAR2
242 ) RETURN VARCHAR2 IS
243 
244     l_value  VARCHAR2(2000);
245 
246 BEGIN
247     l_value  := NULL;
248 
249     l_value := BSC_BIS_WRAPPER_PVT.Get_Target_Value(
250 				p_kpi_code => p_kpi_code,
251         			p_analysis_option0 => p_analysis_option0,
252         			p_analysis_option1 => p_analysis_option1,
253         			p_analysis_option2 => p_analysis_option2,
254 				p_series_id => p_series_id,
255         			p_user_id => p_user_id,
256         			p_responsibility_id => p_responsibility_id);
257 
258    RETURN l_value ;
259 EXCEPTION
260     WHEN OTHERS THEN
261         RETURN l_value ;
262 END Get_Target_Value;
263 
264 
265 /************************************************************************************
266     Populate bsc_bis_measures_data for the given tab
267 ************************************************************************************/
268 PROCEDURE Populate_Measure_Data(
269     p_tab_id		IN NUMBER,
270     p_page_id		IN VARCHAR2,
271     p_user_id 		IN VARCHAR2,
272     p_responsibility_id	IN VARCHAR2,
273     p_caching_key	IN VARCHAR2,
274     x_return_status 	OUT NOCOPY VARCHAR2,
275     x_msg_count 	OUT NOCOPY NUMBER,
276     x_msg_data 		OUT NOCOPY VARCHAR2
277 ) IS
278 BEGIN
279 
280     BSC_BIS_WRAPPER_PVT.Populate_Measure_Data(
281         p_tab_id => p_tab_id,
282         p_page_id => p_page_id,
283         p_user_id => p_user_id,
284         p_responsibility_id => p_responsibility_id,
285         p_caching_key => p_caching_key,
286         x_return_status => x_return_status,
287         x_msg_count => x_msg_count,
288         x_msg_data => x_msg_data
289     );
290 
291 END Populate_Measure_Data;
292 
293 /************************************************************************************
294 ************************************************************************************/
295 
296 END BSC_BIS_WRAPPER_PUB;