PACKAGE BODY: APPS.HR_SALARY2_WEB

Source

1 package BODY hr_salary2_web AS
2 /* $Header: hrprsa2w.pkb 120.2 2005/09/25 09:09:08 svittal noship $*/
3 
4 
5     /* ======================================================================
6     || Function: get_currency_symbol
7     ||----------------------------------------------------------------------
8     || Description: returns currency symbol for a given currency code
9     ||
10     ||
11     || Pre Conditions: a valid currency code
12     ||
13     ||
14     || In Parameters:
15     ||                p_currency_code
16     ||                p_date
17     ||
18     ||
19     || Out Parameters:
20     ||
21     ||
22     || In Out Parameters:
23     ||
24     ||
25     || Post Success:
26     ||
27     ||     returns currency code
28     ||
29     || Post Failure:
30     ||     Raises Error
31     ||
32     || Access Status:
33     ||     Public.
34     ||
35     ||=================================================================== */
36 
37 
38 
39    FUNCTION  get_currency_symbol(
40      p_currency_code VARCHAR2 ,
41      p_date          DATE ) RETURN  VARCHAR2
42    IS
43      CURSOR lc_currency_symbol IS
44      SELECT CUR.SYMBOL
45      FROM FND_CURRENCIES_VL CUR
46      WHERE CUR.CURRENCY_CODE=p_currency_code
47      AND p_date BETWEEN
48       NVL(CUR.START_DATE_ACTIVE,p_date) AND
49       NVL(CUR.END_DATE_ACTIVE,p_date+1);
50 
51      lv_symbol  fnd_currencies.symbol%type;
52 
53    BEGIN
54      OPEN lc_currency_symbol ;
55      FETCH lc_currency_symbol  into lv_symbol ;
56      CLOSE lc_currency_symbol;
57 
58      return lv_symbol;
59 
60    EXCEPTION
61    WHEN OTHERS THEN
62      hr_utility.trace(' hr_salary2_web.get_currency_symbol: ' || SQLERRM );
63    END get_currency_symbol ;
64 
65 
66 
67 
68     /* ======================================================================
69     || Function: get_precision
70     ||----------------------------------------------------------------------
71     || Description: Gets precisions for a given currency
72     ||
73     ||
74     || Pre Conditions: a valid currency code
75     ||
76     ||
77     || In Parameters: p_uom
78     ||                p_currency_code
79     ||                p_date
80     ||
81     ||
82     || Out Parameters:
83     ||
84     ||
85     || In Out Parameters:
86     ||
87     ||
88     || Post Success:
89     ||
90     ||     returns precision
91     ||
92     || Post Failure:
93     ||     Raises Error
94     ||
95     || Access Status:
96     ||     Public.
97     ||
98     ||=================================================================== */
99 
100 
101 
102    FUNCTION  get_precision(
103      p_uom           VARCHAR2 ,
104      p_currency_code VARCHAR2 ,
105      p_date          DATE ) RETURN  NUMBER
106    IS
107      CURSOR c_precision IS
108      SELECT CUR.PRECISION
109      FROM FND_CURRENCIES_VL CUR
110      WHERE CUR.CURRENCY_CODE=p_currency_code
111      AND p_date BETWEEN
112       NVL(CUR.START_DATE_ACTIVE,p_date) AND
113       NVL(CUR.END_DATE_ACTIVE,p_date+1);
114 
115      ln_precision NUMBER ;
116 
117    BEGIN
118      IF p_uom = 'N'
119      THEN
120        ln_precision:= 5 ;
121      ELSE
122        OPEN c_precision ;
123        FETCH c_precision into ln_precision ;
124        CLOSE c_precision ;
125 
126      END IF ;
127      return ln_precision ;
128    EXCEPTION
129    WHEN OTHERS THEN
130      hr_utility.trace(' hr_salary2_web.get_precision: ' || SQLERRM );
131    END get_precision ;
132 End ;