APPS.FA_POLISH_PVT dependencies on FA_STD_TYPES

Line 2059: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,

2055: -- In an asset's first year of life, it has a specific rate and switch
2056: -- code. In addition, we do not do the switch test in the first year.
2057: if ((p_year_of_life = 1) and (p_Year_Retired = 'N')) then
2058:
2059: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2060: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
2061:
2062: x_switch_code := '30';
2063:

Line 2060: FA_STD_TYPES.FAD_DBR_POLISH_2)) then

2056: -- code. In addition, we do not do the switch test in the first year.
2057: if ((p_year_of_life = 1) and (p_Year_Retired = 'N')) then
2058:
2059: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2060: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
2061:
2062: x_switch_code := '30';
2063:
2064: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,

Line 2064: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,

2060: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
2061:
2062: x_switch_code := '30';
2063:
2064: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,
2065: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
2066:
2067: x_switch_code := 'DM';
2068:

Line 2065: FA_STD_TYPES.FAD_DBR_POLISH_4)) then

2061:
2062: x_switch_code := '30';
2063:
2064: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,
2065: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
2066:
2067: x_switch_code := 'DM';
2068:
2069: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then

Line 2069: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then

2065: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
2066:
2067: x_switch_code := 'DM';
2068:
2069: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
2070:
2071: x_switch_code := 'SD';
2072:
2073: else

Line 2087: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,

2083: end if;
2084:
2085: -- After the first year, some mechanisms automatically move to a new switch
2086: if ((p_year_of_life > 1) and (p_Year_Retired = 'N')) then
2087: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2088: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2089: if (p_Year_Of_Life = 2) then
2090:
2091: -- For 2nd year, rate is adj_rate * deprn_factor

Line 2088: FA_STD_TYPES.FAD_DBR_POLISH_3)) then

2084:
2085: -- After the first year, some mechanisms automatically move to a new switch
2086: if ((p_year_of_life > 1) and (p_Year_Retired = 'N')) then
2087: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2088: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2089: if (p_Year_Of_Life = 2) then
2090:
2091: -- For 2nd year, rate is adj_rate * deprn_factor
2092: -- No switch test is done in the second year

Line 2103: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_2,

2099: -- switch and new basis later.
2100: x_switch_code := 'XX';
2101:
2102: end if;
2103: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_2,
2104: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
2105: -- After the first year, rate is adj_rate
2106: -- No switch test is done
2107: x_switch_code := 'FR';

Line 2104: FA_STD_TYPES.FAD_DBR_POLISH_4)) then

2100: x_switch_code := 'XX';
2101:
2102: end if;
2103: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_2,
2104: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
2105: -- After the first year, rate is adj_rate
2106: -- No switch test is done
2107: x_switch_code := 'FR';
2108: x_adjusted_rate := p_adjusted_rate;

Line 2110: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then

2106: -- No switch test is done
2107: x_switch_code := 'FR';
2108: x_adjusted_rate := p_adjusted_rate;
2109:
2110: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
2111: -- For Mech 5, we do the switch test immediately after year 1.
2112: -- We're going to use XX to signify that we'll figure out the
2113: -- switch and new basis later.
2114: x_switch_code := 'XX';

Line 2237: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,

2233: --
2234: -- (adjusted_cost - prev_yr_rsv) * deprn_factor <= (adjusted_cost)
2235: --
2236: if (x_switch_code = 'XX') then
2237: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2238: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2239:
2240: -- Switch between D2 and FR
2241:

Line 2238: FA_STD_TYPES.FAD_DBR_POLISH_3)) then

2234: -- (adjusted_cost - prev_yr_rsv) * deprn_factor <= (adjusted_cost)
2235: --
2236: if (x_switch_code = 'XX') then
2237: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2238: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2239:
2240: -- Switch between D2 and FR
2241:
2242: l_new_basis := p_prev_year_adjusted_cost - p_prev_year_reserve +

Line 2257: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then

2253: -- Switch to FR
2254: x_switch_code := 'FR';
2255: end if;
2256:
2257: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
2258:
2259: -- Switch between SD and FR
2260:
2261: l_new_basis := p_prev_year_adj_rec_cost - p_prev_year_reserve;