DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_EFC_STUBS

Source


1 PACKAGE BODY ben_efc_stubs AS
2 /* $Header: beefcstb.pkb 120.0 2005/05/28 02:08:44 appldev noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |-----------------< get_cust_mapped_rounding_code >------------------------|
6 -- ----------------------------------------------------------------------------
7 --
8 -- Description:
9 --
10 -- For specific rounding codes, defined in hr_lookups for the lookup type
11 -- of BEN_RNDG, a mapping needs to be defined between the original
12 -- rounding code and the rounding code to be used after EFC conversion.
13 --
14 -- Post Success:
15 -- Should return the new rounding code.
16 --
17 -- ----------------------------------------------------------------------------
18 function get_cust_mapped_rounding_code
19   (p_rndcd_table_name in     varchar2
20   ,p_currency_code    in     varchar2
21   ,p_rndcd_value      in     varchar2
22   )
23 return varchar2
24 is
25   --
26 BEGIN
27   --
28   -- The following is listed as an example only, and should be edited
29   -- by the customer to reflect a customer's particular rounding codes.
30   --
31   if p_currency_code = 'ZZZ' then
32     --
33     if p_rndcd_table_name='BEN_ACTL_PREM_F' then
34       --
35       if p_rndcd_value = 'RTNRTTHO' then
36         --
37         return 'RTNRTEN';
38         --
39       else
40         --
41         return null;
42         --
43       end if;
44       --
45     elsif p_rndcd_table_name='BEN_ACTY_BASE_RT_F' then
46       --
47       return 'ZZZRNDCD2';
48       --
49     elsif p_rndcd_table_name='BEN_BNFT_POOL_RLOVR_RQMT_F' then
50       --
51       return 'ZZZRNDCD3';
52       --
53     elsif p_rndcd_table_name='BEN_BNFT_PRVDR_POOL_F' then
54       --
55       return 'ZZZRNDCD4';
56       --
57     elsif p_rndcd_table_name='BEN_COMP_LVL_FCTR' then
58       --
59       return 'ZZZRNDCD5';
60       --
61     elsif p_rndcd_table_name='BEN_CVG_AMT_CALC_MTHD_F' then
62       --
63       return 'ZZZRNDCD6';
64       --
65     elsif p_rndcd_table_name='BEN_POE_RT_F' then
66       --
67       return 'ZZZRNDCD7';
68       --
69     elsif p_rndcd_table_name='BEN_PRTL_MO_RT_PRTN_VAL_F' then
70       --
71       return 'ZZZRNDCD8';
72       --
73     elsif p_rndcd_table_name='BEN_VRBL_RT_PRFL_F' then
74       --
75       return 'ZZZRNDCD9';
76       --
77     end if;
78     --
79   else
80     --
81     return null;
82     --
83   end if;
84   --
85 END get_cust_mapped_rounding_code;
86 --
87 END ben_efc_stubs;