[Home] [Help]
PACKAGE BODY: APPS.BSC_CALCULATIONS_PVT
Source
1 PACKAGE BODY BSC_CALCULATIONS_PVT AS
2 /* $Header: BSCVCLCB.pls 120.0.12000000.1 2007/07/17 07:44:32 appldev noship $ */
3 /*
4 +======================================================================================+
5 | Copyright (c) 2001 Oracle Corporation, Redwood Shores, CA, USA |
6 | All rights reserved. |
7 +======================================================================================+
8 | FILENAME |
9 | BSCVCLCB.pls |
10 | |
11 | Creation Date: |
12 | December 28, 2006 |
13 | |
14 | Creator: |
15 | Pradeep Kishore Somesula |
16 | |
17 | Description: |
18 | PRIVATE version. |
19 | This package handles calculations |
20 | |
21 +======================================================================================+
22 */
23
24 PROCEDURE delete_objective_calculation (
25 p_indicator IN bsc_kpi_calculations.indicator%TYPE,
26 p_calculation_id IN bsc_kpi_calculations.calculation_id%TYPE,
27 x_return_status OUT NOCOPY VARCHAR2,
28 x_msg_count OUT NOCOPY NUMBER,
29 x_msg_data OUT NOCOPY VARCHAR2
30 )
31 IS
32
33 BEGIN
34 IF (p_indicator IS NOT NULL AND p_calculation_id IS NOT NULL) THEN
35 x_return_status := FND_API.G_RET_STS_SUCCESS;
36
37 DELETE bsc_kpi_calculations
38 WHERE indicator = p_indicator
39 AND calculation_id = p_calculation_id;
40
41 END IF;
42
43 EXCEPTION
44 WHEN OTHERS THEN
45 x_return_status := FND_API.G_RET_STS_ERROR;
46 RAISE;
47 END delete_objective_calculation;
48
49
50
51
52 PROCEDURE insert_objective_calculation (
53 p_indicator IN bsc_kpi_calculations.indicator%TYPE,
54 p_calculation_id IN bsc_kpi_calculations.calculation_id%TYPE,
55 p_user_level0 IN bsc_kpi_calculations.user_level0%TYPE,
56 p_user_level1 IN bsc_kpi_calculations.user_level1%TYPE,
57 p_user_level1_default IN bsc_kpi_calculations.user_level1_default%TYPE,
58 p_user_level2 IN bsc_kpi_calculations.user_level2%TYPE,
59 p_user_level2_default IN bsc_kpi_calculations.user_level2_default%TYPE,
60 p_default_value IN bsc_kpi_calculations.default_value%TYPE,
61 x_return_status OUT NOCOPY VARCHAR2,
62 x_msg_count OUT NOCOPY NUMBER,
63 x_msg_data OUT NOCOPY VARCHAR2
64 )
65 IS
66
67 BEGIN
68 IF (p_indicator IS NOT NULL AND p_calculation_id IS NOT NULL) THEN
69 x_return_status := FND_API.G_RET_STS_SUCCESS;
70
71 INSERT
72 INTO bsc_kpi_calculations(INDICATOR,
73 CALCULATION_ID,
74 USER_LEVEL0,
75 USER_LEVEL1,
76 USER_LEVEL1_DEFAULT,
77 USER_LEVEL2,
78 USER_LEVEL2_DEFAULT,
79 DEFAULT_VALUE)
80 VALUES(p_indicator,
81 p_calculation_id,
82 p_user_level0,
83 p_user_level1,
84 p_user_level1_default,
85 p_user_level2,
86 p_user_level2_default,
87 p_default_value
88 );
89 END IF;
90
91 EXCEPTION
92 WHEN OTHERS THEN
93 x_return_status := FND_API.G_RET_STS_ERROR;
94 RAISE;
95 END insert_objective_calculation;
96
97
98 END BSC_CALCULATIONS_PVT;