[Home] [Help]
PACKAGE BODY: APPS.BIS_PMF_DATA_SOURCE_PUB
Source
1 PACKAGE BODY BIS_PMF_DATA_SOURCE_PUB AS
2 /* $Header: BISPDSCB.pls 115.19 2003/02/21 19:19:01 mdamle ship $ */
3 /*
4 REM +=======================================================================+
5 REM | Copyright (c) 1998 Oracle Corporation, Redwood Shores, CA, USA |
6 REM | All rights reserved. |
7 REM +=======================================================================+
8 REM | FILENAME |
9 REM | BISPDSCS.pls |
10 REM | |
11 REM | DESCRIPTION |
12 REM | Public API for the Data Source Connector |
13 REM | |
14 REM | NOTES |
15 REM | |
16 REM | HISTORY |
17 REM | APR-2000 irchen Creation |
18 REM | 27-JAN-03 arhegde For having different local variables for IN and OUT |
19 REM | parameters (bug#2758428) |
20 REM | 30-JAN-03 sugopal FND_API.G_MISS_xxx should not be used in |
21 REM | initialization or declaration (bug#2774644) |
22 REM | 30-JAN-03 mdamle SONAR Conversion to Java (APIs called from Java) |
23 REM +=======================================================================+
24 */
25 G_PKG_NAME CONSTANT VARCHAR2(30):= 'BIS_PMF_DATA_SOURCE_PUB';
26 --
27 -- Procedures
28 --
29
30 Procedure Retrieve_Target_Level
31 ( p_measure_instance IN BIS_MEASURE_PUB.Measure_Instance_type
32 , p_dim_level_value_tbl IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
33 , p_all_info IN VARCHAR2 := FND_API.G_TRUE
34 , x_target_level_rec OUT NOCOPY BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type
35 )
36 IS
37 l_target_level_rec BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type;
38 l_target_level_rec_p BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type;
39 l_return_status VARCHAR2(32000);
40 l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
41
42 BEGIN
43
44 l_target_level_rec := x_target_level_rec;
45
46 BIS_PMF_DATA_SOURCE_PVT.Form_Target_Level_rec
47 ( p_measure_instance => p_measure_instance
48 , p_dim_level_value_tbl => p_dim_level_value_tbl
49 , x_target_level_rec => l_Target_Level_Rec
50 );
51
52 l_target_level_rec_p := l_Target_Level_Rec;
53
54 BIS_Target_Level_PVT.Retrieve_Target_Level
55 ( p_api_version => 1.0
56 , p_Target_Level_Rec => l_target_level_rec_p
57 , p_all_info => p_all_info
58 , x_Target_Level_Rec => l_Target_Level_Rec
59 , x_return_status => l_return_status
60 , x_error_Tbl => l_error_Tbl
61 );
62
63 x_target_level_rec := l_target_level_rec;
64 BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved target level: '
65 ||x_target_level_rec.target_level_short_Name);
66
67 EXCEPTION
68 when FND_API.G_EXC_ERROR then
69 RETURN;
70 when FND_API.G_EXC_UNEXPECTED_ERROR then
71 RETURN;
72 when others then
73 BIS_UTILITIES_PVT.Add_Error_Message
74 ( p_error_msg_id => SQLCODE
75 , p_error_description => SQLERRM
76 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Target_Level'
77 );
78 RETURN;
79 END Retrieve_Target_Level;
80
81 Procedure Retrieve_Target
82 ( p_measure_instance IN BIS_MEASURE_PUB.Measure_Instance_type
83 , p_dim_level_value_tbl IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
84 , p_all_info IN VARCHAR2 := FND_API.G_TRUE
85 , x_target_rec OUT NOCOPY BIS_TARGET_PUB.Target_Rec_Type
86 )
87 IS
88 l_target_rec BIS_TARGET_PUB.Target_Rec_Type;
89 l_target_rec_p BIS_TARGET_PUB.Target_Rec_Type;
90 l_return_status VARCHAR2(32000);
91 l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
92
93 BEGIN
94
95 l_target_rec := x_target_rec;
96
97 BIS_PMF_DATA_SOURCE_PVT.Form_Target_rec
98 ( p_measure_instance => p_measure_instance
99 , p_dim_level_value_tbl => p_dim_level_value_tbl
100 , x_target_rec => l_Target_Rec
101 );
102
103 l_target_rec_p := l_Target_Rec;
104
105 BIS_TARGET_PUB.Retrieve_Target
106 ( p_api_version => 1.0
107 , p_Target_Rec => l_target_rec_p
108 , p_all_info => p_all_info
109 , x_Target_rec => l_Target_rec
110 , x_return_status => l_return_status
111 , x_error_Tbl => l_error_Tbl
112 );
113
114 x_target_rec := l_target_rec;
115 BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved target: '||x_target_rec.target);
116
117 EXCEPTION
118 when FND_API.G_EXC_ERROR then
119 RETURN;
120 when FND_API.G_EXC_UNEXPECTED_ERROR then
121 RETURN;
122 when others then
123 BIS_UTILITIES_PVT.Add_Error_Message
124 ( p_error_msg_id => SQLCODE
125 , p_error_description => SQLERRM
126 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Target'
127 );
128 RETURN;
129 END Retrieve_Target;
130
131 Procedure Retrieve_Target_Owners
132 ( p_measure_instance IN BIS_MEASURE_PUB.Measure_Instance_type
133 , p_dim_level_value_tbl IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
134 , p_alert_type IN VARCHAR2 := NULL
135 , p_alert_level IN VARCHAR2 := NULL
136 , p_all_info IN VARCHAR2 := FND_API.G_TRUE
137 , x_Target_owners_rec OUT NOCOPY BIS_TARGET_PUB.Target_Owners_Rec_Type
138 )
139 IS
140
141 l_Target_owners_rec BIS_TARGET_PUB.Target_Owners_Rec_Type;
142 l_Target_rec BIS_TARGET_PUB.Target_Rec_Type;
143 l_return_status VARCHAR2(32000);
144 l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
145
146 BEGIN
147
148 l_Target_owners_rec := x_Target_owners_rec;
149
150 BIS_PMF_DATA_SOURCE_PVT.Form_Target_rec
151 ( p_measure_instance => p_measure_instance
152 , p_dim_level_value_tbl => p_dim_level_value_tbl
153 , x_target_rec => l_Target_Rec
154 );
155
156 BIS_TARGET_PVT.Retrieve_Target_owners
157 ( p_api_version => 1.0
158 , p_Target_Rec => l_Target_Rec
159 , p_all_info => p_all_info
160 , x_Target_owners_rec => l_Target_owners_rec
161 , x_return_status => l_return_status
162 , x_error_Tbl => l_error_Tbl
163 );
164
165 x_Target_owners_rec := l_Target_owners_rec;
166
167 EXCEPTION
168 when FND_API.G_EXC_ERROR then
169 RETURN;
170 when FND_API.G_EXC_UNEXPECTED_ERROR then
171 RETURN;
172 when others then
173 BIS_UTILITIES_PVT.Add_Error_Message
174 ( p_error_msg_id => SQLCODE
175 , p_error_description => SQLERRM
176 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Measure_Inst_Owners'
177 );
178 RETURN;
179
180 END Retrieve_Target_Owners;
181
182 Procedure Retrieve_Actual
183 ( p_measure_instance IN BIS_MEASURE_PUB.Measure_Instance_type
184 , p_dim_level_value_tbl IN BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type
185 , p_all_info IN VARCHAR2 := FND_API.G_TRUE
186 , x_actual_rec OUT NOCOPY BIS_ACTUAL_PUB.Actual_Rec_Type
187 )
188 IS
189
190 l_actual_rec BIS_ACTUAL_PUB.Actual_Rec_Type;
191 l_return_status VARCHAR2(32000);
192 l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
193
194 BEGIN
195
196 l_actual_rec := x_actual_rec;
197
198
199 BIS_PMF_DATA_SOURCE_PVT.Form_Actual_rec
200 ( p_measure_instance => p_measure_instance
201 , p_dim_level_value_tbl => p_dim_level_value_tbl
202 , x_actual_rec => l_Actual_Rec
203 );
204
205 BIS_COMPUTED_ACTUAL_PVT.Retrieve_Actual_from_PMV
206 ( p_api_version => 1.0
207 , p_all_info => p_all_info
208 , p_measure_instance => p_measure_instance
209 , p_dim_level_value_tbl => p_dim_level_value_tbl
210 , x_Actual_rec => l_Actual_rec
211 , x_return_status => l_return_status
212 , x_error_Tbl => l_error_Tbl
213 );
214
215 /* BIS_COMPUTED_ACTUAL_PVT.Retrieve_Computed_Actual
216 ( p_api_version => 1.0
217 , p_all_info => p_all_info
218 , p_measure_instance => p_measure_instance
219 , p_dim_level_value_tbl => p_dim_level_value_tbl
220 , x_Actual_rec => l_Actual_rec
221 , x_return_status => l_return_status
222 , x_error_Tbl => l_error_Tbl
223 ); */
224
225 x_actual_rec := l_actual_rec;
226
227 BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved actual: '||x_actual_rec.actual);
228
229 EXCEPTION
230 when FND_API.G_EXC_ERROR then
231 RETURN;
232 when FND_API.G_EXC_UNEXPECTED_ERROR then
233 RETURN;
234 when others then
235 BIS_UTILITIES_PVT.Add_Error_Message
236 ( p_error_msg_id => SQLCODE
237 , p_error_description => SQLERRM
238 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Actual'
239 );
240 RETURN;
241 END Retrieve_Actual;
242
243 Procedure Retrieve_Actual
244 ( p_Measure_ID IN NUMBER := NULL
245 , p_Target_Level_ID IN NUMBER := NULL
246 , p_Plan_ID IN NUMBER := NULL
247 , p_Actual_ID IN NUMBER := NULL
248 , p_Target_ID IN NUMBER := NULL
249 , p_Dimension1_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
250 , p_Dimension1_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
251 , p_Dimension2_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
252 , p_Dimension2_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
253 , p_Dimension3_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
254 , p_Dimension3_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
255 , p_Dimension4_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
256 , p_Dimension4_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
257 , p_Dimension5_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
258 , p_Dimension5_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
259 , p_Dimension6_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
260 , p_Dimension6_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
261 , p_Dimension7_Level_ID IN NUMBER := BIS_UTILITIES_PUB.G_NULL_NUM
262 , p_Dimension7_Level_Value_ID IN VARCHAR2 := BIS_UTILITIES_PUB.G_NULL_CHAR
263 , x_actual_value OUT NOCOPY NUMBER
264 )
265 IS
266
267 l_measure_instance BIS_MEASURE_PUB.Measure_Instance_type;
268 l_dim_level_value_tbl BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type;
269 l_actual_rec BIS_ACTUAL_PUB.Actual_Rec_Type;
270 l_return_status VARCHAR2(32000);
271
272 BEGIN
273
274 BIS_PMF_DATA_SOURCE_PVT.Form_Measure_Instance
275 ( p_Measure_ID => p_Measure_ID
276 , p_Target_Level_ID => p_Target_Level_ID
277 , p_Plan_ID => p_Plan_ID
278 , p_Actual_ID => p_Actual_ID
279 , p_Target_ID => p_Target_ID
280 , x_Measure_instance => l_Measure_instance
281 );
282
283 BIS_PMF_DATA_SOURCE_PVT.Form_dim_level_value_tbl
284 ( p_Dimension1_Level_ID => p_Dimension1_Level_ID
285 , p_Dimension1_Level_Value_ID => p_Dimension1_Level_Value_ID
286 , p_Dimension2_Level_ID => p_Dimension2_Level_ID
287 , p_Dimension2_Level_Value_ID => p_Dimension2_Level_Value_ID
288 , p_Dimension3_Level_ID => p_Dimension3_Level_ID
289 , p_Dimension3_Level_Value_ID => p_Dimension3_Level_Value_ID
290 , p_Dimension4_Level_ID => p_Dimension4_Level_ID
291 , p_Dimension4_Level_Value_ID => p_Dimension4_Level_Value_ID
292 , p_Dimension5_Level_ID => p_Dimension5_Level_ID
293 , p_Dimension5_Level_Value_ID => p_Dimension5_Level_Value_ID
294 , p_Dimension6_Level_ID => p_Dimension6_Level_ID
295 , p_Dimension6_Level_Value_ID => p_Dimension6_Level_Value_ID
296 , p_Dimension7_Level_ID => p_Dimension7_Level_ID
297 , p_Dimension7_Level_Value_ID => p_Dimension7_Level_Value_ID
298 , x_dim_level_value_tbl => l_dim_level_value_tbl
299 );
300
301 BIS_PMF_DATA_SOURCE_PVT.Form_Actual_rec
302 ( p_measure_instance => l_measure_instance
303 , p_dim_level_value_tbl => l_dim_level_value_tbl
304 , x_actual_rec => l_Actual_Rec
305 );
306
307 Retrieve_Actual
308 ( p_measure_instance => l_Measure_Instance
309 , p_dim_level_value_tbl => l_Dim_Level_Value_Tbl
310 , p_all_info => FND_API.G_FALSE
311 , x_actual_rec => l_Actual_Rec
312 );
313
314 x_actual_value := l_actual_rec.actual;
315
316 BIS_UTILITIES_PUB.put_line(p_text =>'Retrieved actual: '||x_actual_value);
317
318 EXCEPTION
319 when FND_API.G_EXC_ERROR then
320 RETURN;
321 when FND_API.G_EXC_UNEXPECTED_ERROR then
322 RETURN;
323 when others then
324 BIS_UTILITIES_PVT.Add_Error_Message
325 ( p_error_msg_id => SQLCODE
326 , p_error_description => SQLERRM
327 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Actual'
328 );
329 RETURN;
330 END Retrieve_Actual;
331
332
333 -- mdamle 01/20/2003 - SONAR Conversion to Java - APIs called from Java
334 Procedure Retrieve_Target
335 ( p_measure_id IN NUMBER := NULL
336 , p_target_level_id IN NUMBER
337 , p_plan_id IN NUMBER := NULL
338 , p_dim1_level_value_id IN VARCHAR2 := NULL
339 , p_dim2_level_value_id IN VARCHAR2 := NULL
340 , p_dim3_level_value_id IN VARCHAR2 := NULL
341 , p_dim4_level_value_id IN VARCHAR2 := NULL
342 , p_dim5_level_value_id IN VARCHAR2 := NULL
343 , p_dim6_level_value_id IN VARCHAR2 := NULL
344 , p_dim7_level_value_id IN VARCHAR2 := NULL
345 , x_target_id OUT NOCOPY NUMBER
346 , x_target OUT NOCOPY NUMBER
347 , x_range1_low OUT NOCOPY NUMBER
348 , x_range1_high OUT NOCOPY NUMBER
349 , x_range2_low OUT NOCOPY NUMBER
350 , x_range2_high OUT NOCOPY NUMBER
351 , x_range3_low OUT NOCOPY NUMBER
352 , x_range3_high OUT NOCOPY NUMBER
353 , x_notify_resp1_id OUT NOCOPY NUMBER
354 , x_notify_resp1_short_name OUT NOCOPY VARCHAR2
355 , x_notify_resp1_name OUT NOCOPY VARCHAR2
356 , x_notify_resp2_id OUT NOCOPY NUMBER
357 , x_notify_resp2_short_name OUT NOCOPY VARCHAR2
358 , x_notify_resp2_name OUT NOCOPY VARCHAR2
359 , x_notify_resp3_id OUT NOCOPY NUMBER
360 , x_notify_resp3_short_name OUT NOCOPY VARCHAR2
361 , x_notify_resp3_name OUT NOCOPY VARCHAR2
362 , x_return_status OUT NOCOPY VARCHAR2
363 )
364 IS
365
366 l_Measure_Instance BIS_MEASURE_PUB.Measure_Instance_type;
367 l_Dim_Level_Value_Tbl BIS_DIM_LEVEL_VALUE_PUB.Dim_Level_Value_Tbl_Type;
368 l_target_level_rec BIS_TARGET_LEVEL_PUB.Target_Level_Rec_Type;
369 l_target_rec BIS_TARGET_PUB.Target_Rec_Type;
370 l_return_status VARCHAR2(1000);
371 l_return_msg VARCHAR2(32000);
372
373 BEGIN
374
375 -- Debug messages should be printed irrespective of profile option.
376 bis_utilities_pvt.set_debug_log_flag ( -- 2715218
377 p_is_true => TRUE
378 , x_return_status => l_return_status
379 , x_return_msg => l_return_msg
380 ) ;
381
382 BIS_UTILITIES_PUB.put_line(p_text =>' ------- Begin log file - Retrieve Target - From Java ------- ');
383
384 -- Form a measure instance record
385 --
386 BIS_PMF_DATA_SOURCE_PVT.Form_Measure_Instance
387 ( p_measure_id => p_measure_id
388 , p_target_level_id => p_target_level_id
389 , p_plan_id => p_plan_id
390 , x_measure_instance => l_Measure_Instance
391 );
392
393 BIS_UTILITIES_PUB.put_line(p_text =>'Target level id: '||l_Measure_Instance.target_level_id);
394 BIS_UTILITIES_PUB.put_line(p_text =>'Measure id: '||l_Measure_Instance.measure_id);
395
396
397 -- Form a dimension level value table
398 --
399 BIS_PMF_DATA_SOURCE_PVT.Form_dim_level_value_tbl
400 (
401 p_dimension1_level_value_id => p_dim1_level_value_id
402 , p_dimension2_level_value_id => p_dim2_level_value_id
403 , p_dimension3_level_value_id => p_dim3_level_value_id
404 , p_dimension4_level_value_id => p_dim4_level_value_id
405 , p_dimension5_level_value_id => p_dim5_level_value_id
406 , p_dimension6_level_value_id => p_dim6_level_value_id
407 , p_dimension7_level_value_id => p_dim7_level_value_id
408 , x_Dim_Level_Value_Tbl => l_Dim_Level_Value_Tbl
409 );
410
411 FOR i IN 1..7 LOOP
412 BIS_UTILITIES_PUB.put_line(p_text =>'Dim Level Value ' || i || ': '||l_Dim_Level_Value_Tbl(i).Dimension_Level_Value_ID);
413 END LOOP;
414
415
416 -- Request target information
417 --
418 BIS_PMF_DATA_SOURCE_PUB.Retrieve_Target
419 ( p_measure_instance => l_measure_instance
420 , p_dim_level_value_tbl => l_dim_level_value_tbl
421 , p_all_info => FND_API.G_FALSE
422 , x_target_rec => l_target_rec
423 );
424
425 x_target_id := l_target_rec.Target_id;
426 x_target := l_target_rec.Target;
427 x_range1_low := l_target_rec.Range1_low;
428 x_range1_high := l_target_rec.Range1_high;
429 x_range2_low := l_target_rec.Range2_low;
430 x_range2_high := l_target_rec.Range2_high;
431 x_range3_low := l_target_rec.Range3_low;
432 x_range3_high := l_target_rec.Range3_high;
433 x_notify_resp1_id := l_target_Rec.notify_resp1_id;
434 x_notify_resp1_short_name := l_target_Rec.notify_resp1_short_name;
435 x_notify_resp1_name := l_target_Rec.notify_resp1_name;
436 x_notify_resp2_id := l_target_Rec.notify_resp2_id;
437 x_notify_resp2_short_name := l_target_Rec.notify_resp2_short_name;
438 x_notify_resp2_name := l_target_Rec.notify_resp2_name;
439 x_notify_resp3_id := l_target_Rec.notify_resp3_id;
440 x_notify_resp3_short_name := l_target_Rec.notify_resp3_short_name;
441 x_notify_resp3_name := l_target_Rec.notify_resp3_name;
442
443
444 BIS_UTILITIES_PUB.put_line(p_text =>' ------- End log file - Retrieve Target - From Java ------- ');
445
446 EXCEPTION
447 when FND_API.G_EXC_ERROR then
448 x_return_status := SQLERRM;
449 RETURN;
450 when FND_API.G_EXC_UNEXPECTED_ERROR then
451 x_return_status := SQLERRM;
452 RETURN;
453 when others then
454 BIS_UTILITIES_PVT.Add_Error_Message
455 ( p_error_msg_id => SQLCODE
456 , p_error_description => SQLERRM
457 , p_error_proc_name => G_PKG_NAME||'.Retrieve_Target'
458 );
459 RETURN;
460 END Retrieve_Target;
461
462 -- mdamle 01/20/2003 - SONAR Conversion to Java - APIs called from Java
463 PROCEDURE Post_Actual
464 ( p_Target_Level_ID IN NUMBER
465 ,p_Target_Level_Name IN VARCHAR2
466 ,p_Target_Level_Short_Name IN VARCHAR2
467 ,p_Dim1_Level_Value_ID IN VARCHAR2
468 ,p_Dim1_Level_Value_Name IN VARCHAR2
469 ,p_Dim2_Level_Value_ID IN VARCHAR2
470 ,p_Dim2_Level_Value_Name IN VARCHAR2
471 ,p_Dim3_Level_Value_ID IN VARCHAR2
472 ,p_Dim3_Level_Value_Name IN VARCHAR2
473 ,p_Dim4_Level_Value_ID IN VARCHAR2
474 ,p_Dim4_Level_Value_Name IN VARCHAR2
475 ,p_Dim5_Level_Value_ID IN VARCHAR2
476 ,p_Dim5_Level_Value_Name IN VARCHAR2
477 ,p_Dim6_level_Value_id IN VARCHAR2
478 ,p_Dim6_Level_Value_Name IN VARCHAR2
479 ,p_Dim7_Level_Value_ID IN VARCHAR2
480 ,p_Dim7_Level_Value_Name IN VARCHAR2
481 ,p_Actual IN NUMBER
482 ,p_Report_Url IN VARCHAR2
483 ,p_Comparison_actual_value IN NUMBER
484 ,x_return_status OUT NOCOPY VARCHAR2
485 ) IS
486 l_actual_rec BIS_ACTUAL_PUB.Actual_Rec_Type;
487 l_msg_count NUMBER;
488 l_msg_data VARCHAR2(32000);
489 l_error_Tbl BIS_UTILITIES_PUB.Error_Tbl_Type;
490 BEGIN
491 l_actual_rec.target_level_id := p_target_level_id;
492 l_actual_rec.Target_Level_Name := p_Target_Level_Name;
493 l_actual_rec.Target_Level_Short_Name := p_Target_Level_Short_Name;
494
495 l_actual_rec.Dim1_Level_Value_ID := p_Dim1_Level_Value_ID;
496 l_actual_rec.Dim1_Level_Value_Name := p_Dim1_Level_Value_Name;
497
498 l_actual_rec.Dim2_Level_Value_ID := p_Dim2_Level_Value_ID;
499 l_actual_rec.Dim2_Level_Value_Name := p_Dim2_Level_Value_Name;
500
501 l_actual_rec.Dim3_Level_Value_ID := p_Dim3_Level_Value_ID;
502 l_actual_rec.Dim3_Level_Value_Name := p_Dim3_Level_Value_Name;
503
504 l_actual_rec.Dim4_Level_Value_ID := p_Dim4_Level_Value_ID;
505 l_actual_rec.Dim4_Level_Value_Name := p_Dim4_Level_Value_Name;
506
507 l_actual_rec.Dim5_Level_Value_ID := p_Dim5_Level_Value_ID;
508 l_actual_rec.Dim5_Level_Value_Name := p_Dim5_Level_Value_Name;
509
510 l_actual_rec.Dim6_Level_Value_ID := p_Dim6_Level_Value_ID;
511 l_actual_rec.Dim6_Level_Value_Name := p_Dim6_Level_Value_Name;
512
513 l_actual_rec.Dim7_Level_Value_ID := p_Dim7_Level_Value_ID;
514 l_actual_rec.Dim7_Level_Value_Name := p_Dim7_Level_Value_Name;
515
516 l_actual_rec.actual := p_actual;
517 l_actual_rec.report_url := p_report_url;
518 l_actual_rec.comparison_actual_value := p_comparison_actual_value;
519
520 BIS_ACTUAL_PUB.Post_Actual
521 ( p_api_version => 1.0
522 , p_commit => FND_API.G_TRUE
523 , p_Actual_Rec => l_actual_rec
524 , x_return_status => x_return_status
525 , x_msg_count => l_msg_count
526 , x_msg_data => l_msg_data
527 , x_error_Tbl => l_error_Tbl
528 );
529
530 BIS_UTILITIES_PUB.put_line(p_text =>'Actual posted: '||x_return_status);
531
532 END Post_Actual;
533
534
535 END BIS_PMF_DATA_SOURCE_PUB;