1 PACKAGE icx_cat_util_pkg AUTHID CURRENT_USER as
2 /* $Header: ICXCUTLS.pls 115.1 2002/11/21 08:40:48 bmunagal ship $ */
3
4
5 INVALID_CURRENCY EXCEPTION;
6 NO_RATE EXCEPTION;
7
8
9 --
10 -- Function
11 -- convert_amount_sql
12 --
13 -- Purpose
14 -- Returns the amount converted from the from currency into the
15 -- functional currency of that set of books by calling convert_amount().
16 -- The amount returned is rounded to the precision and minimum account
17 -- unit of the to currency.
18 --
19 -- Return -1 if the NO_RATE exception is raised in convert_amount().
20 -- -2 if the INVALID_CURRENCY exception is raised in
21 -- convert_amount().
22 --
23 -- History
24 -- 03-JAN-2002 SSURI Created
25 FUNCTION convert_amount_sql (
26 x_from_currency VARCHAR2,
27 x_to_currency VARCHAR2,
28 x_conversion_date DATE,
29 x_conversion_type VARCHAR2 DEFAULT NULL,
30 x_amount NUMBER ) RETURN NUMBER;
31 PRAGMA RESTRICT_REFERENCES(convert_amount_sql,WNDS,WNPS,RNPS);
32
33 --
34 -- Function
35 -- convert_amount_sql
36 --
37 -- Purpose
38 --
39 -- Overloaded function: If x_conversion_rate is not null, the rate is used to convert
40 -- otherwise, rate is calculated using from and to currencies
41 --
42 -- Returns the amount converted from the from currency into the
43 -- functional currency of that set of books by calling convert_amount().
44 -- The amount returned is rounded to the precision and minimum account
45 -- unit of the to currency.
46 --
47 -- Return -1 if the NO_RATE exception is raised in convert_amount().
48 -- -2 if the INVALID_CURRENCY exception is raised in
49 -- convert_amount().
50 --
51 -- History
52 -- 30-OCT-2002 BMUNAGAL Created
53 FUNCTION convert_amount_sql (
54 x_from_currency VARCHAR2,
55 x_to_currency VARCHAR2,
56 x_conversion_date DATE,
57 x_conversion_type VARCHAR2 DEFAULT NULL,
58 x_conversion_rate NUMBER,
59 x_amount NUMBER ) RETURN NUMBER;
60 PRAGMA RESTRICT_REFERENCES(convert_amount_sql,WNDS,WNPS,RNPS);
61
62 END icx_cat_util_pkg;