1 PACKAGE BODY hri_oltp_view_currency AS
2 /* $Header: hriovcrn.pkb 120.1 2006/10/09 15:24:14 jtitmas noship $ */
3
4 /******************************************************************************/
5 /* Function to convert an amount from one currency to another, given a */
6 /* specified conversion rate type */
7 /******************************************************************************/
8 FUNCTION convert_currency_amount(p_from_currency IN VARCHAR2
9 ,p_to_currency IN VARCHAR2
10 ,p_conversion_date IN DATE
11 ,p_amount IN NUMBER
12 ,p_rate_type IN VARCHAR2)
13 RETURN NUMBER IS
14
15 BEGIN
16
17 RETURN hri_bpl_currency.convert_currency_amount
18 (p_from_currency => p_from_currency,
19 p_to_currency => p_to_currency,
20 p_conversion_date => p_conversion_date,
21 p_amount => p_amount,
22 p_rate_type => p_rate_type);
23
24 EXCEPTION WHEN OTHERS THEN
25 RETURN to_number(null);
26
27 END convert_currency_amount;
28
29 FUNCTION convert_to_primary_crnc(p_from_currency IN VARCHAR2
30 ,p_amount IN NUMBER)
31 RETURN NUMBER IS
32
33 BEGIN
34
35 RETURN hri_bpl_currency.convert_to_primary_crnc
36 (p_from_currency => p_from_currency,
37 p_amount => p_amount);
38
39 EXCEPTION WHEN OTHERS THEN
40
41 RETURN 0;
42
43 END convert_to_primary_crnc;
44
45 FUNCTION convert_to_secondary_crnc(p_from_currency IN VARCHAR2
46 ,p_amount IN NUMBER)
47 RETURN NUMBER IS
48
49 BEGIN
50
51 RETURN hri_bpl_currency.convert_to_secondary_crnc
52 (p_from_currency => p_from_currency,
53 p_amount => p_amount);
54
55 EXCEPTION WHEN OTHERS THEN
56
57 RETURN 0;
58
59 END convert_to_secondary_crnc;
60
61 END hri_oltp_view_currency;