32: facodda_err EXCEPTION;
33:
34: begin <
35:
36: -- fa_debug_pkg.initialize;
37:
38: /* This is just cover process to call the function FAODDA on FA_CDE_PKG */
39:
40:
38: /* This is just cover process to call the function FAODDA on FA_CDE_PKG */
39:
40:
41: if (p_log_level_rec.statement_level) then
42: fa_debug_pkg.add('facodda','Just Start the cover program','', p_log_level_rec);
43: end if;
44:
45: if used_by_adjustment = 1 then
46: h_used_by_adjustment_bool := TRUE;
60: h_prod_rate_src_flag_bool := FALSE;
61: end if;
62:
63: if (p_log_level_rec.statement_level) then
64: fa_debug_pkg.add('facodda','Just Call the main program','faodda', p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
61: end if;
62:
63: if (p_log_level_rec.statement_level) then
64: fa_debug_pkg.add('facodda','Just Call the main program','faodda', p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
62:
63: if (p_log_level_rec.statement_level) then
64: fa_debug_pkg.add('facodda','Just Call the main program','faodda', p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
63: if (p_log_level_rec.statement_level) then
64: fa_debug_pkg.add('facodda','Just Call the main program','faodda', p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
64: fa_debug_pkg.add('facodda','Just Call the main program','faodda', p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
65: fa_debug_pkg.add('facodda','book',book, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
66: fa_debug_pkg.add('facodda','used_by_adjustment',used_by_adjustment, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
67: fa_debug_pkg.add('facodda','asset_id',asset_id, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
68: fa_debug_pkg.add('facodda','bonus_rule',bonus_rule, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
69: fa_debug_pkg.add('facodda','fyctr',fyctr, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
70: fa_debug_pkg.add('facodda','perd_ctr',perd_ctr, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
71: fa_debug_pkg.add('facodda','prod_rate_src_flag',prod_rate_src_flag, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
79: fa_debug_pkg.add('facodda','p_mrc_sob_type_code',p_mrc_sob_type_code, p_log_level_rec);
72: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
79: fa_debug_pkg.add('facodda','p_mrc_sob_type_code',p_mrc_sob_type_code, p_log_level_rec);
80: end if;
73: fa_debug_pkg.add('facodda','p_ytd_deprn', p_ytd_deprn, p_log_level_rec);
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
79: fa_debug_pkg.add('facodda','p_mrc_sob_type_code',p_mrc_sob_type_code, p_log_level_rec);
80: end if;
81:
74: fa_debug_pkg.add('facodda','p_bonus_ytd_deprn', p_bonus_ytd_deprn, p_log_level_rec);
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
79: fa_debug_pkg.add('facodda','p_mrc_sob_type_code',p_mrc_sob_type_code, p_log_level_rec);
80: end if;
81:
82: if not FA_CDE_PKG.faodda(book => book,
75: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
76: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
77: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
78: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
79: fa_debug_pkg.add('facodda','p_mrc_sob_type_code',p_mrc_sob_type_code, p_log_level_rec);
80: end if;
81:
82: if not FA_CDE_PKG.faodda(book => book,
83: used_by_adjustment => h_used_by_adjustment_bool,
99: raise facodda_err;
100: end if;
101:
102: if (p_log_level_rec.statement_level) then
103: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
104: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
105: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
106: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
107: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
100: end if;
101:
102: if (p_log_level_rec.statement_level) then
103: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
104: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
105: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
106: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
107: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
108: end if;
101:
102: if (p_log_level_rec.statement_level) then
103: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
104: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
105: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
106: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
107: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
108: end if;
109:
102: if (p_log_level_rec.statement_level) then
103: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
104: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
105: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
106: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
107: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
108: end if;
109:
110: return 0;
103: fa_debug_pkg.add('facodda','deprn_projecting_flag',deprn_projecting_flag, p_log_level_rec);
104: fa_debug_pkg.add('facodda','override_depr_amt',override_depr_amt, p_log_level_rec);
105: fa_debug_pkg.add('facodda','override_bonus_amt',override_bonus_amt, p_log_level_rec);
106: fa_debug_pkg.add('facodda','deprn_override_flag',deprn_override_flag, p_log_level_rec);
107: fa_debug_pkg.add('facodda','return_code',return_code, p_log_level_rec);
108: end if;
109:
110: return 0;
111:
239: faxccdb_err exception;
240:
241: BEGIN <
242:
243: -- fa_debug_pkg.initialize; -- removed to not clear the message stack.
244:
245: -- This is just cover process to call the function
246: -- of faxcdb on FA_CALC_DEPRN_BASIS1_PKG
247:
245: -- This is just cover process to call the function
246: -- of faxcdb on FA_CALC_DEPRN_BASIS1_PKG
247:
248: if (p_log_level_rec.statement_level) then
249: fa_debug_pkg.add('faxccdb','Just Start the cover program','', p_log_level_rec);
250: end if;
251:
252: -- Set default amount to out parameters
253: new_adjusted_cost := nvl(old_adjusted_cost,0);
351:
352: -- Check method_code
353:
354: if (p_log_level_rec.statement_level) then
355: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(1)',h_rule_in.method_code, p_log_level_rec);
356: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(1)',h_rule_in.life_in_months, p_log_level_rec);
357: end if;
358:
359: -- select count(1)
352: -- Check method_code
353:
354: if (p_log_level_rec.statement_level) then
355: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(1)',h_rule_in.method_code, p_log_level_rec);
356: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(1)',h_rule_in.life_in_months, p_log_level_rec);
357: end if;
358:
359: -- select count(1)
360: -- into l_chk_count
377: -- end if;
378: -- end if;
379:
380: if (p_log_level_rec.statement_level) then
381: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(2)',h_rule_in.method_code, p_log_level_rec);
382: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(2)',h_rule_in.life_in_months, p_log_level_rec);
383: fa_debug_pkg.add('faxccdb','method_type',method_type, p_log_level_rec);
384: fa_debug_pkg.add('faxccdb','calc_basis',calc_basis, p_log_level_rec);
385: end if;
378: -- end if;
379:
380: if (p_log_level_rec.statement_level) then
381: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(2)',h_rule_in.method_code, p_log_level_rec);
382: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(2)',h_rule_in.life_in_months, p_log_level_rec);
383: fa_debug_pkg.add('faxccdb','method_type',method_type, p_log_level_rec);
384: fa_debug_pkg.add('faxccdb','calc_basis',calc_basis, p_log_level_rec);
385: end if;
386:
379:
380: if (p_log_level_rec.statement_level) then
381: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(2)',h_rule_in.method_code, p_log_level_rec);
382: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(2)',h_rule_in.life_in_months, p_log_level_rec);
383: fa_debug_pkg.add('faxccdb','method_type',method_type, p_log_level_rec);
384: fa_debug_pkg.add('faxccdb','calc_basis',calc_basis, p_log_level_rec);
385: end if;
386:
387: -- Get rate_source_rule and deprn_basis_rule
380: if (p_log_level_rec.statement_level) then
381: fa_debug_pkg.add('faxccdb','h_rule_in.method_code(2)',h_rule_in.method_code, p_log_level_rec);
382: fa_debug_pkg.add('faxccdb','h_rule_in.life_in_months(2)',h_rule_in.life_in_months, p_log_level_rec);
383: fa_debug_pkg.add('faxccdb','method_type',method_type, p_log_level_rec);
384: fa_debug_pkg.add('faxccdb','calc_basis',calc_basis, p_log_level_rec);
385: end if;
386:
387: -- Get rate_source_rule and deprn_basis_rule
388: -- to avoid that method_type and calc_basis are set null
533: l_calling_fn varchar2(40) := 'fa_basis_override_init_pkg.faoddat';
534:
535: begin <
536:
537: -- fa_debug_pkg.initialize; -- removed to not clear the message stack.
538:
539: if deprn_override_trigger = 1 then
540: h_deprn_override_trigger := TRUE;
541: else
544:
545: fa_std_types.deprn_override_trigger_enabled:= h_deprn_override_trigger;
546:
547: if (p_log_level_rec.statement_level) then
548: fa_debug_pkg.add('faoddat','faoddat: deprn_override_trigger_enabled', fa_std_types.deprn_override_trigger_enabled, p_log_level_rec);
549: end if;
550:
551: return 0;
552: