DBA Data[Home] [Help]

APPS.FA_CDE_PKG dependencies on FA_STD_TYPES

Line 16: X_dpr_ptr fa_std_types.dpr_struct,

12: g_pre_fyctr fa_fiscal_year.fiscal_year%TYPE;
13:
14:
15: FUNCTION faxgpr (
16: X_dpr_ptr fa_std_types.dpr_struct,
17: X_period fa_std_types.fa_cp_struct,
18: X_projecting_flag BOOLEAN,
19: X_prodn IN OUT NOCOPY NUMBER,
20: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)

Line 17: X_period fa_std_types.fa_cp_struct,

13:
14:
15: FUNCTION faxgpr (
16: X_dpr_ptr fa_std_types.dpr_struct,
17: X_period fa_std_types.fa_cp_struct,
18: X_projecting_flag BOOLEAN,
19: X_prodn IN OUT NOCOPY NUMBER,
20: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
21: RETURN BOOLEAN IS

Line 536: FUNCTION faxcfyf (X_dpr IN OUT NOCOPY fa_std_types.dpr_struct,

532: WHEN OTHERS THEN
533: RETURN (FALSE);
534: END faxgrl;
535:
536: FUNCTION faxcfyf (X_dpr IN OUT NOCOPY fa_std_types.dpr_struct,
537: X_d_pers_per_yr NUMBER,
538: X_rate_source_rule VARCHAR2,
539: X_y_begin NUMBER,
540: X_y_dead NUMBER,

Line 564: h_p_period_fracs fa_std_types.table_fa_cp_struct;

560: p_log_level_rec IN FA_API_TYPES.log_level_rec_type)
561: RETURN BOOLEAN IS
562: h_by_dfrac NUMBER;
563: h_dy_dfrac NUMBER;
564: h_p_period_fracs fa_std_types.table_fa_cp_struct;
565: h_d_period_fracs fa_std_types.table_fa_cp_struct;
566: h_ctr NUMBER;
567: h_b_temp NUMBER;
568: h_d_temp NUMBER;

Line 565: h_d_period_fracs fa_std_types.table_fa_cp_struct;

561: RETURN BOOLEAN IS
562: h_by_dfrac NUMBER;
563: h_dy_dfrac NUMBER;
564: h_p_period_fracs fa_std_types.table_fa_cp_struct;
565: h_d_period_fracs fa_std_types.table_fa_cp_struct;
566: h_ctr NUMBER;
567: h_b_temp NUMBER;
568: h_d_temp NUMBER;
569: h_r_temp NUMBER;

Line 808: X_dp_d_ptr := CEIL ( ROUND ( X_dy_frac * X_d_pers_per_yr,fa_std_types.FA_ROUND_DECIMAL));

804:
805: IF p_pers_per_yr = X_d_pers_per_yr THEN
806: X_dp_d_ptr := X_pp_dead;
807: ELSE
808: X_dp_d_ptr := CEIL ( ROUND ( X_dy_frac * X_d_pers_per_yr,fa_std_types.FA_ROUND_DECIMAL));
809: END IF;
810:
811: h_d_temp := (X_dp_d_ptr - 1) / X_d_pers_per_yr;
812: ELSE

Line 841: IF ROUND (h_d_temp+h_d_period_fracs(i-1).frac, fa_std_types.FA_ROUND_DECIMAL) >=

837: h_dy_dfrac := X_dy_frac;
838: h_d_temp := 0;
839: FOR i IN 1..X_d_pers_per_yr LOOP
840: h_ctr := i;
841: IF ROUND (h_d_temp+h_d_period_fracs(i-1).frac, fa_std_types.FA_ROUND_DECIMAL) >=
842: ROUND ( X_dy_frac,fa_std_types.FA_ROUND_DECIMAL) THEN
843: EXIT;
844: END IF;
845: h_d_temp := h_d_temp + h_d_period_fracs(i-1).frac;

Line 842: ROUND ( X_dy_frac,fa_std_types.FA_ROUND_DECIMAL) THEN

838: h_d_temp := 0;
839: FOR i IN 1..X_d_pers_per_yr LOOP
840: h_ctr := i;
841: IF ROUND (h_d_temp+h_d_period_fracs(i-1).frac, fa_std_types.FA_ROUND_DECIMAL) >=
842: ROUND ( X_dy_frac,fa_std_types.FA_ROUND_DECIMAL) THEN
843: EXIT;
844: END IF;
845: h_d_temp := h_d_temp + h_d_period_fracs(i-1).frac;
846: END LOOP;

Line 1158: FUNCTION faxcde (dpr_in IN OUT NOCOPY fa_std_types.dpr_struct,

1154:
1155: **
1156: */
1157:
1158: FUNCTION faxcde (dpr_in IN OUT NOCOPY fa_std_types.dpr_struct,
1159: dpr_arr IN OUT NOCOPY fa_std_types.dpr_arr_type,
1160: dpr_out IN OUT NOCOPY fa_std_types.dpr_out_struct,
1161: fmode NUMBER,
1162: p_ind BINARY_INTEGER DEFAULT 0,

Line 1159: dpr_arr IN OUT NOCOPY fa_std_types.dpr_arr_type,

1155: **
1156: */
1157:
1158: FUNCTION faxcde (dpr_in IN OUT NOCOPY fa_std_types.dpr_struct,
1159: dpr_arr IN OUT NOCOPY fa_std_types.dpr_arr_type,
1160: dpr_out IN OUT NOCOPY fa_std_types.dpr_out_struct,
1161: fmode NUMBER,
1162: p_ind BINARY_INTEGER DEFAULT 0,
1163: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)

Line 1160: dpr_out IN OUT NOCOPY fa_std_types.dpr_out_struct,

1156: */
1157:
1158: FUNCTION faxcde (dpr_in IN OUT NOCOPY fa_std_types.dpr_struct,
1159: dpr_arr IN OUT NOCOPY fa_std_types.dpr_arr_type,
1160: dpr_out IN OUT NOCOPY fa_std_types.dpr_out_struct,
1161: fmode NUMBER,
1162: p_ind BINARY_INTEGER DEFAULT 0,
1163: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
1164: RETURN BOOLEAN IS

Line 1168: dpr fa_std_types.dpr_struct;

1164: RETURN BOOLEAN IS
1165:
1166: l_calling_fn VARCHAR2(20) := 'faxcde';
1167:
1168: dpr fa_std_types.dpr_struct;
1169: dpr_sub fa_std_types.dpr_struct;
1170: fy_fully_rsv NUMBER(5);
1171: fy_fully_rsv_1 NUMBER;
1172: deprn_perd_fully_rsv NUMBER;

Line 1169: dpr_sub fa_std_types.dpr_struct;

1165:
1166: l_calling_fn VARCHAR2(20) := 'faxcde';
1167:
1168: dpr fa_std_types.dpr_struct;
1169: dpr_sub fa_std_types.dpr_struct;
1170: fy_fully_rsv NUMBER(5);
1171: fy_fully_rsv_1 NUMBER;
1172: deprn_perd_fully_rsv NUMBER;
1173: prate_perd_fully_rsv NUMBER;

Line 1239: period_fracs_single fa_std_types.fa_cp_struct;

1235: last_perd_frac NUMBER;
1236: last_year_frac NUMBER;
1237: ret_perd_frac NUMBER;
1238: ret_year_frac NUMBER;
1239: period_fracs_single fa_std_types.fa_cp_struct;
1240: perds_fracs_arr fa_std_types.table_fa_cp_struct;
1241: nbv_absval NUMBER;
1242: rec_cost_absval NUMBER;
1243: adj_rec_cost_absval NUMBER;

Line 1240: perds_fracs_arr fa_std_types.table_fa_cp_struct;

1236: last_year_frac NUMBER;
1237: ret_perd_frac NUMBER;
1238: ret_year_frac NUMBER;
1239: period_fracs_single fa_std_types.fa_cp_struct;
1240: perds_fracs_arr fa_std_types.table_fa_cp_struct;
1241: nbv_absval NUMBER;
1242: rec_cost_absval NUMBER;
1243: adj_rec_cost_absval NUMBER;
1244: rsv_absval NUMBER;

Line 1285: h_dummy_dpr fa_std_types.dpr_arr_type;

1281: prior_fy_bonus_exp_sum NUMBER;
1282: excl_sal_val_flag BOOLEAN;
1283: ann_rounding_mode INTEGER;
1284: h_dummy NUMBER;
1285: h_dummy_dpr fa_std_types.dpr_arr_type;
1286: h_dummy_bool BOOLEAN;
1287: success INTEGER;
1288: ceiling_diff_amt NUMBER;
1289: deprn_override_flag VARCHAR2(1);

Line 1538: deprn_projecting_flag := (fmode = fa_std_types.FA_DPR_PROJECT);

1534: use_deprn_limit_flag := FALSE;
1535: adj_rec_cost := dpr_in.rec_cost;
1536: END IF;
1537:
1538: deprn_projecting_flag := (fmode = fa_std_types.FA_DPR_PROJECT);
1539:
1540: --
1541: -- Get the following information from the FA_BOOK_CONTROLS cache
1542: -- 1. Rate Calendar

Line 1554: fa_std_types.FA_DEF_NBV_FRAC);

1550: -- BUG# 4027981 - use the mrc enabled cache for nbv_amount_threshold
1551:
1552: prorate_calendar := fa_cache_pkg.fazcbc_record.PRORATE_CALENDAR;
1553: nbv_frac_thresh := NVL(fa_cache_pkg.fazcbc_record.NBV_FRACTION_THRESHOLD,
1554: fa_std_types.FA_DEF_NBV_FRAC);
1555: nbv_amt_thresh := NVL(fa_cache_pkg.fazcbcs_record.NBV_AMOUNT_THRESHOLD,
1556: fa_std_types.FA_DEF_NBV_AMT);
1557: amo_reval_rsv_flag := (fa_cache_pkg.fazcbc_record.AMORTIZE_REVAL_RESERVE_FLAG = 'YES');
1558: fy_name := fa_cache_pkg.fazcbc_record.FISCAL_YEAR_NAME;

Line 1556: fa_std_types.FA_DEF_NBV_AMT);

1552: prorate_calendar := fa_cache_pkg.fazcbc_record.PRORATE_CALENDAR;
1553: nbv_frac_thresh := NVL(fa_cache_pkg.fazcbc_record.NBV_FRACTION_THRESHOLD,
1554: fa_std_types.FA_DEF_NBV_FRAC);
1555: nbv_amt_thresh := NVL(fa_cache_pkg.fazcbcs_record.NBV_AMOUNT_THRESHOLD,
1556: fa_std_types.FA_DEF_NBV_AMT);
1557: amo_reval_rsv_flag := (fa_cache_pkg.fazcbc_record.AMORTIZE_REVAL_RESERVE_FLAG = 'YES');
1558: fy_name := fa_cache_pkg.fazcbc_record.FISCAL_YEAR_NAME;
1559: cur_fy := fa_cache_pkg.fazcbc_record.CURRENT_FISCAL_YEAR;
1560:

Line 1862: IF NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <>

1858:
1859: --
1860: -- Override depreciation functionality
1861: --
1862: IF NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <>
1863: fa_std_types.FA_OVERRIDE_RECURSIVE THEN
1864: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
1865: END IF;
1866:

Line 1863: fa_std_types.FA_OVERRIDE_RECURSIVE THEN

1859: --
1860: -- Override depreciation functionality
1861: --
1862: IF NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <>
1863: fa_std_types.FA_OVERRIDE_RECURSIVE THEN
1864: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
1865: END IF;
1866:
1867: -- Added the Below code to take care of the Bug# 7277598

Line 1864: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

1860: -- Override depreciation functionality
1861: --
1862: IF NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <>
1863: fa_std_types.FA_OVERRIDE_RECURSIVE THEN
1864: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
1865: END IF;
1866:
1867: -- Added the Below code to take care of the Bug# 7277598
1868: -- Below Query will fetch the program short name from the Conc Request Summary.

Line 2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,

2191:
2192: ELSIF (dpr_cur_fy_flag AND flat_rate_src_flag) THEN
2193:
2194: -- Bug 3187975. If Polish method, use special rate logic
2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,
2196: FA_STD_TYPES.FAD_DBR_POLISH_2,
2197: FA_STD_TYPES.FAD_DBR_POLISH_3,
2198: FA_STD_TYPES.FAD_DBR_POLISH_4,
2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN

Line 2196: FA_STD_TYPES.FAD_DBR_POLISH_2,

2192: ELSIF (dpr_cur_fy_flag AND flat_rate_src_flag) THEN
2193:
2194: -- Bug 3187975. If Polish method, use special rate logic
2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,
2196: FA_STD_TYPES.FAD_DBR_POLISH_2,
2197: FA_STD_TYPES.FAD_DBR_POLISH_3,
2198: FA_STD_TYPES.FAD_DBR_POLISH_4,
2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN
2200:

Line 2197: FA_STD_TYPES.FAD_DBR_POLISH_3,

2193:
2194: -- Bug 3187975. If Polish method, use special rate logic
2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,
2196: FA_STD_TYPES.FAD_DBR_POLISH_2,
2197: FA_STD_TYPES.FAD_DBR_POLISH_3,
2198: FA_STD_TYPES.FAD_DBR_POLISH_4,
2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN
2200:
2201: l_rate := dpr.adj_rate;

Line 2198: FA_STD_TYPES.FAD_DBR_POLISH_4,

2194: -- Bug 3187975. If Polish method, use special rate logic
2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,
2196: FA_STD_TYPES.FAD_DBR_POLISH_2,
2197: FA_STD_TYPES.FAD_DBR_POLISH_3,
2198: FA_STD_TYPES.FAD_DBR_POLISH_4,
2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN
2200:
2201: l_rate := dpr.adj_rate;
2202:

Line 2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN

2195: IF (l_polish_rule IN (FA_STD_TYPES.FAD_DBR_POLISH_1,
2196: FA_STD_TYPES.FAD_DBR_POLISH_2,
2197: FA_STD_TYPES.FAD_DBR_POLISH_3,
2198: FA_STD_TYPES.FAD_DBR_POLISH_4,
2199: FA_STD_TYPES.FAD_DBR_POLISH_5)) THEN
2200:
2201: l_rate := dpr.adj_rate;
2202:
2203: fa_cde_pkg.faxgpolr (

Line 2311: rate_adj_factor := fa_std_types.FA_DPR_SMALL_RAF;

2307: --
2308: -- If RAF = 0, then use a very small RAF
2309: -- so we don't divide by zero
2310: --
2311: rate_adj_factor := fa_std_types.FA_DPR_SMALL_RAF;
2312: ELSE
2313: rate_adj_factor := dpr.rate_adj_factor;
2314: END IF;
2315: --code fix for bug no.3909805. dpr.formula_factor can have null value.

Line 2813: -- Added condition dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE

2809: --
2810: -- Bug 3270280
2811: -- if ret_fy_flag then
2812: -- Bug3961991
2813: -- Added condition dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE
2814: -- so that following condition will not be true during recursive call.
2815: IF ((ret_fy_flag) AND (NOT depr_last_year_flag) OR (ret_fy_flag AND first_fy_flag)) AND
2816: dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN
2817:

Line 2816: dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN

2812: -- Bug3961991
2813: -- Added condition dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE
2814: -- so that following condition will not be true during recursive call.
2815: IF ((ret_fy_flag) AND (NOT depr_last_year_flag) OR (ret_fy_flag AND first_fy_flag)) AND
2816: dpr_in.deprn_override_flag <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN
2817:
2818: deprn_start_perd := ret_period_dcal;
2819: deprn_end_perd := ret_period_dcal;
2820:

Line 2888: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

2884: -- Commented out and moved period loop for period update method
2885: -- This is the point where for loop for each period located
2886: -- for perd_ctr in deprn_start_perd .. deprn_end_perd loop
2887: -- ************************************************************
2888: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
2889:
2890: --
2891: -- actual_deprn_start_perd is the first period in this fy
2892: -- for which the depreciation can be non-zero.

Line 3133: NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN

3129: fa_debug_pkg.ADD('faxcde', 'FA_DEPRN_OVERRIDE_ENABLED', whatif_override_enable, p_log_level_rec => p_log_level_rec);
3130: END IF;
3131:
3132: IF whatif_override_enable = 'Y' AND
3133: NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE) <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN
3134: l_bonus_ytd_deprn := 0;
3135:
3136: IF fyctr = dpr.y_begin THEN
3137: l_ytd_deprn := dpr_in.ytd_deprn;

Line 3156: if (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) then

3152: fa_debug_pkg.ADD('faxcde', 'fadpdp: dpr_in.override_period_counter',dpr_in.override_period_counter, p_log_level_rec => p_log_level_rec);
3153: END IF;
3154:
3155: /*Bug# - 8487934 */
3156: if (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) then
3157: l_over_depreciate_option := 2;
3158: elsif (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_NO) then
3159: l_over_depreciate_option := 1;
3160: else

Line 3158: elsif (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_NO) then

3154:
3155: /*Bug# - 8487934 */
3156: if (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) then
3157: l_over_depreciate_option := 2;
3158: elsif (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_NO) then
3159: l_over_depreciate_option := 1;
3160: else
3161: l_over_depreciate_option := 0;
3162: end if;

Line 3191: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

3187: , dpr.override_period_counter
3188: , p_log_level_rec) THEN
3189:
3190: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faooda', p_log_level_rec => p_log_level_rec);
3191: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
3192: RETURN(FALSE);
3193:
3194: END IF;
3195:

Line 3204: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

3200:
3201: -- Bug#7953789 - start
3202: if return_code = 2 then
3203: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faooda', p_log_level_rec => p_log_level_rec);
3204: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
3205: end if;
3206: -- Bug#7953789 end
3207:
3208: END IF; -- value = 'Y' and

Line 3230: -- dpr.deprn_rounding_flag:= fa_std_types.FA_DPR_ROUND_RES;

3226: --
3227: -- This is set appropriately in what-if so take what is passed
3228: -- to faxcde. or apply this only for the first year.
3229: --if deprn_projecting_flag then
3230: -- dpr.deprn_rounding_flag:= fa_std_types.FA_DPR_ROUND_RES;
3231: --end if;
3232:
3233: -- Bug #2686687
3234: -- Annual rounding should be performed if current period is

Line 3240: (deprn_override_flag = fa_std_types.FA_NO_OVERRIDE OR

3236: -- when there was no override; OR
3237: -- when overridden only bonus depreciation amount
3238:
3239: IF (perd_ctr=perds_per_yr_dcal AND
3240: (deprn_override_flag = fa_std_types.FA_NO_OVERRIDE OR
3241: deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS) AND
3242: NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='N' AND
3243: NVL(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') ='N') THEN
3244:

Line 3241: deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS) AND

3237: -- when overridden only bonus depreciation amount
3238:
3239: IF (perd_ctr=perds_per_yr_dcal AND
3240: (deprn_override_flag = fa_std_types.FA_NO_OVERRIDE OR
3241: deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS) AND
3242: NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='N' AND
3243: NVL(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') ='N') THEN
3244:
3245: IF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD OR

Line 3245: IF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD OR

3241: deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS) AND
3242: NVL(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') ='N' AND
3243: NVL(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') ='N') THEN
3244:
3245: IF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD OR
3246: dpr.deprn_rounding_flag IS NULL) THEN
3247: --
3248: -- Go into following logic if this is group (except sumup) or calculating member
3249: --

Line 3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR

3300: (NVL(dpr.prior_fy_bonus_exp,0) + prior_fy_bonus_exp_sum)));
3301: END IF;
3302: END IF; -- (nvl(dpr.asset_type, 'CAPITALIZED') = 'GROUP' and ..
3303:
3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR
3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR

Line 3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR

3301: END IF;
3302: END IF; -- (nvl(dpr.asset_type, 'CAPITALIZED') = 'GROUP' and ..
3303:
3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR
3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR
3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN

Line 3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR

3302: END IF; -- (nvl(dpr.asset_type, 'CAPITALIZED') = 'GROUP' and ..
3303:
3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR
3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR
3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN
3310:

Line 3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR

3303:
3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR
3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR
3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN
3310:
3311: IF ann_rounding_mode=ROUND_ALWAYS THEN

Line 3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR

3304: ELSIF (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADJ OR
3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR
3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN
3310:
3311: IF ann_rounding_mode=ROUND_ALWAYS THEN
3312: dpr_sub:= dpr_in;

Line 3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN

3305: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RET OR
3306: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_REV OR
3307: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_TFR OR
3308: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_RES OR
3309: dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_OVE) THEN
3310:
3311: IF ann_rounding_mode=ROUND_ALWAYS THEN
3312: dpr_sub:= dpr_in;
3313: dpr_sub.bonus_deprn_rsv:= 0;

Line 3323: dpr_sub.deprn_override_flag:= fa_std_types.FA_OVERRIDE_RECURSIVE;

3319: dpr_sub.y_end:= fyctr;
3320: dpr_sub.p_cl_begin:= 1;
3321: dpr_sub.p_cl_end:= perds_per_yr_dcal - 1;
3322:
3323: dpr_sub.deprn_override_flag:= fa_std_types.FA_OVERRIDE_RECURSIVE;
3324:
3325: -- Bug3493721:
3326: -- Rounding should always be done during recursive call
3327: ----Bug#10411858:Recursive_flag set to true before recalculating reserve

Line 3384: END IF; -- (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD or

3380: value2 => dpr.deprn_rounding_flag,
3381: TRANSLATE => FALSE,
3382: p_log_level_rec => p_log_level_rec);
3383: RETURN (FALSE);
3384: END IF; -- (dpr.deprn_rounding_flag = fa_std_types.FA_DPR_ROUND_ADD or
3385:
3386: --
3387: -- Debug
3388: --

Line 3529: IF (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) THEN

3525:
3526: END IF; -- (deprn_projecting_flag or
3527:
3528: -- perform override depreciation for each uploaded data from the interface table
3529: IF (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) THEN
3530:
3531: --Bug 5657699
3532: SELECT adjusted_cost
3533: INTO l_temp_adj_cost

Line 3552: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS OR

3548: fa_debug_pkg.ADD('faxcde', 'perd_bonus_deprn_amount(default)', perd_bonus_deprn_amount);
3549: END IF;
3550: END IF;
3551:
3552: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS OR
3553: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN
3554: perd_deprn_exp:= perd_deprn_exp - NVL(perd_bonus_deprn_amount, 0);
3555: perd_bonus_deprn_amount:= NVL(override_bonus_amt,0);
3556: END IF;

Line 3553: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN

3549: END IF;
3550: END IF;
3551:
3552: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_BONUS OR
3553: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN
3554: perd_deprn_exp:= perd_deprn_exp - NVL(perd_bonus_deprn_amount, 0);
3555: perd_bonus_deprn_amount:= NVL(override_bonus_amt,0);
3556: END IF;
3557:

Line 3558: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR OR

3554: perd_deprn_exp:= perd_deprn_exp - NVL(perd_bonus_deprn_amount, 0);
3555: perd_bonus_deprn_amount:= NVL(override_bonus_amt,0);
3556: END IF;
3557:
3558: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR OR
3559: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN
3560:
3561: IF NVL(dpr.bonus_rule, 'NONE') <> 'NONE' THEN
3562: perd_deprn_exp:= override_depr_amt + NVL(perd_bonus_deprn_amount,0);

Line 3559: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN

3555: perd_bonus_deprn_amount:= NVL(override_bonus_amt,0);
3556: END IF;
3557:
3558: IF deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR OR
3559: deprn_override_flag = fa_std_types.FA_OVERRIDE_DPR_BONUS THEN
3560:
3561: IF NVL(dpr.bonus_rule, 'NONE') <> 'NONE' THEN
3562: perd_deprn_exp:= override_depr_amt + NVL(perd_bonus_deprn_amount,0);
3563: ELSE

Line 3588: END IF; -- (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) then

3584: perd_bonus_deprn_amount := 0;
3585:
3586: END IF; -- Bug 5657699
3587:
3588: END IF; -- (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) then
3589: -- End of override depreciation logic
3590:
3591: --
3592: -- If the remaining depreciation is small (absolutely OR

Line 3628: IF deprn_override_flag = fa_std_types.FA_NO_OVERRIDE THEN

3624: --
3625: -- Check the NBV against the constant value, and then
3626: -- against the fraction of the Adjusted Recoverable Cost
3627: --
3628: IF deprn_override_flag = fa_std_types.FA_NO_OVERRIDE THEN
3629: IF (nbv_absval < nbv_amt_thresh) OR
3630: (nbv_absval < nbv_frac_thresh * adj_rec_cost_absval) THEN
3631: last_period_deprn_exp := adj_rec_cost - (cur_deprn_rsv + NVL(year_deprn_exp,0));
3632:

Line 3659: END IF; -- deprn_override_flag = fa_std_types.FA_NO_OVERRIDE then

3655: END IF; -- (nbv_deprn_basis_flag and (deprn_end_perd = perds_per_yr_dcal)) then
3656:
3657: END IF; -- (nbv_absval < nbv_amt_thresh) or
3658:
3659: END IF; -- deprn_override_flag = fa_std_types.FA_NO_OVERRIDE then
3660:
3661: ELSE
3662: perd_deprn_exp := 0;
3663: perd_bonus_deprn_amount := 0;

Line 3747: IF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) THEN

3743: -- retired, or depreciate flag is unchecked.
3744: --
3745: -- NOTE: All life base methods will not value other than
3746: -- FA_OVER_DEPR_NULL or FA_OVER_DEPR_NO.
3747: IF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) THEN
3748:
3749: -- BUg3315683:
3750: -- Group could have situation whether rsv_absval is greater than adj_rec_cost_absval
3751: -- but still not fully reserved because rsv is -ve and adj_rec_cost is +ve.

Line 3798: ELSIF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_DEPRN) THEN

3794: dpr_out.life_comp_flag :=FALSE;
3795:
3796: END IF;
3797:
3798: ELSIF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_DEPRN) THEN
3799: -- continue depreciating
3800: NULL;
3801: ELSE
3802:

Line 3837: IF (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) AND

3833: -- always equal to adjusted recoverable cost
3834: --
3835: IF adj_rec_cost_absval <= l_adjusted_rsv_absval THEN -- Bug fix 5893429 (replaced rsv_absval with l_adjusted_rsv_absval)
3836:
3837: IF (deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE) AND
3838: (adj_rec_cost_absval < rsv_absval) AND
3839: NOT (deprn_projecting_flag) THEN
3840:
3841: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',

Line 3844: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

3840:
3841: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
3842: name => 'FA_OVER_DEPRN_LIMIT',
3843: TRANSLATE=> FALSE, p_log_level_rec => p_log_level_rec);
3844: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
3845: RETURN(FALSE);
3846: END IF;
3847:
3848: dpr_out.full_rsv_flag := TRUE;

Line 3866: END IF; -- (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) then

3862: dpr_out.full_rsv_flag := FALSE;
3863: dpr_out.life_comp_flag :=FALSE;
3864: END IF; -- adj_rec_cost_absval <= rsv_absval then
3865:
3866: END IF; -- (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) then
3867:
3868: --
3869: -- If the Depreciate_Flag is 'NO', then don't depreciate
3870: --

Line 3873: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE THEN

3869: -- If the Depreciate_Flag is 'NO', then don't depreciate
3870: --
3871: IF NOT dpr_cur_fy_flag THEN
3872:
3873: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE THEN
3874:
3875: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
3876: name => 'FA_NO_DEPRECIATION',
3877: TRANSLATE => FALSE,

Line 3879: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

3875: fa_srvr_msg.add_message(calling_fn => 'fa_cde_pkg.faxcde',
3876: name => 'FA_NO_DEPRECIATION',
3877: TRANSLATE => FALSE,
3878: p_log_level_rec => p_log_level_rec);
3879: dpr_out.deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
3880: RETURN(FALSE);
3881: ELSE
3882: perd_deprn_exp := 0;
3883: perd_bonus_deprn_amount := 0;

Line 3912: IF deprn_override_flag = fa_std_types.FA_NO_OVERRIDE THEN

3908: -- End of Addition BUG# 7277598
3909:
3910: IF dpr_out.full_rsv_flag THEN
3911:
3912: IF deprn_override_flag = fa_std_types.FA_NO_OVERRIDE THEN
3913:
3914: IF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) THEN
3915:
3916: IF (SIGN(adj_rec_cost) < 0 AND

Line 3914: IF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) THEN

3910: IF dpr_out.full_rsv_flag THEN
3911:
3912: IF deprn_override_flag = fa_std_types.FA_NO_OVERRIDE THEN
3913:
3914: IF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_YES) THEN
3915:
3916: IF (SIGN(adj_rec_cost) < 0 AND
3917: (adj_rec_cost > (cur_deprn_rsv + NVL(year_deprn_exp,0)+ l_rsv_adj))) OR
3918: (SIGN(cur_deprn_rsv + NVL(year_deprn_exp,0)+ l_rsv_adj) > 0 AND

Line 3925: ELSIF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_DEPRN) THEN

3921: ELSE
3922: perd_deprn_exp := adj_rec_cost - (cur_deprn_rsv + NVL(year_deprn_exp,0)+ l_rsv_adj);
3923: END IF;
3924:
3925: ELSIF (dpr.over_depreciate_option = fa_std_types.FA_OVER_DEPR_DEPRN) THEN
3926: NULL;
3927: ELSE
3928: IF (SIGN(adj_rec_cost) < 0 AND
3929: (adj_rec_cost > (cur_deprn_rsv + NVL(year_deprn_exp,0)+ l_rsv_adj))) OR

Line 3980: END IF; -- deprn_override_flag = fa_std_types.FA_NO_OVERRIDE then

3976: -- According to hld, no bonus deprn amount should be charged in last period of life.
3977: -- Effects should be tested.
3978: perd_bonus_deprn_amount := 0;
3979:
3980: END IF; -- deprn_override_flag = fa_std_types.FA_NO_OVERRIDE then
3981:
3982: IF prod_rate_src_flag THEN
3983: --
3984: -- Reset to FALSE for Production-Based assets, because

Line 4003: NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE)

3999: h_dummy_bool := fa_utils_pkg.faxrnd (perd_bonus_deprn_amount, dpr.book, dpr.set_of_books_id, p_log_level_rec => p_log_level_rec);
4000: END IF;
4001:
4002: IF NVL(dpr.tracking_method,'OTHER') = 'ALLOCATE' AND
4003: NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE)
4004: <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN
4005:
4006: -- Check if subtract ytd flag is enabled or not
4007: IF NVL(p_subtract_ytd_flag,'N') = 'Y' THEN

Line 4004: <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN

4000: END IF;
4001:
4002: IF NVL(dpr.tracking_method,'OTHER') = 'ALLOCATE' AND
4003: NVL(dpr_in.deprn_override_flag, fa_std_types.FA_NO_OVERRIDE)
4004: <> fa_std_types.FA_OVERRIDE_RECURSIVE THEN
4005:
4006: -- Check if subtract ytd flag is enabled or not
4007: IF NVL(p_subtract_ytd_flag,'N') = 'Y' THEN
4008:

Line 4133: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE AND NOT (deprn_projecting_flag) THEN

4129: dpr_arr(dpr_arr_ctr).period_num := perd_ctr;
4130: dpr_arr(dpr_arr_ctr).fiscal_year := fyctr;
4131:
4132: -- Manual Override
4133: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE AND NOT (deprn_projecting_flag) THEN
4134: dpr_out.deprn_override_flag:= deprn_override_flag;
4135: END IF;
4136: -- End of Manual Override
4137:

Line 4681: X_dpr IN fa_std_types.dpr_struct

4677: END FAXCDE;
4678:
4679: FUNCTION faprds
4680: (
4681: X_dpr IN fa_std_types.dpr_struct
4682: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type)
4683: RETURN BOOLEAN IS
4684: BEGIN <>
4685:

Line 4743: FUNCTION faprdos (X_dpr IN fa_std_types.dpr_out_struct,

4739: RETURN (FALSE);
4740:
4741: END FAPRDS;
4742:
4743: FUNCTION faprdos (X_dpr IN fa_std_types.dpr_out_struct,
4744: p_log_level_rec IN FA_API_TYPES.log_level_rec_type)
4745: RETURN BOOLEAN IS
4746:
4747: BEGIN <>

Line 4848: deprn_summary fa_std_types.fa_deprn_row_struct;

4844: h_reporting_flag VARCHAR2(1);
4845: h_asset_id NUMBER(15);
4846: h_deprn_override_id NUMBER(15);
4847: h_success BOOLEAN;
4848: deprn_summary fa_std_types.fa_deprn_row_struct;
4849: perd_name VARCHAR2(15);
4850: report_cost NUMBER;
4851: l_exchange_rate NUMBER;
4852: l_avg_rate NUMBER;

Line 5090: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;

5086: END IF;
5087:
5088: IF override_depr_amt IS NOT NULL THEN
5089:
5090: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;
5091: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;
5092:
5093: IF (h_reporting_flag = 'R') THEN
5094: override_depr_amt:= override_depr_amt * l_avg_rate;

Line 5091: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;

5087:
5088: IF override_depr_amt IS NOT NULL THEN
5089:
5090: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;
5091: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR;
5092:
5093: IF (h_reporting_flag = 'R') THEN
5094: override_depr_amt:= override_depr_amt * l_avg_rate;
5095: -- Bug 10085448 : Round the value

Line 5102: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR_BONUS;

5098: END IF;
5099:
5100: IF override_bonus_amt IS NOT NULL AND NOT(prod_rate_src_flag) THEN
5101:
5102: deprn_override_flag:= fa_std_types.FA_OVERRIDE_DPR_BONUS;
5103:
5104: IF (h_reporting_flag = 'R') THEN
5105: override_bonus_amt:= override_bonus_amt * l_avg_rate;
5106: -- Bug 10085448 : Round the value

Line 5115: deprn_override_flag:= fa_std_types.FA_OVERRIDE_BONUS;

5111: END IF;
5112:
5113: ELSIF override_bonus_amt IS NOT NULL AND NOT(prod_rate_src_flag) THEN
5114:
5115: deprn_override_flag:= fa_std_types.FA_OVERRIDE_BONUS;
5116:
5117: IF (h_reporting_flag = 'R') THEN
5118: override_bonus_amt:= override_bonus_amt * l_avg_rate;
5119: -- Bug 10085448 : Round the value

Line 5125: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

5121: p_set_of_books_id, p_log_level_rec => p_log_level_rec);
5122: END IF;
5123:
5124: ELSE
5125: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
5126: END IF;
5127:
5128: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE AND
5129: NOT (deprn_projecting_flag) AND

Line 5128: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE AND

5124: ELSE
5125: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
5126: END IF;
5127:
5128: IF deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE AND
5129: NOT (deprn_projecting_flag) AND
5130: h_reporting_flag = 'P' THEN
5131:
5132: -- Bug 8211842: Update the status only if it is not

Line 5136: fa_std_types.deprn_override_trigger_enabled:= FALSE;

5132: -- Bug 8211842: Update the status only if it is not
5133: -- posted depreciation overrrides
5134: if not l_posted_deprn and nvl(deprn_override_used_by, 'DEP') <> 'PRE' then --16275774
5135:
5136: fa_std_types.deprn_override_trigger_enabled:= FALSE;
5137:
5138: IF nvl(deprn_override_used_by, 'DEP') <> 'ADJ' THEN --Bug11886090
5139: UPDATE fa_deprn_override
5140: SET status = 'POSTED'

Line 5150: fa_std_types.deprn_override_trigger_enabled:= TRUE;

5146: WHERE deprn_override_id = h_deprn_override_id;
5147:
5148: END IF;
5149:
5150: fa_std_types.deprn_override_trigger_enabled:= TRUE;
5151:
5152: end if;
5153:
5154: END IF;

Line 5183: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

5179: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
5180: RETURN(FALSE);
5181:
5182: WHEN NO_DATA_FOUND THEN
5183: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
5184: return_code:= 5;
5185: RETURN(TRUE);
5186:
5187: WHEN OTHERS THEN

Line 5188: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;

5184: return_code:= 5;
5185: RETURN(TRUE);
5186:
5187: WHEN OTHERS THEN
5188: deprn_override_flag:= fa_std_types.FA_NO_OVERRIDE;
5189: return_code:= 6;
5190: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
5191: RETURN(TRUE);
5192:

Line 5204: FUNCTION fatrkm(p_dpr IN fa_std_types.dpr_struct,

5200: -- Main entry to call Tracking feature
5201: -- This function will call TRACK_MEMBER function
5202: --
5203: ------------------------------------------------------------------
5204: FUNCTION fatrkm(p_dpr IN fa_std_types.dpr_struct,
5205: p_perd_deprn_exp IN NUMBER,
5206: p_perd_bonus_deprn_amount IN NUMBER,
5207: p_perd_ctr IN NUMBER,
5208: p_fyctr IN NUMBER,

Line 5278: IF p_deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE THEN

5274: h_excess_alloc_option := p_dpr.excess_allocation_option;
5275: h_depreciation_option := p_dpr.depreciation_option;
5276: h_member_rollup_flag := p_dpr.member_rollup_flag;
5277:
5278: IF p_deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE THEN
5279: h_group_override := 'Y';
5280: ELSE
5281: h_group_override := 'N';
5282: END IF;