1329: l_ind BINARY_INTEGER; -- For FA_BOOKS_SUMMARY
1330: l_accum_rsv_adj NUMBER; -- Store reserve adjustment_amount.
1331: -- It will be accumulated if faxcde is called for
1332: -- multiple periods
1333: l_rsv_adj NUMBER; -- Store reserve adjustment amount from fa_amort_pvt
1334: -- that exclude the amount of period faxcde is called
1335: -- so that it can be used when validating fully reserve or not.
1336:
1337: l_temp_adj_cost NUMBER; --Bug 5657699
3685: -- accumulated reserve adjsutment amount to verify whether the asset
3686: -- is fully reserved or not.
3687: --
3688: IF ((l_ind <> 0) AND
3689: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'Y')) THEN
3690: l_accum_rsv_adj := 0;
3691: l_rsv_adj := 0;
3692: ELSIF ((l_ind <> 0) AND
3693: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'N')) THEN
3689: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'Y')) THEN
3690: l_accum_rsv_adj := 0;
3691: l_rsv_adj := 0;
3692: ELSIF ((l_ind <> 0) AND
3693: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'N')) THEN
3694: l_accum_rsv_adj := NVL(l_accum_rsv_adj, 0) +
3695: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
3696: l_rsv_adj := l_accum_rsv_adj;
3697: ELSE
3691: l_rsv_adj := 0;
3692: ELSIF ((l_ind <> 0) AND
3693: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'N')) THEN
3694: l_accum_rsv_adj := NVL(l_accum_rsv_adj, 0) +
3695: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
3696: l_rsv_adj := l_accum_rsv_adj;
3697: ELSE
3698: l_rsv_adj := 0;
3699: END IF;
3703: -- consider reserve_adjustment_amount when calculating absolute
3704: -- value of reserve
3705: --
3706: IF (l_ind <> 0) AND
3707: (fa_amort_pvt.t_reset_adjusted_cost_flag(l_ind) = 'N') THEN
3708:
3709: rsv_absval := ABS (cur_deprn_rsv + year_deprn_exp +
3710: perd_deprn_exp + l_rsv_adj);
3711: ELSE
4254: -- Maintain Books Summary Table
4255: --
4256: IF (p_log_level_rec.statement_level) THEN
4257: fa_debug_pkg.ADD('faxcde','Maintain Books Summary Table',
4258: TO_CHAR(l_ind)||':'||TO_CHAR(fa_amort_pvt.t_deprn_amount.COUNT));
4259: END IF;
4260:
4261: IF (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4262:
4257: fa_debug_pkg.ADD('faxcde','Maintain Books Summary Table',
4258: TO_CHAR(l_ind)||':'||TO_CHAR(fa_amort_pvt.t_deprn_amount.COUNT));
4259: END IF;
4260:
4261: IF (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4262:
4263: IF (nbv_deprn_basis_flag AND excl_sal_val_flag) THEN
4264: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost - dpr.salvage_value;
4265: ELSE
4260:
4261: IF (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4262:
4263: IF (nbv_deprn_basis_flag AND excl_sal_val_flag) THEN
4264: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost - dpr.salvage_value;
4265: ELSE
4266: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost;
4267: END IF;
4268:
4262:
4263: IF (nbv_deprn_basis_flag AND excl_sal_val_flag) THEN
4264: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost - dpr.salvage_value;
4265: ELSE
4266: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost;
4267: END IF;
4268:
4269: fa_amort_pvt.t_adjusted_capacity(l_ind + 1) := dpr.adj_capacity; --Bug7487450
4270:
4265: ELSE
4266: fa_amort_pvt.t_adjusted_cost(l_ind + 1) := cur_adj_cost;
4267: END IF;
4268:
4269: fa_amort_pvt.t_adjusted_capacity(l_ind + 1) := dpr.adj_capacity; --Bug7487450
4270:
4271: fa_amort_pvt.t_formula_factor(l_ind + 1) := dpr.formula_factor;
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4267: END IF;
4268:
4269: fa_amort_pvt.t_adjusted_capacity(l_ind + 1) := dpr.adj_capacity; --Bug7487450
4270:
4271: fa_amort_pvt.t_formula_factor(l_ind + 1) := dpr.formula_factor;
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4274: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4268:
4269: fa_amort_pvt.t_adjusted_capacity(l_ind + 1) := dpr.adj_capacity; --Bug7487450
4270:
4271: fa_amort_pvt.t_formula_factor(l_ind + 1) := dpr.formula_factor;
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4274: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4270:
4271: fa_amort_pvt.t_formula_factor(l_ind + 1) := dpr.formula_factor;
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4274: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4277:
4278: IF (l_ind = 1) THEN
4271: fa_amort_pvt.t_formula_factor(l_ind + 1) := dpr.formula_factor;
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4274: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4277:
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4272: fa_amort_pvt.t_deprn_amount(l_ind) :=
4273: perd_deprn_exp +
4274: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4277:
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4275: fa_amort_pvt.t_bonus_deprn_amount(l_ind) := perd_bonus_deprn_amount;
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4277:
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4276: fa_amort_pvt.t_production(l_ind) := nvl(perd_prod, 0); --Bug7487450
4277:
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4277:
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4278: IF (l_ind = 1) THEN
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4279: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4280: fa_amort_pvt.t_deprn_amount(l_ind) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4281: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4282: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) := perd_bonus_deprn_amount;
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4283: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4284: fa_amort_pvt.t_impairment_amount(l_ind);
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4285: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4286: ELSE
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4287: fa_amort_pvt.t_deprn_reserve(l_ind) :=
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4288: fa_amort_pvt.t_deprn_reserve(l_ind - 1) +
4289: fa_amort_pvt.t_deprn_amount(l_ind) +
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4290: fa_amort_pvt.t_reserve_adjustment_amount(l_ind);
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4297: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_ltd_production(l_ind - 1 ) +
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4291: fa_amort_pvt.t_bonus_deprn_reserve(l_ind) :=
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4297: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_ltd_production(l_ind - 1 ) +
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4299: END IF;
4292: fa_amort_pvt.t_bonus_deprn_reserve(l_ind- 1) +
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4297: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_ltd_production(l_ind - 1 ) +
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4299: END IF;
4300:
4293: perd_bonus_deprn_amount;
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4297: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_ltd_production(l_ind - 1 ) +
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4299: END IF;
4300:
4301: IF dpr.bonus_rule IS NULL THEN
4294: fa_amort_pvt.t_impairment_reserve(l_ind) :=
4295: fa_amort_pvt.t_impairment_reserve(l_ind - 1) +
4296: fa_amort_pvt.t_impairment_amount(l_ind);
4297: fa_amort_pvt.t_ltd_production(l_ind) := fa_amort_pvt.t_ltd_production(l_ind - 1 ) +
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4299: END IF;
4300:
4301: IF dpr.bonus_rule IS NULL THEN
4302: fa_amort_pvt.t_bonus_rate(l_ind) := NULL;
4298: fa_amort_pvt.t_production(l_ind); --Bug7487450
4299: END IF;
4300:
4301: IF dpr.bonus_rule IS NULL THEN
4302: fa_amort_pvt.t_bonus_rate(l_ind) := NULL;
4303: ELSE
4304: fa_amort_pvt.t_bonus_rate(l_ind) := dpr_out.bonus_rate_used;
4305: END IF;
4306:
4300:
4301: IF dpr.bonus_rule IS NULL THEN
4302: fa_amort_pvt.t_bonus_rate(l_ind) := NULL;
4303: ELSE
4304: fa_amort_pvt.t_bonus_rate(l_ind) := dpr_out.bonus_rate_used;
4305: END IF;
4306:
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4303: ELSE
4304: fa_amort_pvt.t_bonus_rate(l_ind) := dpr_out.bonus_rate_used;
4305: END IF;
4306:
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4304: fa_amort_pvt.t_bonus_rate(l_ind) := dpr_out.bonus_rate_used;
4305: END IF;
4306:
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4305: END IF;
4306:
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4306:
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4314: IF (l_ind = 1) THEN
4307: IF (fa_amort_pvt.t_period_num(l_ind) = 1) THEN
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4314: IF (l_ind = 1) THEN
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4308: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4309: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4310: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4314: IF (l_ind = 1) THEN
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4311: fa_amort_pvt.t_impairment_amount(l_ind);
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4314: IF (l_ind = 1) THEN
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4312: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4313:
4314: IF (l_ind = 1) THEN
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4313:
4314: IF (l_ind = 1) THEN
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4315: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4316: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4324: fa_amort_pvt.t_formula_factor(l_ind - 1);
4317: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4324: fa_amort_pvt.t_formula_factor(l_ind - 1);
4325: END IF;
4318: ELSE
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4324: fa_amort_pvt.t_formula_factor(l_ind - 1);
4325: END IF;
4326:
4319: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4324: fa_amort_pvt.t_formula_factor(l_ind - 1);
4325: END IF;
4326:
4327: ELSE
4320: fa_amort_pvt.t_deprn_reserve(l_ind - 1);
4321: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4322: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4323: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4324: fa_amort_pvt.t_formula_factor(l_ind - 1);
4325: END IF;
4326:
4327: ELSE
4328:
4326:
4327: ELSE
4328:
4329: IF (l_ind = 1) THEN
4330: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4327: ELSE
4328:
4329: IF (l_ind = 1) THEN
4330: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4328:
4329: IF (l_ind = 1) THEN
4330: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4329: IF (l_ind = 1) THEN
4330: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4330: fa_amort_pvt.t_ytd_deprn(l_ind) := fa_amort_pvt.t_deprn_amount(l_ind);
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4331: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) := perd_bonus_deprn_amount;
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4332: fa_amort_pvt.t_eofy_reserve(l_ind) := 0;
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4333: fa_amort_pvt.t_eofy_adj_cost(l_ind) := 0;
4334: fa_amort_pvt.t_eofy_formula_factor(l_ind) := 1;
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4335: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4336: fa_amort_pvt.t_impairment_amount(l_ind);
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4337: fa_amort_pvt.t_ytd_production(l_ind) := fa_amort_pvt.t_production(l_ind); --Bug7487450
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4338: ELSE
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4339: fa_amort_pvt.t_ytd_deprn(l_ind) :=
4340: fa_amort_pvt.t_ytd_deprn(l_ind - 1) +
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4341: fa_amort_pvt.t_deprn_amount(l_ind);
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4342: fa_amort_pvt.t_bonus_ytd_deprn(l_ind) :=
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4343: fa_amort_pvt.t_bonus_ytd_deprn(l_ind - 1) +
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4344: perd_bonus_deprn_amount;
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4345: fa_amort_pvt.t_eofy_reserve(l_ind) :=
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4346: fa_amort_pvt.t_eofy_reserve(l_ind - 1);
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4347: fa_amort_pvt.t_eofy_adj_cost(l_ind) :=
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4348: fa_amort_pvt.t_eofy_adj_cost(l_ind - 1);
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4349: fa_amort_pvt.t_eofy_formula_factor(l_ind) :=
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4357: END IF;
4350: fa_amort_pvt.t_eofy_formula_factor(l_ind - 1);
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4357: END IF;
4358:
4351: fa_amort_pvt.t_ytd_impairment(l_ind) :=
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4357: END IF;
4358:
4359: END IF; -- (fa_amort_pvt.t_period_num(l_ind) = 1) then
4352: fa_amort_pvt.t_ytd_impairment(l_ind - 1) +
4353: fa_amort_pvt.t_impairment_amount(l_ind);
4354: fa_amort_pvt.t_ytd_production(l_ind) :=
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4357: END IF;
4358:
4359: END IF; -- (fa_amort_pvt.t_period_num(l_ind) = 1) then
4360:
4355: fa_amort_pvt.t_ytd_production(l_ind - 1) +
4356: fa_amort_pvt.t_production(l_ind); --Bug7487450
4357: END IF;
4358:
4359: END IF; -- (fa_amort_pvt.t_period_num(l_ind) = 1) then
4360:
4361: IF (l_ind = 1) THEN
4362: fa_amort_pvt.t_eop_adj_cost(l_ind) := 0;
4363: ELSE
4358:
4359: END IF; -- (fa_amort_pvt.t_period_num(l_ind) = 1) then
4360:
4361: IF (l_ind = 1) THEN
4362: fa_amort_pvt.t_eop_adj_cost(l_ind) := 0;
4363: ELSE
4364: fa_amort_pvt.t_eop_adj_cost(l_ind) :=
4365: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4366: END IF;
4360:
4361: IF (l_ind = 1) THEN
4362: fa_amort_pvt.t_eop_adj_cost(l_ind) := 0;
4363: ELSE
4364: fa_amort_pvt.t_eop_adj_cost(l_ind) :=
4365: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4366: END IF;
4367:
4368: fa_amort_pvt.t_eop_formula_factor(l_ind) :=
4361: IF (l_ind = 1) THEN
4362: fa_amort_pvt.t_eop_adj_cost(l_ind) := 0;
4363: ELSE
4364: fa_amort_pvt.t_eop_adj_cost(l_ind) :=
4365: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4366: END IF;
4367:
4368: fa_amort_pvt.t_eop_formula_factor(l_ind) :=
4369: fa_amort_pvt.t_formula_factor(l_ind);
4364: fa_amort_pvt.t_eop_adj_cost(l_ind) :=
4365: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4366: END IF;
4367:
4368: fa_amort_pvt.t_eop_formula_factor(l_ind) :=
4369: fa_amort_pvt.t_formula_factor(l_ind);
4370:
4371: dpr_out.new_impairment_rsv := fa_amort_pvt.t_impairment_reserve(l_ind);
4372:
4365: fa_amort_pvt.t_adjusted_cost(l_ind - 1);
4366: END IF;
4367:
4368: fa_amort_pvt.t_eop_formula_factor(l_ind) :=
4369: fa_amort_pvt.t_formula_factor(l_ind);
4370:
4371: dpr_out.new_impairment_rsv := fa_amort_pvt.t_impairment_reserve(l_ind);
4372:
4373: IF (p_log_level_rec.statement_level) THEN
4367:
4368: fa_amort_pvt.t_eop_formula_factor(l_ind) :=
4369: fa_amort_pvt.t_formula_factor(l_ind);
4370:
4371: dpr_out.new_impairment_rsv := fa_amort_pvt.t_impairment_reserve(l_ind);
4372:
4373: IF (p_log_level_rec.statement_level) THEN
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4370:
4371: dpr_out.new_impairment_rsv := fa_amort_pvt.t_impairment_reserve(l_ind);
4372:
4373: IF (p_log_level_rec.statement_level) THEN
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4371: dpr_out.new_impairment_rsv := fa_amort_pvt.t_impairment_reserve(l_ind);
4372:
4373: IF (p_log_level_rec.statement_level) THEN
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4372:
4373: IF (p_log_level_rec.statement_level) THEN
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4373: IF (p_log_level_rec.statement_level) THEN
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4374: fa_debug_pkg.ADD('faxcde','period_counter', fa_amort_pvt.t_period_counter(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4375: fa_debug_pkg.ADD('faxcde','deprn_amount', fa_amort_pvt.t_deprn_amount(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4376: fa_debug_pkg.ADD('faxcde','ytd_deprn', fa_amort_pvt.t_ytd_deprn(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4377: fa_debug_pkg.ADD('faxcde','deprn_reserve', fa_amort_pvt.t_deprn_reserve(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4378: fa_debug_pkg.ADD('faxcde','bonus_deprn_amount', fa_amort_pvt.t_bonus_deprn_amount(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4379: fa_debug_pkg.ADD('faxcde','bonus_ytd_deprn', fa_amort_pvt.t_bonus_ytd_deprn(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4380: fa_debug_pkg.ADD('faxcde','bonus_deprn_reserve', fa_amort_pvt.t_bonus_deprn_reserve(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4381: fa_debug_pkg.ADD('faxcde','eofy_reserve', fa_amort_pvt.t_eofy_reserve(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4382: fa_debug_pkg.ADD('faxcde','eofy_adj_cost', fa_amort_pvt.t_eofy_adj_cost(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4390: fa_debug_pkg.ADD('faxcde','ltd_production', fa_amort_pvt.t_ltd_production(l_ind));
4383: fa_debug_pkg.ADD('faxcde','eofy_formula_factor', fa_amort_pvt.t_eofy_formula_factor(l_ind));
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4390: fa_debug_pkg.ADD('faxcde','ltd_production', fa_amort_pvt.t_ltd_production(l_ind));
4391: END IF;
4384: fa_debug_pkg.ADD('faxcde','eop_adj_cost', fa_amort_pvt.t_eop_adj_cost(l_ind));
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4390: fa_debug_pkg.ADD('faxcde','ltd_production', fa_amort_pvt.t_ltd_production(l_ind));
4391: END IF;
4392:
4385: fa_debug_pkg.ADD('faxcde','eop_formula_factor', fa_amort_pvt.t_eop_formula_factor(l_ind));
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4390: fa_debug_pkg.ADD('faxcde','ltd_production', fa_amort_pvt.t_ltd_production(l_ind));
4391: END IF;
4392:
4393:
4386: fa_debug_pkg.ADD('faxcde','imp_rsv', fa_amort_pvt.t_impairment_reserve(l_ind));
4387: fa_debug_pkg.ADD('faxcde','adjusted_capacity', fa_amort_pvt.t_adjusted_capacity(l_ind));
4388: fa_debug_pkg.ADD('faxcde','production', fa_amort_pvt.t_production(l_ind));
4389: fa_debug_pkg.ADD('faxcde','ytd_production', fa_amort_pvt.t_ytd_production(l_ind));
4390: fa_debug_pkg.ADD('faxcde','ltd_production', fa_amort_pvt.t_ltd_production(l_ind));
4391: END IF;
4392:
4393:
4394: --
4392:
4393:
4394: --
4395: -- Revaluation related amounts needs to be corrected
4396: -- fa_amort_pvt.t_reval_amortization(l_ind) :=
4397: -- fa_amort_pvt.t_ytd_reval_deprn_expense(l_ind) :=
4398: -- fa_amort_pvt.t_reval_reserve(l_ind) :=
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4393:
4394: --
4395: -- Revaluation related amounts needs to be corrected
4396: -- fa_amort_pvt.t_reval_amortization(l_ind) :=
4397: -- fa_amort_pvt.t_ytd_reval_deprn_expense(l_ind) :=
4398: -- fa_amort_pvt.t_reval_reserve(l_ind) :=
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4401:
4394: --
4395: -- Revaluation related amounts needs to be corrected
4396: -- fa_amort_pvt.t_reval_amortization(l_ind) :=
4397: -- fa_amort_pvt.t_ytd_reval_deprn_expense(l_ind) :=
4398: -- fa_amort_pvt.t_reval_reserve(l_ind) :=
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4401:
4402: l_ind := l_ind + 1;
4395: -- Revaluation related amounts needs to be corrected
4396: -- fa_amort_pvt.t_reval_amortization(l_ind) :=
4397: -- fa_amort_pvt.t_ytd_reval_deprn_expense(l_ind) :=
4398: -- fa_amort_pvt.t_reval_reserve(l_ind) :=
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4401:
4402: l_ind := l_ind + 1;
4403: END IF; -- (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) then
4396: -- fa_amort_pvt.t_reval_amortization(l_ind) :=
4397: -- fa_amort_pvt.t_ytd_reval_deprn_expense(l_ind) :=
4398: -- fa_amort_pvt.t_reval_reserve(l_ind) :=
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4401:
4402: l_ind := l_ind + 1;
4403: END IF; -- (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) then
4404:
4399: -- fa_amort_pvt.t_remaining_life1(l_ind) :=
4400: -- fa_amort_pvt.t_remaining_life2(l_ind) :=
4401:
4402: l_ind := l_ind + 1;
4403: END IF; -- (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) then
4404:
4405: END IF; -- (l_ind <> 0))
4406:
4407: IF (p_log_level_rec.statement_level) THEN
4590:
4591: --
4592: -- Bug4037112: Need to return reserve that includes
4593: -- Reserve adjustments amount which can only
4594: -- find in fa_amort_pvt pl/sql table.
4595: --
4596: IF (l_ind<>0) AND
4597: (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4598: dpr_out.new_deprn_rsv := fa_amort_pvt.t_deprn_reserve(l_ind-1)+
4593: -- Reserve adjustments amount which can only
4594: -- find in fa_amort_pvt pl/sql table.
4595: --
4596: IF (l_ind<>0) AND
4597: (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4598: dpr_out.new_deprn_rsv := fa_amort_pvt.t_deprn_reserve(l_ind-1)+
4599: fa_amort_pvt.t_reserve_adjustment_amount(l_ind) +
4600: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4601: ELSE
4594: -- find in fa_amort_pvt pl/sql table.
4595: --
4596: IF (l_ind<>0) AND
4597: (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4598: dpr_out.new_deprn_rsv := fa_amort_pvt.t_deprn_reserve(l_ind-1)+
4599: fa_amort_pvt.t_reserve_adjustment_amount(l_ind) +
4600: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4601: ELSE
4602: dpr_out.new_deprn_rsv := cur_deprn_rsv;
4595: --
4596: IF (l_ind<>0) AND
4597: (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4598: dpr_out.new_deprn_rsv := fa_amort_pvt.t_deprn_reserve(l_ind-1)+
4599: fa_amort_pvt.t_reserve_adjustment_amount(l_ind) +
4600: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4601: ELSE
4602: dpr_out.new_deprn_rsv := cur_deprn_rsv;
4603: END IF;
4596: IF (l_ind<>0) AND
4597: (l_ind <= fa_amort_pvt.t_deprn_amount.COUNT) THEN
4598: dpr_out.new_deprn_rsv := fa_amort_pvt.t_deprn_reserve(l_ind-1)+
4599: fa_amort_pvt.t_reserve_adjustment_amount(l_ind) +
4600: fa_amort_pvt.t_expense_adjustment_amount(l_ind);
4601: ELSE
4602: dpr_out.new_deprn_rsv := cur_deprn_rsv;
4603: END IF;
4604: