DBA Data[Home] [Help]

PACKAGE BODY: APPS.FARX_C_BL

Source


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