[Home] [Help]
PACKAGE BODY: APPS.BSC_JV_PMF
Source
1 PACKAGE BODY bsc_jv_pmf AS
2 /* $Header: BSCJPFB.pls 120.0 2005/06/01 16:06:56 appldev noship $ */
3
4 PROCEDURE get_pmf_measure(
5 p_Measure_ShortName IN VARCHAR2,
6 x_function_name OUT NOCOPY VARCHAR2,
7 x_region_code OUT NOCOPY VARCHAR2
8 ) IS
9
10 l_return_status VARCHAR2(32000);
11 l_msg_count VARCHAR2(32000);
12 l_msg_data VARCHAR2(32000);
13 l_Measure_ID NUMBER ;
14 l_Measure_Short_Name VARCHAR2(30);
15 l_Measure_Name bsc_sys_datasets_tl.name%TYPE;
16 l_Description bsc_sys_datasets_tl.help%TYPE;
17 l_Dimension1_ID NUMBER ;
18 l_Dimension2_ID NUMBER ;
19 l_Dimension3_ID NUMBER ;
20 l_Dimension4_ID NUMBER ;
21 l_Dimension5_ID NUMBER ;
22 l_Dimension6_ID NUMBER ;
23 l_Dimension7_ID NUMBER ;
24 l_Unit_Of_Measure_Class VARCHAR2(10) ;
25 l_actual_data_source_type VARCHAR2(30) ;
26 l_actual_data_source VARCHAR2(240);
27 l_attribute_code VARCHAR2(240);
28 l_function_name VARCHAR2(240) ;
29 l_comparison_source VARCHAR2(240) ;
30 l_increase_in_measure VARCHAR2(1);
31
32 l_index NUMBER;
33 l_region_code VARCHAR2(240);
34 BEGIN
35
36 --dbms_output.put_line('before calling BIS_PMF_DEFINER_WRAPPER_PVT.Retrieve_Performance_Measure, p_Measure_ShortName=>' || p_Measure_ShortName);
37
38 BIS_PMF_DEFINER_WRAPPER_PVT.Retrieve_Performance_Measure(p_Measure_Short_Name => p_Measure_ShortName
39 ,x_return_status => l_return_status
40 ,x_msg_count => l_msg_count
41 ,x_msg_data => l_msg_data
42 ,x_Measure_ID => l_Measure_ID
43 ,x_Measure_Short_Name => l_Measure_Short_Name
44 ,x_Measure_Name => l_Measure_Name
45 ,x_Description => l_Description
46 ,x_Dimension1_ID => l_Dimension1_ID
47 ,x_Dimension2_ID => l_Dimension2_ID
48 ,x_Dimension3_ID => l_Dimension3_ID
49 ,x_Dimension4_ID => l_Dimension4_ID
50 ,x_Dimension5_ID => l_Dimension5_ID
51 ,x_Dimension6_ID => l_Dimension6_ID
52 ,x_Dimension7_ID => l_Dimension7_ID
53 ,x_Unit_Of_Measure_Class => l_Unit_Of_Measure_Class
54 ,x_actual_data_source_type => l_actual_data_source_type
55 ,x_actual_data_source => l_actual_data_source
56 ,x_region_code => x_region_code
57 ,x_attribute_code => l_attribute_code
58 ,x_function_name => x_function_name
59 ,x_comparison_source => l_comparison_source
60 ,x_increase_in_measure => l_increase_in_measure);
61
62
63 -- l_index := INSTRB(l_actual_data_source, '.', 1);
64 -- x_region_code := SUBSTRB(l_actual_data_source, l_index+1);
65
66
67 --dbms_output.put_line('l_actual_data_source=>' || l_actual_data_source);
68 --dbms_output.put_line('region=' || x_region_code);
69 --dbms_output.put_line('x_function_name=>' || x_function_name);
70
71 END get_pmf_measure;
72
73
74
75
76 PROCEDURE get_pmf_measure(
77 p_Measure_ShortName IN VARCHAR2,
78 x_function_name OUT NOCOPY VARCHAR2,
79 x_region_code OUT NOCOPY VARCHAR2,
80 x_graph_no OUT NOCOPY NUMBER
81 ) IS
82
83 l_return_status VARCHAR2(32000);
84 l_msg_count VARCHAR2(32000);
85 l_msg_data VARCHAR2(32000);
86 l_Measure_ID NUMBER ;
87 l_Measure_Short_Name VARCHAR2(30);
88 l_Measure_Name bsc_sys_datasets_tl.name%TYPE;
89 l_Description bsc_sys_datasets_tl.help%TYPE;
90 l_Dimension1_ID NUMBER ;
91 l_Dimension2_ID NUMBER ;
92 l_Dimension3_ID NUMBER ;
93 l_Dimension4_ID NUMBER ;
94 l_Dimension5_ID NUMBER ;
95 l_Dimension6_ID NUMBER ;
96 l_Dimension7_ID NUMBER ;
97 l_Unit_Of_Measure_Class VARCHAR2(10) ;
98 l_actual_data_source_type VARCHAR2(30) ;
99 l_actual_data_source VARCHAR2(240);
100 l_attribute_code VARCHAR2(240);
101 l_function_name VARCHAR2(240) ;
102 l_comparison_source VARCHAR2(240) ;
103 l_increase_in_measure VARCHAR2(1);
104
105 l_graph_no NUMBER;
106 l_region_code VARCHAR2(240);
107
108
109 BEGIN
110
111 --dbms_output.put_line('before calling BIS_PMF_DEFINER_WRAPPER_PVT.Retrieve_Performance_Measure, p_Measure_ShortName=>' || p_Measure_ShortName);
112
113
114 BIS_PMF_DEFINER_WRAPPER_PVT.Retrieve_Performance_Measure(p_Measure_Short_Name => p_Measure_ShortName
115 ,x_return_status => l_return_status
116 ,x_msg_count => l_msg_count
117 ,x_msg_data => l_msg_data
118 ,x_Measure_ID => l_Measure_ID
119 ,x_Measure_Short_Name => l_Measure_Short_Name
120 ,x_Measure_Name => l_Measure_Name
121 ,x_Description => l_Description
122 ,x_Dimension1_ID => l_Dimension1_ID
123 ,x_Dimension2_ID => l_Dimension2_ID
124 ,x_Dimension3_ID => l_Dimension3_ID
125 ,x_Dimension4_ID => l_Dimension4_ID
126 ,x_Dimension5_ID => l_Dimension5_ID
127 ,x_Dimension6_ID => l_Dimension6_ID
128 ,x_Dimension7_ID => l_Dimension7_ID
129 ,x_Unit_Of_Measure_Class => l_Unit_Of_Measure_Class
130 ,x_actual_data_source_type => l_actual_data_source_type
131 ,x_actual_data_source => l_actual_data_source
132 ,x_region_code => x_region_code
133 ,x_attribute_code => l_attribute_code
134 ,x_function_name => x_function_name
135 ,x_comparison_source => l_comparison_source
136 ,x_increase_in_measure => l_increase_in_measure);
137
138
139 IF ( (x_region_code IS NULL ) OR ( l_attribute_code IS NULL) ) THEN
140 RETURN;
141 END IF;
142
143 -- both region code and attribute code is not null
144 -- find the graph number for this measure
145
146 SELECT attribute5 INTO x_graph_no
147 FROM ak_region_items
148 WHERE region_code = x_region_code
149 AND ATTRIBUTE_CODE = l_attribute_code;
150
151 IF ( x_graph_no IS NULL) THEN
152 x_graph_no := 1; -- default to 1
153 END IF;
154
155 --dbms_output.put_line('l_actual_data_source=>' || l_actual_data_source);
156 --dbms_output.put_line('region=' || x_region_code);
157 --dbms_output.put_line('x_function_name=>' || x_function_name);
158
159 END get_pmf_measure;
160
161
162
163 END bsc_jv_pmf;