DBA Data[Home] [Help]

PACKAGE BODY: APPS.AMS_DCF_DEFAULT_VALUES

Source


1 PACKAGE BODY AMS_DCF_DEFAULT_VALUES AS
2 /* $Header: amsvdohb.pls 115.14 2002/04/30 18:08:12 pkm ship        $ */
3 
4 def_period varchar2(80) := fnd_profile.VALUE('AMS_CAMPAIGN_DEFAULT_CALENDER');
5 def_quarter varchar2(80) := fnd_profile.VALUE('BIM_IO_QUARTER');
6 def_year varchar2(80) := fnd_profile.VALUE('BIM_IO_YEAR');
7 
8 -----------------------------------------------------------
9 -- PROCEDURE
10 --    get_events_default_aggregate
11 --
12 -- HISTORY
13 --
14 ------------------------------------------------------------
15 
16 FUNCTION get_events_aggregate(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
17 is
18   x_return_value varchar2(80) ;
19 
20 BEGIN
21 --        SELECT aggregate_by
22 --	INTO x_return_value
23 --	FROM BIM_R_EVEN_DIM_SUM_MV
24 -- 	WHERE rownum < 2;
25 
26        x_return_value :='QTR';
27 
28         RETURN (x_return_value);
29 
30 EXCEPTION
31 WHEN OTHERS THEN
32 --   dbms_output.put_line(sqlerrm(sqlcode));
33    null;
34 
35 END get_events_aggregate;
36 
37 
38 FUNCTION get_campaigns_aggregate(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
39 is
40   x_return_value varchar2(80) ;
41 
42 BEGIN
43 --        SELECT aggregate_by
44 --	INTO   x_return_value
45 --	FROM   BIM_R_CAMP_DIM_SUM_MV
46 --	WHERE  rownum < 2;
47 
48         x_return_value:='QTR';
49 
50         RETURN (x_return_value);
51 
52 EXCEPTION
53 WHEN OTHERS THEN
54 --   dbms_output.put_line(sqlerrm(sqlcode));
55    null;
56 
57 END get_campaigns_aggregate;
58 
59 
60 FUNCTION get_funds_aggregate(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
61 is
62   x_return_value varchar2(80) ;
63 
64 BEGIN
65 --        SELECT aggregate_by
66 --	INTO   x_return_value
67 --	FROM   BIM_R_FUND_DIM_SUM_MV
68 -- 	WHERE  rownum < 2;
69 
70        x_return_value :='QTR';
71 
72         RETURN (x_return_value);
73 
74 EXCEPTION
75 WHEN OTHERS THEN
76 --   dbms_output.put_line(sqlerrm(sqlcode));
77    null;
78 
79 END get_funds_aggregate;
80 
81 
82 FUNCTION get_campaigns_year(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
83 is
84   x_return_value varchar2(80) ;
85 
86 BEGIN
87         SELECT year
88 	INTO   x_return_value
89 	FROM   BIM_R_CAMP_DIM_SUM_MV
90  	WHERE  rownum < 2;
91 
92         RETURN (x_return_value);
93 
94 EXCEPTION
95 WHEN OTHERS THEN
96 --   dbms_output.put_line(sqlerrm(sqlcode));
97    null;
98 
99 END get_campaigns_year;
100 
101 
102 FUNCTION get_campaigns_quarter(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
103 is
104   x_return_value varchar2(80) ;
105 
106 BEGIN
107         SELECT qtr
108 	INTO   x_return_value
109 	FROM   BIM_R_CAMP_DIM_SUM_MV
110  	WHERE  rownum < 2;
111 
112         RETURN (x_return_value);
113 
114 EXCEPTION
115 WHEN OTHERS THEN
116 --   dbms_output.put_line(sqlerrm(sqlcode));
117    null;
118 
119 END get_campaigns_quarter;
120 
121 FUNCTION get_events_year(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
122 is
123   x_return_value varchar2(80) ;
124 
125 BEGIN
126         SELECT year
127 	INTO   x_return_value
128 	FROM   BIM_R_EVEN_DIM_SUM_MV
129  	WHERE  rownum < 2;
130 
131         RETURN (x_return_value);
132 
133 EXCEPTION
134 WHEN OTHERS THEN
135 --   dbms_output.put_line(sqlerrm(sqlcode));
136    null;
137 
138 END get_events_year;
139 
140 
141 
142 FUNCTION get_events_quarter(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
143 is
144   x_return_value varchar2(80) ;
145 
146 BEGIN
147         SELECT qtr
148 	INTO   x_return_value
149 	FROM   BIM_R_EVEN_DIM_SUM_MV
150  	WHERE  rownum < 2;
151 
152         RETURN (x_return_value);
153 
154 EXCEPTION
155 WHEN OTHERS THEN
156 --   dbms_output.put_line(sqlerrm(sqlcode));
157    null;
158 
159 END get_events_quarter;
160 
161 
162 FUNCTION get_funds_year(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
163 is
164   x_return_value varchar2(80) ;
165 
166 BEGIN
167         --SELECT year
168 	--INTO   x_return_value
169 	--FROM   BIM_R_FUND_DIM_SUM_MV
170  	--WHERE  rownum < 2;
171         x_return_value := 'YEAR';
172         RETURN (x_return_value);
173 
174 EXCEPTION
175 WHEN OTHERS THEN
176 --   dbms_output.put_line(sqlerrm(sqlcode));
177    null;
178 
179 END get_funds_year;
180 
181 FUNCTION get_funds_quarter(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
182 is
183   x_return_value varchar2(80) ;
184 
185 BEGIN
186         --SELECT qtr
187 	--INTO   x_return_value
188 	--FROM   BIM_R_FUND_DIM_SUM_MV
189  	--WHERE  rownum < 2;
190 
191         x_return_value := 'QTR';
192         RETURN (x_return_value);
193 
194 EXCEPTION
195 WHEN OTHERS THEN
196 --   dbms_output.put_line(sqlerrm(sqlcode));
197    null;
198 
199 END get_funds_quarter;
200 
201 
202 
203 
204 FUNCTION get_default_period(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
205 is
206   x_return_year varchar2(80);
207   x_return_qtr varchar2(80);
208 
209 BEGIN
210 
211       select period_name into x_return_year from gl_periods_v g
212        where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
213          AND g.period_set_name = def_period
214          AND g.period_type = def_year;
215 
216       select period_name into x_return_qtr from gl_periods_v g
217        where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
218          AND g.period_set_name = def_period
219          AND g.period_type = def_quarter;
220 
221         RETURN (x_return_year||'-'||x_return_qtr||'-N');
222 
223 EXCEPTION
224 WHEN OTHERS THEN
225 --   dbms_output.put_line(sqlerrm(sqlcode));
226    null;
227 
228 END get_default_period;
229 
230 FUNCTION get_default_period_inc(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
231 is
232   x_return_year varchar2(80);
233   x_return_qtr varchar2(80);
234 
235 BEGIN
236 
237       select period_name into x_return_year from gl_periods_v g
238        where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
239          AND g.period_set_name = def_period
240          AND g.period_type = def_year;
241 
242       select period_name into x_return_qtr from gl_periods_v g
243        where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
244          AND g.period_set_name = def_period
245          AND g.period_type = def_quarter;
246 
247         RETURN (x_return_year||'-'||x_return_qtr||'-N-Z');
248 
249 EXCEPTION
250 WHEN OTHERS THEN
251 --   dbms_output.put_line(sqlerrm(sqlcode));
252    null;
253 
254 END get_default_period_inc;
255 
256 
257 
258 FUNCTION get_default_quarter(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
259 is
260   x_return_value varchar2(80) ;
261 
262 BEGIN
263 
264 select period_name into x_return_value from gl_periods_v g
265 where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
266    AND g.period_set_name = def_period
267    AND g.period_type = def_quarter;
268 
269    RETURN (x_return_value);
270 
271 EXCEPTION
272 WHEN OTHERS THEN
273 --   dbms_output.put_line(sqlerrm(sqlcode));
274    null;
275 
276 END get_default_quarter;
277 
278 FUNCTION get_default_year(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
279 is
280   x_return_value varchar2(80) ;
281 
282 BEGIN
283 
284 select period_name into x_return_value from gl_periods_v g
285 where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
286    AND g.period_set_name = def_period
287    AND g.period_type = def_year;
288 
289    RETURN (x_return_value);
290 
291 EXCEPTION
292 WHEN OTHERS THEN
293 --   dbms_output.put_line(sqlerrm(sqlcode));
294    null;
295 
296 END get_default_year;
297 
298 FUNCTION get_default_period_hom(parameters IN VARCHAR2 DEFAULT NULL) RETURN VARCHAR2
299 is
300   x_return_value varchar2(80) ;
301 
302 BEGIN
303 
304 select period_name into x_return_value from gl_periods_v g
305 where trunc(SYSDATE) BETWEEN g.start_date AND g.end_date
306    AND g.period_set_name = def_period
307    AND g.period_type = def_quarter;
308 
309    RETURN (x_return_value||'|QTR');
310 
311 EXCEPTION
312 WHEN OTHERS THEN
313 --   dbms_output.put_line(sqlerrm(sqlcode));
314    null;
315 
316 END get_default_period_hom;
317 
318 
319 
320 END AMS_DCF_DEFAULT_VALUES;