[Home] [Help]
PACKAGE BODY: APPS.FII_MSG
Source
1 PACKAGE BODY fii_msg AS
2 /* $Header: FIIGLC3B.pls 120.20 2005/06/22 09:22:32 hpoddar noship $ */
3
4 -- Function
5 -- get_msg
6 --
7 -- Purpose
8 -- Returns string "XTD"
9 --
10 -- History
11 -- 22-JUN-02 M Bedekar Created
12 --
13
14 FUNCTION get_msg (p_page_id IN VARCHAR2
15 ,p_user_id IN VARCHAR2
16 ,p_session_id IN VARCHAR2
17 ,p_function_name IN VARCHAR2
18 )RETURN VARCHAR2 IS
19
20 stmt VARCHAR2(240);
21 BEGIN
22
23 IF fii_gl_util_pkg.g_mgr_id = -99999 THEN
24
25
26 IF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_YEAR' THEN
27 stmt := 'YTD';
28 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_QTR' THEN
29 stmt := 'QTD';
30 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_PERIOD' THEN
31 stmt := 'MTD';
32 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_WEEK' THEN
33 stmt := 'WTD';
34 END IF;
35
36 ELSE
37
38 stmt := BIS_PMV_PORTAL_UTIL_PUB.getTimeLevelLabel(p_page_id, p_user_id, p_session_id, p_function_name);
39
40 END IF;
41
42 RETURN stmt;
43
44 END get_msg;
45
46 FUNCTION get_msg1 (p_page_id IN VARCHAR2
47 ,p_user_id IN VARCHAR2
48 ,p_session_id IN VARCHAR2
49 ,p_function_name IN VARCHAR2
50 )RETURN VARCHAR2 IS
51
52 stmt VARCHAR2(240);
53 BEGIN
54
55 IF fii_gl_util_pkg.g_mgr_id = -99999 THEN
56
57
58 IF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_YEAR' THEN
59 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' YTD';
60 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_QTR' THEN
61 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' QTD';
62 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_PERIOD' THEN
63 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' MTD';
64 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_WEEK' THEN
65 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' WTD';
66 END IF;
67
68 ELSE
69
70 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' ' ||BIS_PMV_PORTAL_UTIL_PUB.getTimeLevelLabel(p_page_id, p_user_id, p_session_id, p_function_name);
71 END IF;
72
73 RETURN stmt;
74
75 END get_msg1;
76
77 FUNCTION get_msg2 (p_page_id IN VARCHAR2
78 ,p_user_id IN VARCHAR2
79 ,p_session_id IN VARCHAR2
80 ,p_function_name IN VARCHAR2
81 )RETURN VARCHAR2 IS
82
83
84 stmt VARCHAR2(240);
85 BEGIN
86
87 IF fii_gl_util_pkg.g_time_comp = 'BUDGET' THEN
88 stmt := fnd_message.get_string('FII', 'FII_GL_BUDGET');
89 ELSIF fii_gl_util_pkg.g_mgr_id = -99999 THEN
90
91
92 IF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_YEAR' THEN
93 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' YTD';
94 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_QTR' THEN
95 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' QTD';
96 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_PERIOD' THEN
97 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' MTD';
98 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_WEEK' THEN
99 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' WTD';
100 END IF;
101
102 ELSE
103 stmt := fnd_message.get_string('FII', 'FII_GL_PMV')||' ' ||BIS_PMV_PORTAL_UTIL_PUB.getTimeLevelLabel(p_page_id, p_user_id, p_session_id, p_function_name);
104 END IF;
105
106 RETURN stmt;
107
108 END get_msg2;
109
110
111 FUNCTION get_curr_label RETURN VARCHAR2 IS
112 stmt VARCHAR2(240);
113 BEGIN
114
115 stmt := get_msg3('Y');
116 Return stmt;
117
118 END get_curr_label;
119
120 FUNCTION get_prior_label RETURN VARCHAR2 IS
121 stmt VARCHAR2(240);
122 BEGIN
123
124 stmt := get_msg3('N');
125 Return stmt;
126
127 END get_prior_label;
128
129
130 FUNCTION get_msg3 ( p_current IN VARCHAR2
131 )RETURN VARCHAR2 IS
132 stmt VARCHAR2(240);
133 l_asof_date DATE;
134 l_week VARCHAR2(10);
135 l_year VARCHAR2(10);
136 BEGIN
137 IF (p_current = 'Y') THEN
138 l_asof_date:=fii_gl_util_pkg.g_as_of_date;
139 ELSE
140 l_asof_date:=fii_gl_util_pkg.g_previous_asof_date;
141 END IF;
142
143 IF (fii_gl_util_pkg.g_time_comp = 'BUDGET' AND p_current = 'N') THEN
144 stmt := fnd_message.get_string('FII', 'FII_GL_BUDGET');
145 ELSE
146 IF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_YEAR' THEN
147 select name into stmt
148 from fii_time_ent_year
149 where l_asof_date between start_date and end_date;
150 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_QTR' THEN
151 select name into stmt
152 from fii_time_ent_qtr
153 where l_asof_date between start_date and end_date;
154 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_ENT_PERIOD' THEN
155 select name into stmt
156 from fii_time_ent_period
157 where l_asof_date between start_date and end_date;
158 ELSIF fii_gl_util_pkg.g_page_period_type = 'FII_TIME_WEEK' THEN
159 select to_char(sequence) into l_week
160 from fii_time_week
161 where l_asof_date between start_date and end_date;
162
163 select substr(week_id,3,2) into l_year
164 from fii_time_week
165 where l_asof_date between start_date and end_date;
166
167 stmt := fnd_message.get_string('FII', 'FII_AR_WEEK')||' '||l_week||' '||l_year;
168 END IF;
169 END IF;
170 RETURN stmt;
171
172 END get_msg3;
173
174
175 FUNCTION get_curr RETURN VARCHAR2 IS
176
177 stmt VARCHAR2(240);
178
179 BEGIN
180
181 select id into stmt from fii_currencies_v where id = 'FII_GLOBAL1';
182
183 RETURN stmt;
184
185 END get_curr;
186
187 FUNCTION get_manager RETURN NUMBER IS
188
189 stmt NUMBER;
190
191 BEGIN
192
193 stmt := fnd_global.employee_id;
194
195 RETURN stmt;
196
197 END get_manager;
198
199 FUNCTION get_dbi_params(region_id IN VARCHAR2) RETURN VARCHAR2 IS
200 employee_id NUMBER(10);
201 employee_name VARCHAR2(240);
202 currency FII_CURRENCIES_V.ID%TYPE;
203 qtr_id NUMBER;
204 BEGIN
205 employee_id := fnd_global.employee_id;
206 currency := 'FII_GLOBAL1';
207 qtr_id := -1;
208
209 IF (region_id = 'FII_PMV_MGR_PARAMETER_PORTLET') THEN
210 RETURN '&'||'AS_OF_DATE='||TO_CHAR(TRUNC(sysdate),'DD-MON-YYYY')||
211 '&'||'BIS_MANAGER='||employee_id||
212 '&'||'CURRENCY='||currency||
213 '&'||'YEARLY=TIME_COMPARISON_TYPE+YEARLY&PERIOD_QUARTER_FROM='||qtr_id||'&PERIOD_QUARTER_TO='||qtr_id;
214 ELSE
215 RETURN NULL;
216 END IF;
217
218 END get_dbi_params;
219
220 FUNCTION get_margin_label RETURN VARCHAR2 IS
221
222 stmt VARCHAR2(240);
223 BEGIN
224
225 IF (fii_gl_util_pkg.g_time_comp = 'BUDGET') THEN
226 stmt := fnd_message.get_string('FII', 'FII_GL_BUDGET');
227 ELSE
228 stmt := fnd_message.get_string('FII', 'FII_GL_PRIOR_MARGIN');
229 END IF;
230
231 RETURN stmt;
232
233 END get_margin_label;
234
235 END fii_msg;
236