DBA Data[Home] [Help]

PACKAGE BODY: APPS.FARX_C_BL

Source


1 PACKAGE BODY FARX_C_BL as
2 /* $Header: farxcblb.pls 120.6 2010/02/03 09:31:34 gigupta ship $ */
3 
4 
5 
6 
7 PROCEDURE ASSET_COST_BAL (
8   errbuf         out nocopy varchar2,
9   retcode        out nocopy varchar2,
10   argument1         in  varchar2,   -- book
11   argument2         in  varchar2,   -- MRC: Set of books id
12   argument3         in  varchar2,   -- start_period_name
13   argument4         in  varchar2,   -- end_period_name
14   argument5         in  varchar2,   -- standard 'N' or drill down 'Y'
15   argument6         in  varchar2  default  null,
16   argument7         in  varchar2  default  null,
17   argument8         in  varchar2  default  null,
18   argument9         in  varchar2  default  null,
19   argument10        in  varchar2  default  null,
20   argument11       in  varchar2  default  null,
21   argument12        in  varchar2  default  null,
22   argument13        in  varchar2  default  null,
23   argument14        in  varchar2  default  null,
24   argument15        in  varchar2  default  null,
25   argument16        in  varchar2  default  null,
26   argument17        in  varchar2  default  null,
27   argument18        in  varchar2  default  null,
28   argument19        in  varchar2  default  null,
29   argument20        in  varchar2  default  null,
30   argument21       in  varchar2  default  null,
31   argument22        in  varchar2  default  null,
32   argument23        in  varchar2  default  null,
33   argument24        in  varchar2  default  null,
34   argument25        in  varchar2  default  null,
35   argument26        in  varchar2  default  null,
36   argument27        in  varchar2  default  null,
37   argument28        in  varchar2  default  null,
38   argument29        in  varchar2  default  null,
39   argument30        in  varchar2  default  null,
40   argument31       in  varchar2  default  null,
41   argument32        in  varchar2  default  null,
42   argument33        in  varchar2  default  null,
43   argument34        in  varchar2  default  null,
44   argument35        in  varchar2  default  null,
45   argument36        in  varchar2  default  null,
46   argument37        in  varchar2  default  null,
47   argument38        in  varchar2  default  null,
48   argument39        in  varchar2  default  null,
49   argument40        in  varchar2  default  null,
50   argument41       in  varchar2  default  null,
51   argument42        in  varchar2  default  null,
52   argument43        in  varchar2  default  null,
53   argument44        in  varchar2  default  null,
54   argument45        in  varchar2  default  null,
55   argument46        in  varchar2  default  null,
56   argument47        in  varchar2  default  null,
57   argument48        in  varchar2  default  null,
58   argument49        in  varchar2  default  null,
59   argument50        in  varchar2  default  null,
60   argument51       in  varchar2  default  null,
61   argument52        in  varchar2  default  null,
62   argument53        in  varchar2  default  null,
63   argument54        in  varchar2  default  null,
64   argument55        in  varchar2  default  null,
65   argument56        in  varchar2  default  null,
66   argument57        in  varchar2  default  null,
67   argument58        in  varchar2  default  null,
68   argument59        in  varchar2  default  null,
69   argument60        in  varchar2  default  null,
70   argument61       in  varchar2  default  null,
71   argument62        in  varchar2  default  null,
72   argument63        in  varchar2  default  null,
73   argument64        in  varchar2  default  null,
74   argument65        in  varchar2  default  null,
75   argument66        in  varchar2  default  null,
76   argument67        in  varchar2  default  null,
77   argument68        in  varchar2  default  null,
78   argument69        in  varchar2  default  null,
79   argument70        in  varchar2  default  null,
80   argument71       in  varchar2  default  null,
81   argument72        in  varchar2  default  null,
82   argument73        in  varchar2  default  null,
83   argument74        in  varchar2  default  null,
84   argument75        in  varchar2  default  null,
85   argument76        in  varchar2  default  null,
86   argument77        in  varchar2  default  null,
87   argument78        in  varchar2  default  null,
88   argument79        in  varchar2  default  null,
89   argument80        in  varchar2  default  null,
90   argument81       in  varchar2  default  null,
91   argument82        in  varchar2  default  null,
92   argument83        in  varchar2  default  null,
93   argument84        in  varchar2  default  null,
94   argument85        in  varchar2  default  null,
95   argument86        in  varchar2  default  null,
96   argument87        in  varchar2  default  null,
97   argument88        in  varchar2  default  null,
98   argument89        in  varchar2  default  null,
99   argument90        in  varchar2  default  null,
100   argument91       in  varchar2  default  null,
101   argument92        in  varchar2  default  null,
102   argument93        in  varchar2  default  null,
103   argument94        in  varchar2  default  null,
104   argument95        in  varchar2  default  null,
105   argument96        in  varchar2  default  null,
106   argument97        in  varchar2  default  null,
107   argument98        in  varchar2  default  null,
108   argument99        in  varchar2  default  null,
109   argument100            in       varchar2 default null) is
110 
111 h_request_id  number;
112 h_user_id    number;
113 h_err_msg   varchar2(2000);
114 
115 h_report_style varchar2(1);
116 
117 begin
118 
119 
120  h_request_id := fnd_global.conc_request_id;
121 
122   fnd_profile.get('USER_ID',h_user_id);
123 
124   if nvl(argument5,'N') = 'Y' then
125     h_report_style := 'D';
126   else
127     h_report_style := 'S';
128   end if;
129 
130   -- MRC
131   farx_bl.asset_cost_balances_rpt (
132     book => argument1,
133     start_period_name => argument3,
134     end_period_name => argument4,
135     sob_id => argument2,
136     report_style => h_report_style, -- 'S' or 'D' -- Added for Group Depreciation
137     request_id => h_request_id,
138     user_id => h_user_id,
139     errbuf => errbuf,
140     retcode => retcode);
141   -- End MRC
142 
143   commit;
144 
145 exception when others then
146   fnd_message.set_name('OFA','FA_SHARED_SERVER_ERROR');
147   h_err_msg := fnd_message.get;
148   fa_rx_conc_mesg_pkg.log(h_err_msg);
149   retcode := 2;
150 
151 end asset_cost_bal;
152 
153 
154 
155 
156 PROCEDURE CIP_COST_BAL (
157   errbuf         out nocopy varchar2,
158   retcode        out nocopy varchar2,
159   argument1             in      varchar2,   -- book
160   argument2                 in      varchar2,   -- start_period_name
161   argument3                 in      varchar2,   -- end_period_name
162   argument4             in      varchar2 default null,   --login id
163   argument5           in      varchar2 default null,       --
164   argument6        in  varchar2  default  null,
165   argument7        in  varchar2  default  null,
166   argument8        in  varchar2  default  null,
167   argument9        in  varchar2  default  null,
168   argument10        in  varchar2  default  null,
169   argument11       in  varchar2  default  null,
170   argument12        in  varchar2  default  null,
171   argument13        in  varchar2  default  null,
172   argument14        in  varchar2  default  null,
173   argument15        in  varchar2  default  null,
174   argument16        in  varchar2  default  null,
175   argument17        in  varchar2  default  null,
176   argument18        in  varchar2  default  null,
177   argument19        in  varchar2  default  null,
178   argument20        in  varchar2  default  null,
179   argument21       in  varchar2  default  null,
180   argument22        in  varchar2  default  null,
181   argument23        in  varchar2  default  null,
182   argument24        in  varchar2  default  null,
183   argument25        in  varchar2  default  null,
184   argument26        in  varchar2  default  null,
185   argument27        in  varchar2  default  null,
186   argument28        in  varchar2  default  null,
187   argument29        in  varchar2  default  null,
188   argument30        in  varchar2  default  null,
189   argument31       in  varchar2  default  null,
190   argument32        in  varchar2  default  null,
191   argument33        in  varchar2  default  null,
192   argument34        in  varchar2  default  null,
193   argument35        in  varchar2  default  null,
194   argument36        in  varchar2  default  null,
195   argument37        in  varchar2  default  null,
196   argument38        in  varchar2  default  null,
197   argument39        in  varchar2  default  null,
198   argument40        in  varchar2  default  null,
199   argument41       in  varchar2  default  null,
200   argument42        in  varchar2  default  null,
201   argument43        in  varchar2  default  null,
202   argument44        in  varchar2  default  null,
203   argument45        in  varchar2  default  null,
204   argument46        in  varchar2  default  null,
205   argument47        in  varchar2  default  null,
206   argument48        in  varchar2  default  null,
207   argument49        in  varchar2  default  null,
208   argument50        in  varchar2  default  null,
209   argument51       in  varchar2  default  null,
210   argument52        in  varchar2  default  null,
211   argument53        in  varchar2  default  null,
212   argument54        in  varchar2  default  null,
213   argument55        in  varchar2  default  null,
214   argument56        in  varchar2  default  null,
215   argument57        in  varchar2  default  null,
216   argument58        in  varchar2  default  null,
217   argument59        in  varchar2  default  null,
218   argument60        in  varchar2  default  null,
219   argument61       in  varchar2  default  null,
220   argument62        in  varchar2  default  null,
221   argument63        in  varchar2  default  null,
222   argument64        in  varchar2  default  null,
223   argument65        in  varchar2  default  null,
224   argument66        in  varchar2  default  null,
225   argument67        in  varchar2  default  null,
226   argument68        in  varchar2  default  null,
227   argument69        in  varchar2  default  null,
228   argument70        in  varchar2  default  null,
229   argument71       in  varchar2  default  null,
230   argument72        in  varchar2  default  null,
231   argument73        in  varchar2  default  null,
232   argument74        in  varchar2  default  null,
233   argument75        in  varchar2  default  null,
234   argument76        in  varchar2  default  null,
235   argument77        in  varchar2  default  null,
236   argument78        in  varchar2  default  null,
237   argument79        in  varchar2  default  null,
238   argument80        in  varchar2  default  null,
239   argument81       in  varchar2  default  null,
240   argument82        in  varchar2  default  null,
241   argument83        in  varchar2  default  null,
242   argument84        in  varchar2  default  null,
243   argument85        in  varchar2  default  null,
244   argument86        in  varchar2  default  null,
245   argument87        in  varchar2  default  null,
246   argument88        in  varchar2  default  null,
247   argument89        in  varchar2  default  null,
248   argument90        in  varchar2  default  null,
249   argument91       in  varchar2  default  null,
250   argument92        in  varchar2  default  null,
251   argument93        in  varchar2  default  null,
252   argument94        in  varchar2  default  null,
253   argument95        in  varchar2  default  null,
254   argument96        in  varchar2  default  null,
255   argument97        in  varchar2  default  null,
256   argument98        in  varchar2  default  null,
257   argument99        in  varchar2  default  null,
258   argument100            in       varchar2 default null) is
259 
260 h_request_id  number;
261 h_user_id    number;
262 h_err_msg   varchar2(2000);
263 
264 begin
265 
266  h_request_id := fnd_global.conc_request_id;
267 
268   fnd_profile.get('USER_ID',h_user_id);
269 
270   farx_bl.cip_balances_rpt (
271     book => argument1,
272     start_period_name => argument2,
273     end_period_name => argument3,
274     request_id => h_request_id,
275     user_id => h_user_id,
276     errbuf => errbuf,
277     retcode => retcode);
278 
279   commit;
280 
281 exception when others then
282   fnd_message.set_name('OFA','FA_SHARED_SERVER_ERROR');
283   h_err_msg := fnd_message.get;
284   fa_rx_conc_mesg_pkg.log(h_err_msg);
285   retcode := 2;
286 
287 end cip_cost_bal;
288 
289 
290 
291 
292 PROCEDURE ACCUM_DEPRN_BAL (
293   errbuf         out nocopy varchar2,
294   retcode        out nocopy varchar2,
295   argument1        in  varchar2,      -- book
296   argument2         in  varchar2,     -- MRC: Set of books id
297   argument3         in  varchar2,     -- start_period_name
298   argument4         in  varchar2,     -- end_period_name
299   argument5         in  varchar2,     -- Standard 'N' or Drill Down 'Y'
300   argument6         in  varchar2  default  null,
301   argument7         in  varchar2  default  null,
302   argument8         in  varchar2  default  null,
303   argument9         in  varchar2  default  null,
304   argument10        in  varchar2  default  null,
305   argument11       in  varchar2  default  null,
306   argument12        in  varchar2  default  null,
307   argument13        in  varchar2  default  null,
308   argument14        in  varchar2  default  null,
309   argument15        in  varchar2  default  null,
310   argument16        in  varchar2  default  null,
311   argument17        in  varchar2  default  null,
312   argument18        in  varchar2  default  null,
313   argument19        in  varchar2  default  null,
314   argument20        in  varchar2  default  null,
315   argument21       in  varchar2  default  null,
316   argument22        in  varchar2  default  null,
317   argument23        in  varchar2  default  null,
318   argument24        in  varchar2  default  null,
319   argument25        in  varchar2  default  null,
320   argument26        in  varchar2  default  null,
321   argument27        in  varchar2  default  null,
322   argument28        in  varchar2  default  null,
323   argument29        in  varchar2  default  null,
324   argument30        in  varchar2  default  null,
325   argument31       in  varchar2  default  null,
326   argument32        in  varchar2  default  null,
327   argument33        in  varchar2  default  null,
328   argument34        in  varchar2  default  null,
329   argument35        in  varchar2  default  null,
330   argument36        in  varchar2  default  null,
331   argument37        in  varchar2  default  null,
332   argument38        in  varchar2  default  null,
333   argument39        in  varchar2  default  null,
334   argument40        in  varchar2  default  null,
335   argument41       in  varchar2  default  null,
336   argument42        in  varchar2  default  null,
337   argument43        in  varchar2  default  null,
338   argument44        in  varchar2  default  null,
339   argument45        in  varchar2  default  null,
340   argument46        in  varchar2  default  null,
341   argument47        in  varchar2  default  null,
342   argument48        in  varchar2  default  null,
343   argument49        in  varchar2  default  null,
344   argument50        in  varchar2  default  null,
345   argument51       in  varchar2  default  null,
346   argument52        in  varchar2  default  null,
347   argument53        in  varchar2  default  null,
348   argument54        in  varchar2  default  null,
349   argument55        in  varchar2  default  null,
350   argument56        in  varchar2  default  null,
351   argument57        in  varchar2  default  null,
352   argument58        in  varchar2  default  null,
353   argument59        in  varchar2  default  null,
354   argument60        in  varchar2  default  null,
355   argument61       in  varchar2  default  null,
356   argument62        in  varchar2  default  null,
357   argument63        in  varchar2  default  null,
358   argument64        in  varchar2  default  null,
359   argument65        in  varchar2  default  null,
360   argument66        in  varchar2  default  null,
361   argument67        in  varchar2  default  null,
362   argument68        in  varchar2  default  null,
363   argument69        in  varchar2  default  null,
364   argument70        in  varchar2  default  null,
365   argument71       in  varchar2  default  null,
366   argument72        in  varchar2  default  null,
367   argument73        in  varchar2  default  null,
368   argument74        in  varchar2  default  null,
369   argument75        in  varchar2  default  null,
370   argument76        in  varchar2  default  null,
371   argument77        in  varchar2  default  null,
372   argument78        in  varchar2  default  null,
373   argument79        in  varchar2  default  null,
374   argument80        in  varchar2  default  null,
375   argument81       in  varchar2  default  null,
376   argument82        in  varchar2  default  null,
377   argument83        in  varchar2  default  null,
378   argument84        in  varchar2  default  null,
379   argument85        in  varchar2  default  null,
380   argument86        in  varchar2  default  null,
381   argument87        in  varchar2  default  null,
382   argument88        in  varchar2  default  null,
383   argument89        in  varchar2  default  null,
384   argument90        in  varchar2  default  null,
385   argument91       in  varchar2  default  null,
386   argument92        in  varchar2  default  null,
387   argument93        in  varchar2  default  null,
388   argument94        in  varchar2  default  null,
389   argument95        in  varchar2  default  null,
390   argument96        in  varchar2  default  null,
391   argument97        in  varchar2  default  null,
392   argument98        in  varchar2  default  null,
393   argument99        in  varchar2  default  null,
394   argument100            in       varchar2 default null) is
395 
396 h_user_id    number;
397 h_request_id  number;
398 h_err_msg   varchar2(2000);
399 
400 h_report_style varchar2(1);
401 
402 begin
403 
404  h_request_id := fnd_global.conc_request_id;
405 
406   fnd_profile.get('USER_ID',h_user_id);
407 
408   if nvl(argument5,'N') = 'Y' then
409     h_report_style := 'D';
410   else
411     h_report_style := 'S';
412   end if;
413 
414   -- MRC
415   farx_bl.accum_deprn_balances_rpt (
416     book => argument1,
417     start_period_name => argument3,
418     end_period_name => argument4,
419     sob_id => argument2,
420     report_style => h_report_style,
421     request_id => h_request_id,
422     user_id => h_user_id,
423     errbuf => errbuf,
424     retcode => retcode);
425   -- End MRC
426 
427   commit;
428 exception when others then
429   fnd_message.set_name('OFA','FA_SHARED_SERVER_ERROR');
430   h_err_msg := fnd_message.get;
431   fa_rx_conc_mesg_pkg.log(h_err_msg);
432   retcode := 2;
433 
434 end accum_deprn_bal;
435 
436 
437 
438 
439 PROCEDURE REVAL_RSV_BAL (
440   errbuf         out nocopy varchar2,
441   retcode        out nocopy varchar2,
442   argument1             in      varchar2,   -- book
443   argument2                 in      varchar2,   -- start_period_name
444   argument3                 in      varchar2,   -- end_period_name
445   argument4             in      varchar2 default null,   --login id
446   argument5           in      varchar2 default null,       --
447   argument6        in  varchar2  default  null,
448   argument7        in  varchar2  default  null,
449   argument8        in  varchar2  default  null,
450   argument9        in  varchar2  default  null,
451   argument10        in  varchar2  default  null,
452   argument11       in  varchar2  default  null,
453   argument12        in  varchar2  default  null,
454   argument13        in  varchar2  default  null,
455   argument14        in  varchar2  default  null,
456   argument15        in  varchar2  default  null,
457   argument16        in  varchar2  default  null,
458   argument17        in  varchar2  default  null,
459   argument18        in  varchar2  default  null,
460   argument19        in  varchar2  default  null,
461   argument20        in  varchar2  default  null,
462   argument21       in  varchar2  default  null,
463   argument22        in  varchar2  default  null,
464   argument23        in  varchar2  default  null,
465   argument24        in  varchar2  default  null,
466   argument25        in  varchar2  default  null,
467   argument26        in  varchar2  default  null,
468   argument27        in  varchar2  default  null,
469   argument28        in  varchar2  default  null,
470   argument29        in  varchar2  default  null,
471   argument30        in  varchar2  default  null,
472   argument31       in  varchar2  default  null,
473   argument32        in  varchar2  default  null,
474   argument33        in  varchar2  default  null,
475   argument34        in  varchar2  default  null,
476   argument35        in  varchar2  default  null,
477   argument36        in  varchar2  default  null,
478   argument37        in  varchar2  default  null,
479   argument38        in  varchar2  default  null,
480   argument39        in  varchar2  default  null,
481   argument40        in  varchar2  default  null,
482   argument41       in  varchar2  default  null,
483   argument42        in  varchar2  default  null,
484   argument43        in  varchar2  default  null,
485   argument44        in  varchar2  default  null,
486   argument45        in  varchar2  default  null,
487   argument46        in  varchar2  default  null,
488   argument47        in  varchar2  default  null,
489   argument48        in  varchar2  default  null,
490   argument49        in  varchar2  default  null,
491   argument50        in  varchar2  default  null,
492   argument51       in  varchar2  default  null,
493   argument52        in  varchar2  default  null,
494   argument53        in  varchar2  default  null,
495   argument54        in  varchar2  default  null,
496   argument55        in  varchar2  default  null,
497   argument56        in  varchar2  default  null,
498   argument57        in  varchar2  default  null,
499   argument58        in  varchar2  default  null,
500   argument59        in  varchar2  default  null,
501   argument60        in  varchar2  default  null,
502   argument61       in  varchar2  default  null,
503   argument62        in  varchar2  default  null,
504   argument63        in  varchar2  default  null,
505   argument64        in  varchar2  default  null,
506   argument65        in  varchar2  default  null,
507   argument66        in  varchar2  default  null,
508   argument67        in  varchar2  default  null,
509   argument68        in  varchar2  default  null,
510   argument69        in  varchar2  default  null,
511   argument70        in  varchar2  default  null,
512   argument71       in  varchar2  default  null,
513   argument72        in  varchar2  default  null,
514   argument73        in  varchar2  default  null,
515   argument74        in  varchar2  default  null,
516   argument75        in  varchar2  default  null,
517   argument76        in  varchar2  default  null,
518   argument77        in  varchar2  default  null,
519   argument78        in  varchar2  default  null,
520   argument79        in  varchar2  default  null,
521   argument80        in  varchar2  default  null,
522   argument81       in  varchar2  default  null,
523   argument82        in  varchar2  default  null,
524   argument83        in  varchar2  default  null,
525   argument84        in  varchar2  default  null,
526   argument85        in  varchar2  default  null,
527   argument86        in  varchar2  default  null,
528   argument87        in  varchar2  default  null,
529   argument88        in  varchar2  default  null,
530   argument89        in  varchar2  default  null,
531   argument90        in  varchar2  default  null,
532   argument91       in  varchar2  default  null,
533   argument92        in  varchar2  default  null,
534   argument93        in  varchar2  default  null,
535   argument94        in  varchar2  default  null,
536   argument95        in  varchar2  default  null,
537   argument96        in  varchar2  default  null,
538   argument97        in  varchar2  default  null,
539   argument98        in  varchar2  default  null,
540   argument99        in  varchar2  default  null,
541   argument100            in       varchar2 default null) is
542 
543 h_user_id    number;
544 h_request_id  number;
545 h_err_msg   varchar2(2000);
546 
547 begin
548 
549   fnd_message.set_name('OFA','FA_SHARED_SAVE_FIRST');
550   h_err_msg := fnd_message.get;
551 
552   fa_rx_conc_mesg_pkg.log(h_err_msg);
553 
554 
555  h_request_id := fnd_global.conc_request_id;
556 
557   fnd_profile.get('USER_ID',h_user_id);
558 
559   farx_bl.reval_reserve_balances_rpt (
560     book => argument1,
561     start_period_name => argument2,
562     end_period_name => argument3,
563     request_id => h_request_id,
564     user_id => h_user_id,
565     errbuf => errbuf,
566     retcode => retcode);
567 
568   commit;
569 exception when others then
570   fnd_message.set_name('OFA','FA_SHARED_SERVER_ERROR');
571   h_err_msg := fnd_message.get;
572   fa_rx_conc_mesg_pkg.log(h_err_msg);
573   retcode := 2;
574 
575 end reval_rsv_bal;
576 
577 
578 
579 
580 END FARX_C_BL;