APPS.FA_POLISH_PVT dependencies on FA_STD_TYPES

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

1871: -- In an asset's first year of life, it has a specific rate and switch
1872: -- code. In addition, we do not do the switch test in the first year.
1873: if ((p_year_of_life = 1) and (p_Year_Retired = 'N')) then
1874:
1875: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
1876: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
1877:
1878: x_switch_code := '30';
1879:

Line 1876: FA_STD_TYPES.FAD_DBR_POLISH_2)) then

1872: -- code. In addition, we do not do the switch test in the first year.
1873: if ((p_year_of_life = 1) and (p_Year_Retired = 'N')) then
1874:
1875: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
1876: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
1877:
1878: x_switch_code := '30';
1879:
1880: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,

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

1876: FA_STD_TYPES.FAD_DBR_POLISH_2)) then
1877:
1878: x_switch_code := '30';
1879:
1880: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,
1881: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
1882:
1883: x_switch_code := 'DM';
1884:

Line 1881: FA_STD_TYPES.FAD_DBR_POLISH_4)) then

1877:
1878: x_switch_code := '30';
1879:
1880: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_3,
1881: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
1882:
1883: x_switch_code := 'DM';
1884:
1885: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then

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

1881: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
1882:
1883: x_switch_code := 'DM';
1884:
1885: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
1886:
1887: x_switch_code := 'SD';
1888:
1889: else

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

1899: end if;
1900:
1901: -- After the first year, some mechanisms automatically move to a new switch
1902: if ((p_year_of_life > 1) and (p_Year_Retired = 'N')) then
1903: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
1904: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
1905: if (p_Year_Of_Life = 2) then
1906:
1907: -- For 2nd year, rate is adj_rate * deprn_factor

Line 1904: FA_STD_TYPES.FAD_DBR_POLISH_3)) then

1900:
1901: -- After the first year, some mechanisms automatically move to a new switch
1902: if ((p_year_of_life > 1) and (p_Year_Retired = 'N')) then
1903: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
1904: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
1905: if (p_Year_Of_Life = 2) then
1906:
1907: -- For 2nd year, rate is adj_rate * deprn_factor
1908: -- No switch test is done in the second year

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

1915: -- switch and new basis later.
1916: x_switch_code := 'XX';
1917:
1918: end if;
1919: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_2,
1920: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
1921: -- After the first year, rate is adj_rate
1922: -- No switch test is done
1923: x_switch_code := 'FR';

Line 1920: FA_STD_TYPES.FAD_DBR_POLISH_4)) then

1916: x_switch_code := 'XX';
1917:
1918: end if;
1919: elsif (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_2,
1920: FA_STD_TYPES.FAD_DBR_POLISH_4)) then
1921: -- After the first year, rate is adj_rate
1922: -- No switch test is done
1923: x_switch_code := 'FR';
1924: x_adjusted_rate := p_adjusted_rate;

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

1922: -- No switch test is done
1923: x_switch_code := 'FR';
1924: x_adjusted_rate := p_adjusted_rate;
1925:
1926: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
1927: -- For Mech 5, we do the switch test immediately after year 1.
1928: -- We're going to use XX to signify that we'll figure out the
1929: -- switch and new basis later.
1930: x_switch_code := 'XX';

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

2047: --
2048: -- (adjusted_cost - prev_yr_rsv) * deprn_factor <= (adjusted_cost)
2049: --
2050: if (x_switch_code = 'XX') then
2051: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2052: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2053:
2054: -- Switch between D2 and FR
2055:

Line 2052: FA_STD_TYPES.FAD_DBR_POLISH_3)) then

2048: -- (adjusted_cost - prev_yr_rsv) * deprn_factor <= (adjusted_cost)
2049: --
2050: if (x_switch_code = 'XX') then
2051: if (p_Polish_Rule in (FA_STD_TYPES.FAD_DBR_POLISH_1,
2052: FA_STD_TYPES.FAD_DBR_POLISH_3)) then
2053:
2054: -- Switch between D2 and FR
2055:
2056: l_new_basis := p_prev_year_adjusted_cost - p_prev_year_reserve +

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

2067: -- Switch to FR
2068: x_switch_code := 'FR';
2069: end if;
2070:
2071: elsif (p_Polish_Rule = FA_STD_TYPES.FAD_DBR_POLISH_5) then
2072:
2073: -- Switch between SD and FR
2074:
2075: l_new_basis := p_prev_year_adj_rec_cost - p_prev_year_reserve;