81:
82: RETURN l_pc;
83: EXCEPTION WHEN OTHERS THEN
84: if (p_log_level_rec.statement_level) then
85: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
86: end if;
87:
88: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn);
89: return 0;
191: and end_date;
192:
193: BEGIN
194: if (p_log_level_rec.statement_level) then
195: fa_debug_pkg.add(l_calling_fn, 'Begin', p_jdate, p_log_level_rec => p_log_level_rec);
196: end if;
197:
198: if p_mrc_sob_type_code = 'R' then
199: OPEN c_get_mc_deprn_period_info;
276:
277: end if;
278:
279: if (p_log_level_rec.statement_level) then
280: fa_debug_pkg.add(l_calling_fn, 'End', x_period_rec.period_counter||':'||
281: x_period_rec.fiscal_year||':'||
282: x_period_rec.period_num||':'||
283: to_char(x_period_rec.calendar_period_open_date, 'DD-MON-YYYY')||':'||
284: to_char(x_period_rec.calendar_period_close_date, 'DD-MON-YYYY'));
288:
289: EXCEPTION
290: WHEN get_err THEN
291: if (p_log_level_rec.statement_level) then
292: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'get_err', p_log_level_rec => p_log_level_rec);
293: end if;
294:
295: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
296: return false;
296: return false;
297:
298: WHEN others THEN
299: if (p_log_level_rec.statement_level) then
300: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
301: end if;
302:
303: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
304: return false;
407: --
408:
409: BEGIN
410: if (p_log_level_rec.statement_level) then
411: fa_debug_pkg.add(l_calling_fn||'()+', 'asset_id', p_asset_hdr_rec.asset_id);
412: end if;
413:
414: if p_mrc_sob_type_code = 'R' then
415:
428: CLOSE c_get_last_period_counter;
429: end if;
430:
431: if (p_log_level_rec.statement_level) then
432: fa_debug_pkg.add(l_calling_fn, 'l_last_period_counter', l_last_period_counter, p_log_level_rec => p_log_level_rec);
433: fa_debug_pkg.add(l_calling_fn, 'l_last_period_close_date', l_last_period_close_date, p_log_level_rec => p_log_level_rec);
434: end if;
435:
436: if (p_period_rec.period_counter = l_last_period_counter) then
429: end if;
430:
431: if (p_log_level_rec.statement_level) then
432: fa_debug_pkg.add(l_calling_fn, 'l_last_period_counter', l_last_period_counter, p_log_level_rec => p_log_level_rec);
433: fa_debug_pkg.add(l_calling_fn, 'l_last_period_close_date', l_last_period_close_date, p_log_level_rec => p_log_level_rec);
434: end if;
435:
436: if (p_period_rec.period_counter = l_last_period_counter) then
437: if (p_log_level_rec.statement_level) then
434: end if;
435:
436: if (p_period_rec.period_counter = l_last_period_counter) then
437: if (p_log_level_rec.statement_level) then
438: fa_debug_pkg.add(l_calling_fn, 'This asset has record up to current period',l_last_period_counter, p_log_level_rec => p_log_level_rec);
439: fa_debug_pkg.add(l_calling_fn||'()-', 'asset_id', p_asset_hdr_rec.asset_id);
440: end if;
441:
442: return TRUE;
435:
436: if (p_period_rec.period_counter = l_last_period_counter) then
437: if (p_log_level_rec.statement_level) then
438: fa_debug_pkg.add(l_calling_fn, 'This asset has record up to current period',l_last_period_counter, p_log_level_rec => p_log_level_rec);
439: fa_debug_pkg.add(l_calling_fn||'()-', 'asset_id', p_asset_hdr_rec.asset_id);
440: end if;
441:
442: return TRUE;
443:
456: ;
457: CLOSE c_get_period_rec;
458:
459: if (p_log_level_rec.statement_level) then
460: fa_debug_pkg.add(l_calling_fn, '# of record creating', tbs_period_counter.COUNT, p_log_level_rec => p_log_level_rec);
461: end if;
462:
463: l_ind := p_period_rec.period_counter - l_last_period_counter;
464: FOR i in 1..l_ind LOOP
470: END LOOP; -- i in 1..(p_period_rec.period_counter - l_last_period_counter)
471:
472:
473: if (p_log_level_rec.statement_level) then
474: fa_debug_pkg.add(l_calling_fn, 'Insert into', 'FA_BOOKS_SUMMARY', p_log_level_rec => p_log_level_rec);
475: end if;
476: --
477: -- Insert all necessary records from period where DPIS falls into
478: --
872:
873: end if;
874:
875: if (p_log_level_rec.statement_level) then
876: fa_debug_pkg.add(l_calling_fn||'()-', '# of records inserted', tbs_period_counter.COUNT);
877: end if;
878:
879: return true;
880:
880:
881: EXCEPTION
882: WHEN OTHERS THEN
883: if (p_log_level_rec.statement_level) then
884: fa_debug_pkg.add(l_calling_fn||'(OTHERS)-', 'sqlcode', sqlcode);
885: end if;
886:
887: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
888:
1057:
1058: BEGIN
1059:
1060: if (p_log_level_rec.statement_level) then
1061: fa_debug_pkg.add(l_calling_fn||'()+', 'asset_id', p_asset_hdr_rec.asset_id);
1062: end if;
1063:
1064: --
1065: -- Delete all records for this group asset to recreate them
1075: AND BOOK_TYPE_CODE = p_asset_hdr_rec.book_type_code;
1076: end if;
1077:
1078: if (p_log_level_rec.statement_level) then
1079: fa_debug_pkg.add(l_calling_fn, 'Construct Period information', '.', p_log_level_rec => p_log_level_rec);
1080: end if;
1081:
1082: --
1083: -- Construct period information part for FA_BOOKS_SUMAMRY
1092: ;
1093: CLOSE c_get_period_rec;
1094:
1095: if (p_log_level_rec.statement_level) then
1096: fa_debug_pkg.add(l_calling_fn||'()-', '# of records will be inserted',
1097: tbs_period_counter.COUNT);
1098: end if;
1099:
1100: if (tbs_period_counter.COUNT = 0) then
1110: --
1111: tbs_reset_adjusted_cost_flag(1) := 'Y';
1112:
1113: if (p_log_level_rec.statement_level) then
1114: fa_debug_pkg.add(l_calling_fn, 'Insert into', 'FA_BOOKS_SUMMARY', p_log_level_rec => p_log_level_rec);
1115: end if;
1116: --
1117: -- Insert all necessary records from period where DPIS falls into
1118: --
1477: p_period_counter => tbs_period_counter(1),
1478: p_log_level_rec => p_log_level_rec);
1479:
1480: if (p_log_level_rec.statement_level) then
1481: fa_debug_pkg.add(l_calling_fn||'()-', '# of records inserted', tbs_period_counter.COUNT);
1482: end if;
1483:
1484: return true;
1485:
1485:
1486: EXCEPTION
1487: WHEN OTHERS THEN
1488: if (p_log_level_rec.statement_level) then
1489: fa_debug_pkg.add(l_calling_fn||'(OTHERS)-', 'sqlcode', sqlcode);
1490: end if;
1491:
1492: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
1493:
1774:
1775: BEGIN
1776:
1777: if (p_log_level_rec.statement_level) then
1778: fa_debug_pkg.add(l_calling_fn||'()+', 'asset_id', p_asset_hdr_rec.asset_id);
1779: fa_debug_pkg.add(l_calling_fn, 'group_asset_id', p_group_asset_id, p_log_level_rec => p_log_level_rec);
1780: end if;
1781: --tk_util.debug('p_reclass_multiplier: '||to_char(p_reclass_multiplier));
1782:
1775: BEGIN
1776:
1777: if (p_log_level_rec.statement_level) then
1778: fa_debug_pkg.add(l_calling_fn||'()+', 'asset_id', p_asset_hdr_rec.asset_id);
1779: fa_debug_pkg.add(l_calling_fn, 'group_asset_id', p_group_asset_id, p_log_level_rec => p_log_level_rec);
1780: end if;
1781: --tk_util.debug('p_reclass_multiplier: '||to_char(p_reclass_multiplier));
1782:
1783: if (p_reclass_src_dest = 'DESTINATION') and
1805: x_asset_fin_rec_reclass.allowed_deprn_limit_amount :=
1806: -1 * fa_amort_pvt.tm_deprn_limit_amount(l_ind);
1807:
1808: if (p_log_level_rec.statement_level) then
1809: fa_debug_pkg.add(l_calling_fn||'()-', '# of rows in delta tables', x_td_cost.COUNT);
1810: end if;
1811:
1812: return TRUE;
1813:
1833: , t_limit_thid;
1834: CLOSE c_get_period_counters;
1835:
1836: if (p_log_level_rec.statement_level) then
1837: fa_debug_pkg.add(l_calling_fn, 'Finish Constructing Memebr Table',
1838: t_period_counter.COUNT, p_log_level_rec => p_log_level_rec);
1839: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_key', p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
1840: fa_debug_pkg.add(l_calling_fn, 'p_salvage_limit_type', p_salvage_limit_type, p_log_level_rec => p_log_level_rec);
1841: end if;
1835:
1836: if (p_log_level_rec.statement_level) then
1837: fa_debug_pkg.add(l_calling_fn, 'Finish Constructing Memebr Table',
1838: t_period_counter.COUNT, p_log_level_rec => p_log_level_rec);
1839: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_key', p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
1840: fa_debug_pkg.add(l_calling_fn, 'p_salvage_limit_type', p_salvage_limit_type, p_log_level_rec => p_log_level_rec);
1841: end if;
1842:
1843: l_dpis_pc := t_period_counter(1);
1836: if (p_log_level_rec.statement_level) then
1837: fa_debug_pkg.add(l_calling_fn, 'Finish Constructing Memebr Table',
1838: t_period_counter.COUNT, p_log_level_rec => p_log_level_rec);
1839: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_key', p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
1840: fa_debug_pkg.add(l_calling_fn, 'p_salvage_limit_type', p_salvage_limit_type, p_log_level_rec => p_log_level_rec);
1841: end if;
1842:
1843: l_dpis_pc := t_period_counter(1);
1844:
1880:
1881: end if; -- bug5149789
1882:
1883: if (p_log_level_rec.statement_level) then
1884: fa_debug_pkg.add(l_calling_fn||'()+', 'Finish Getting Memebr Trxs',
1885: tr_transaction_header_id.COUNT);
1886: end if;
1887:
1888: --
1892:
1893: --bug6912446
1894: if (tr_transaction_type_code(i) = 'REINSTATEMENT') then
1895: if (p_log_level_rec.statement_level) then
1896: fa_debug_pkg.add(l_calling_fn, 'following period counter may change', tr_period_counter(i));
1897: end if;
1898: if (p_mrc_sob_type_code = 'R') then
1899: OPEN c_get_mc_ret_period(tr_transaction_header_id(i));
1900: FETCH c_get_mc_ret_period INTO tr_period_counter(i);
1904: FETCH c_get_ret_period INTO tr_period_counter(i);
1905: CLOSE c_get_ret_period;
1906: end if;
1907: if (p_log_level_rec.statement_level) then
1908: fa_debug_pkg.add(l_calling_fn, 'new tr_period_counter(i)', tr_period_counter(i));
1909: end if;
1910: end if;
1911: --End bug6912446
1912:
2073: (nvl(l_salvage_value, 0) = 0) and
2074: (nvl(l_deprn_limit_amount, 0) = 0) then
2075:
2076: if (p_log_level_rec.statement_level) then
2077: fa_debug_pkg.add(l_calling_fn, 'calling', 'check_dpis_change', p_log_level_rec => p_log_level_rec);
2078: end if;
2079:
2080: if not check_dpis_change (
2081: p_book_type_code => p_asset_hdr_rec.book_type_code
2085: , x_period_counter_out => l_period_counter
2086: , p_mrc_sob_type_code => p_mrc_sob_type_code
2087: , p_log_level_rec => p_log_level_rec) then
2088: if (p_log_level_rec.statement_level) then
2089: fa_debug_pkg.add(l_calling_fn, 'error calling', 'check_dpis_change', p_log_level_rec => p_log_level_rec);
2090: end if;
2091: raise bld_err;
2092: end if;
2093:
2099: end if;
2100: end if; -- (nvl(l_cost, 0) = 0) and
2101:
2102: if (p_log_level_rec.statement_level) then
2103: fa_debug_pkg.add(l_calling_fn, 'cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
2104: fa_debug_pkg.add(l_calling_fn, 'cip_cost', x_asset_fin_rec.cip_cost, p_log_level_rec => p_log_level_rec);
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2100: end if; -- (nvl(l_cost, 0) = 0) and
2101:
2102: if (p_log_level_rec.statement_level) then
2103: fa_debug_pkg.add(l_calling_fn, 'cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
2104: fa_debug_pkg.add(l_calling_fn, 'cip_cost', x_asset_fin_rec.cip_cost, p_log_level_rec => p_log_level_rec);
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2101:
2102: if (p_log_level_rec.statement_level) then
2103: fa_debug_pkg.add(l_calling_fn, 'cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
2104: fa_debug_pkg.add(l_calling_fn, 'cip_cost', x_asset_fin_rec.cip_cost, p_log_level_rec => p_log_level_rec);
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2102: if (p_log_level_rec.statement_level) then
2103: fa_debug_pkg.add(l_calling_fn, 'cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
2104: fa_debug_pkg.add(l_calling_fn, 'cip_cost', x_asset_fin_rec.cip_cost, p_log_level_rec => p_log_level_rec);
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'deprn_limit_type', x_asset_fin_rec.deprn_limit_type, p_log_level_rec => p_log_level_rec);
2104: fa_debug_pkg.add(l_calling_fn, 'cip_cost', x_asset_fin_rec.cip_cost, p_log_level_rec => p_log_level_rec);
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'deprn_limit_type', x_asset_fin_rec.deprn_limit_type, p_log_level_rec => p_log_level_rec);
2111: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit', x_asset_fin_rec.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
2112: end if;
2105: fa_debug_pkg.add(l_calling_fn, 'salvage_value', x_asset_fin_rec.salvage_value, p_log_level_rec => p_log_level_rec);
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'deprn_limit_type', x_asset_fin_rec.deprn_limit_type, p_log_level_rec => p_log_level_rec);
2111: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit', x_asset_fin_rec.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
2112: end if;
2113:
2106: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit_amount',
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'deprn_limit_type', x_asset_fin_rec.deprn_limit_type, p_log_level_rec => p_log_level_rec);
2111: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit', x_asset_fin_rec.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
2112: end if;
2113:
2114: end if; -- (tr_transaction_header_id(i) <>
2107: x_asset_fin_rec.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'salvage_type', x_asset_fin_rec.salvage_type, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'percent_salvage_value', x_asset_fin_rec.percent_salvage_value, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'deprn_limit_type', x_asset_fin_rec.deprn_limit_type, p_log_level_rec => p_log_level_rec);
2111: fa_debug_pkg.add(l_calling_fn, 'allowed_deprn_limit', x_asset_fin_rec.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
2112: end if;
2113:
2114: end if; -- (tr_transaction_header_id(i) <>
2115:
2117:
2118: END LOOP;
2119:
2120: if (p_log_level_rec.statement_level) then
2121: fa_debug_pkg.add(l_calling_fn||'()+', 'Finish Getting Deltas for Each Trx',
2122: tr_transaction_header_id.COUNT);
2123: end if;
2124:
2125: --
2186: fa_amort_pvt.tm_deprn_limit_amount(1) := fa_amort_pvt.tmd_deprn_limit_amount(1);
2187: end if;
2188:
2189: if (p_log_level_rec.statement_level) then
2190: fa_debug_pkg.add(l_calling_fn||'()+', 'Finish Populating First Record',
2191: x_td_cost(1));
2192: end if;
2193:
2194: FOR i in 2..t_period_counter.COUNT LOOP
2307: t_deprn_limit_amount(1) := fa_amort_pvt.tmd_deprn_limit_amount(1);
2308: end if;
2309:
2310: if (p_log_level_rec.statement_level) then
2311: fa_debug_pkg.add(l_calling_fn||'()+', 'Finish Populating First Record',
2312: t_cost(1));
2313: end if;
2314:
2315: FOR i in 2..t_period_counter.COUNT LOOP
2353:
2354: END LOOP; -- i in 2..t_period_counter.COUNT
2355:
2356: if (p_log_level_rec.statement_level) then
2357: fa_debug_pkg.add(l_calling_fn||'()+', 'Finish Populating All Records',
2358: t_cost(t_period_counter.COUNT));
2359: end if;
2360:
2361: /* Added if condition for bug 7511470 */
2452: t_cip_cost(l_ind) := t_cip_cost(l_ind) + x_asset_fin_rec.cip_cost;
2453: end if;
2454:
2455: if (p_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec => p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'x_td_period_counter(i)', x_td_period_counter(i));
2458: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.tmd_salvage_value',
2459: fa_amort_pvt.tmd_salvage_value(l_ind));
2460: fa_debug_pkg.add(l_calling_fn, 't_salvage_type(l_ind)', t_salvage_type(l_ind));
2453: end if;
2454:
2455: if (p_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec => p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'x_td_period_counter(i)', x_td_period_counter(i));
2458: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.tmd_salvage_value',
2459: fa_amort_pvt.tmd_salvage_value(l_ind));
2460: fa_debug_pkg.add(l_calling_fn, 't_salvage_type(l_ind)', t_salvage_type(l_ind));
2461: fa_debug_pkg.add(l_calling_fn, 't_salvage_value', t_salvage_value(l_ind));
2454:
2455: if (p_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec => p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'x_td_period_counter(i)', x_td_period_counter(i));
2458: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.tmd_salvage_value',
2459: fa_amort_pvt.tmd_salvage_value(l_ind));
2460: fa_debug_pkg.add(l_calling_fn, 't_salvage_type(l_ind)', t_salvage_type(l_ind));
2461: fa_debug_pkg.add(l_calling_fn, 't_salvage_value', t_salvage_value(l_ind));
2462: end if;
2456: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec => p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'x_td_period_counter(i)', x_td_period_counter(i));
2458: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.tmd_salvage_value',
2459: fa_amort_pvt.tmd_salvage_value(l_ind));
2460: fa_debug_pkg.add(l_calling_fn, 't_salvage_type(l_ind)', t_salvage_type(l_ind));
2461: fa_debug_pkg.add(l_calling_fn, 't_salvage_value', t_salvage_value(l_ind));
2462: end if;
2463:
2464:
2457: fa_debug_pkg.add(l_calling_fn, 'x_td_period_counter(i)', x_td_period_counter(i));
2458: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.tmd_salvage_value',
2459: fa_amort_pvt.tmd_salvage_value(l_ind));
2460: fa_debug_pkg.add(l_calling_fn, 't_salvage_type(l_ind)', t_salvage_type(l_ind));
2461: fa_debug_pkg.add(l_calling_fn, 't_salvage_value', t_salvage_value(l_ind));
2462: end if;
2463:
2464:
2465: if (t_salvage_type(l_ind) = 'PCT') then
2465: if (t_salvage_type(l_ind) = 'PCT') then
2466: l_temp_num := t_cost(l_ind) * x_asset_fin_rec.percent_salvage_value;
2467:
2468: if (p_log_level_rec.statement_level) then
2469: fa_debug_pkg.add(l_calling_fn, 'l_temp_num', l_temp_num, p_log_level_rec => p_log_level_rec);
2470: end if;
2471:
2472: fa_round_pkg.fa_ceil(l_temp_num, p_asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
2473:
2501:
2502: end if; -- (p_reclass_src_dest is null)
2503:
2504: if (p_log_level_rec.statement_level) then
2505: fa_debug_pkg.add(l_calling_fn||'()-', '# of rows in delta tables', x_td_cost.COUNT);
2506: end if;
2507:
2508: return TRUE;
2509:
2509:
2510: EXCEPTION
2511: WHEN bld_err THEN
2512: if (p_log_level_rec.statement_level) then
2513: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'bld_err', p_log_level_rec => p_log_level_rec);
2514: end if;
2515:
2516: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
2517: return false;
2517: return false;
2518:
2519: WHEN OTHERS THEN
2520: if (p_log_level_rec.statement_level) then
2521: fa_debug_pkg.add(l_calling_fn||'(OTHERS)-', 'sqlcode', sqlcode);
2522: end if;
2523:
2524: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
2525: return false;
2667:
2668: BEGIN
2669:
2670: if (p_log_level_rec.statement_level) then
2671: fa_debug_pkg.add(l_calling_fn||'()+', 'asset type', p_asset_type_rec.asset_type);
2672: fa_debug_pkg.add(l_calling_fn, 'member trx id',
2673: p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
2674: fa_debug_pkg.add(l_calling_fn, 'trx key',
2675: p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
2668: BEGIN
2669:
2670: if (p_log_level_rec.statement_level) then
2671: fa_debug_pkg.add(l_calling_fn||'()+', 'asset type', p_asset_type_rec.asset_type);
2672: fa_debug_pkg.add(l_calling_fn, 'member trx id',
2673: p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
2674: fa_debug_pkg.add(l_calling_fn, 'trx key',
2675: p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
2676: end if;
2670: if (p_log_level_rec.statement_level) then
2671: fa_debug_pkg.add(l_calling_fn||'()+', 'asset type', p_asset_type_rec.asset_type);
2672: fa_debug_pkg.add(l_calling_fn, 'member trx id',
2673: p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
2674: fa_debug_pkg.add(l_calling_fn, 'trx key',
2675: p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
2676: end if;
2677:
2678: -- Bug5149789: checking whether member exists or not
2689:
2690: if not check_member_existence (p_asset_hdr_rec => p_asset_hdr_rec,
2691: p_log_level_rec => p_log_level_rec) then
2692: if (p_log_level_rec.statement_level) then
2693: fa_debug_pkg.add(l_calling_fn, 'calling check_member_existence', 'FAILED', p_log_level_rec => p_log_level_rec);
2694: end if;
2695:
2696: l_valid_type_change := FALSE;
2697:
2698: end if;
2699:
2700: else
2701: if (p_log_level_rec.statement_level) then
2702: fa_debug_pkg.add(l_calling_fn, 'Method.deprn_limit type change', 'FAILED', p_log_level_rec => p_log_level_rec);
2703: fa_debug_pkg.add(l_calling_fn, 'cost', px_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
2704: end if;
2705:
2706: l_valid_type_change := FALSE;
2699:
2700: else
2701: if (p_log_level_rec.statement_level) then
2702: fa_debug_pkg.add(l_calling_fn, 'Method.deprn_limit type change', 'FAILED', p_log_level_rec => p_log_level_rec);
2703: fa_debug_pkg.add(l_calling_fn, 'cost', px_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
2704: end if;
2705:
2706: l_valid_type_change := FALSE;
2707:
2749: p_calling_fn => l_calling_fn
2750: ,p_log_level_rec => p_log_level_rec) then
2751:
2752: if (p_log_level_rec.statement_level) then
2753: fa_debug_pkg.add(l_calling_fn, 'calling FA_AMORT_PVT.createGroup', 'FAILED'
2754: ,p_log_level_rec => p_log_level_rec);
2755: end if;
2756: raise adj_err;
2757: end if;
2778: p_calling_fn => l_calling_fn,
2779: p_log_level_rec => p_log_level_rec)) then
2780:
2781: if (p_log_level_rec.statement_level) then
2782: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'catchupBooksSummary', p_log_level_rec => p_log_level_rec);
2783: end if;
2784:
2785: raise adj_err;
2786:
2811: p_calling_fn => l_calling_fn,
2812: p_log_level_rec => p_log_level_rec)) then
2813:
2814: if (p_log_level_rec.statement_level) then
2815: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'catchupBooksSummary', p_log_level_rec => p_log_level_rec);
2816: end if;
2817:
2818: raise adj_err;
2819:
3108: p_log_level_rec => p_log_level_rec);
3109: -- p_period_counter => p_period_rec.period_counter);
3110:
3111: if (p_log_level_rec.statement_level) then
3112: fa_debug_pkg.add(l_calling_fn||'()-', 'asset id', p_asset_hdr_rec.asset_id);
3113: end if;
3114:
3115: return TRUE;
3116:
3116:
3117: EXCEPTION
3118: WHEN adj_err THEN
3119: if (p_log_level_rec.statement_level) then
3120: fa_debug_pkg.add(l_calling_fn||'(adj_err)-', 'sqlcode', sqlcode);
3121: end if;
3122:
3123: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
3124: return false;
3125:
3126: WHEN OTHERS THEN
3127:
3128: if (p_log_level_rec.statement_level) then
3129: fa_debug_pkg.add(l_calling_fn||'(OTHERS)-', 'sqlcode', sqlcode);
3130: end if;
3131:
3132: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
3133: return false;
3657:
3658: BEGIN
3659:
3660: if (p_log_level_rec.statement_level) then
3661: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||
3662: ':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
3663: fa_debug_pkg.add(l_calling_fn, 'Reclass values', p_reclass_src_dest||
3664: ':'||to_char(p_reclassed_asset_id)||':'||
3665: to_char(p_reclassed_asset_dpis, 'DD-MON-RR'));
3659:
3660: if (p_log_level_rec.statement_level) then
3661: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||
3662: ':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
3663: fa_debug_pkg.add(l_calling_fn, 'Reclass values', p_reclass_src_dest||
3664: ':'||to_char(p_reclassed_asset_id)||':'||
3665: to_char(p_reclassed_asset_dpis, 'DD-MON-RR'));
3666: fa_debug_pkg.add(l_calling_fn, 'Begin BSrec sob_id',
3667: p_asset_hdr_rec.set_of_books_id);
3662: ':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
3663: fa_debug_pkg.add(l_calling_fn, 'Reclass values', p_reclass_src_dest||
3664: ':'||to_char(p_reclassed_asset_id)||':'||
3665: to_char(p_reclassed_asset_dpis, 'DD-MON-RR'));
3666: fa_debug_pkg.add(l_calling_fn, 'Begin BSrec sob_id',
3667: p_asset_hdr_rec.set_of_books_id);
3668:
3669:
3670: end if;
3689: p_calling_fn => l_calling_fn,
3690: p_log_level_rec => p_log_level_rec)) then
3691:
3692: if (p_log_level_rec.statement_level) then
3693: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'catchupBooksSummary', p_log_level_rec => p_log_level_rec);
3694: end if;
3695:
3696: raise calc_failed;
3697:
3722: p_calling_fn => l_calling_fn,
3723: p_log_level_rec => p_log_level_rec)) then
3724:
3725: if (p_log_level_rec.statement_level) then
3726: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'catchupBooksSummary', p_log_level_rec => p_log_level_rec);
3727: end if;
3728:
3729: raise calc_failed;
3730:
3755: l_period_rec,
3756: p_log_level_rec) then
3757:
3758: if (p_log_level_rec.statement_level) then
3759: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
3760: end if;
3761:
3762: raise calc_failed;
3763:
3767:
3768: if not fa_cache_pkg.fazcct(fa_cache_pkg.fazcbc_record.deprn_calendar, p_log_level_rec => p_log_level_rec) then
3769:
3770: if (p_log_level_rec.statement_level) then
3771: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'fa_cache_pkg.fazcct', p_log_level_rec => p_log_level_rec);
3772: end if;
3773:
3774: raise calc_failed;
3775:
3806: l_period_rec,
3807: p_log_level_rec) then
3808:
3809: if (p_log_level_rec.statement_level) then
3810: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
3811: end if;
3812:
3813: raise calc_failed;
3814:
3855: p_mrc_sob_type_code => p_mrc_sob_type_code,
3856: p_log_level_rec => p_log_level_rec) then
3857:
3858: if (p_log_level_rec.statement_level) then
3859: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'buildMemberTable', p_log_level_rec => p_log_level_rec);
3860: end if;
3861:
3862: raise calc_failed;
3863: end if;
3862: raise calc_failed;
3863: end if;
3864:
3865: if (p_log_level_rec.statement_level) then
3866: fa_debug_pkg.add(l_calling_fn, '# of rows in delta talbe', td_cost.COUNT, p_log_level_rec => p_log_level_rec);
3867: end if;
3868:
3869: else
3870: if (p_log_level_rec.statement_level) then
3867: end if;
3868:
3869: else
3870: if (p_log_level_rec.statement_level) then
3871: fa_debug_pkg.add(l_calling_fn, 'Group Transaction', p_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
3872: end if;
3873: end if; -- (l_mem_trx)
3874:
3875: -- NOTE:
3904:
3905: l_mem_period_counter := l_trx_period_rec.period_counter - 1;
3906:
3907: if (p_log_level_rec.statement_level) then
3908: fa_debug_pkg.add(l_calling_fn, 'Insert new row for proceessing','Start', p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3910: l_asset_hdr_rec.book_type_code||':'||p_reclassed_asset_id||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3912: l_mem_period_counter||':'||g_mem_ytd_deprn||':'||g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
3905: l_mem_period_counter := l_trx_period_rec.period_counter - 1;
3906:
3907: if (p_log_level_rec.statement_level) then
3908: fa_debug_pkg.add(l_calling_fn, 'Insert new row for proceessing','Start', p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3910: l_asset_hdr_rec.book_type_code||':'||p_reclassed_asset_id||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3912: l_mem_period_counter||':'||g_mem_ytd_deprn||':'||g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
3913: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3907: if (p_log_level_rec.statement_level) then
3908: fa_debug_pkg.add(l_calling_fn, 'Insert new row for proceessing','Start', p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3910: l_asset_hdr_rec.book_type_code||':'||p_reclassed_asset_id||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3912: l_mem_period_counter||':'||g_mem_ytd_deprn||':'||g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
3913: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3914: g_mem_bonus_ytd_deprn||':'||g_mem_bonus_deprn_reserve||':'||g_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
3915: end if;
3909: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3910: l_asset_hdr_rec.book_type_code||':'||p_reclassed_asset_id||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3912: l_mem_period_counter||':'||g_mem_ytd_deprn||':'||g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
3913: fa_debug_pkg.add(l_calling_fn, 'Insert row',
3914: g_mem_bonus_ytd_deprn||':'||g_mem_bonus_deprn_reserve||':'||g_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
3915: end if;
3916:
3917: -- Query YTD and Reserve from FA_DEPRN_SUMMARY for addition
4035:
4036: end if;
4037:
4038: if (p_log_level_rec.statement_level) then
4039: fa_debug_pkg.add(l_calling_fn, 'Inserted rows','Without Error', p_log_level_rec => p_log_level_rec);
4040: end if;
4041:
4042: exception
4043: when others then
4041:
4042: exception
4043: when others then
4044: if (p_log_level_rec.statement_level) then
4045: fa_debug_pkg.add(l_calling_fn, 'Insert new row for proceessing','Error', p_log_level_rec => p_log_level_rec);
4046: end if;
4047: null;
4048: end;
4049: end if;
4076: close c_get_current_period;
4077:
4078: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4079: if (p_log_level_rec.statement_level) then
4080: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4081: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4082: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4083: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4084: end if;
4077:
4078: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4079: if (p_log_level_rec.statement_level) then
4080: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4081: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4082: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4083: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4084: end if;
4085: open c_get_mem_bs_row;
4078: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4079: if (p_log_level_rec.statement_level) then
4080: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4081: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4082: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4083: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4084: end if;
4085: open c_get_mem_bs_row;
4086: fetch c_get_mem_bs_row into g_mem_ytd_deprn,g_mem_deprn_reserve,
4079: if (p_log_level_rec.statement_level) then
4080: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4081: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4082: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4083: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4084: end if;
4085: open c_get_mem_bs_row;
4086: fetch c_get_mem_bs_row into g_mem_ytd_deprn,g_mem_deprn_reserve,
4087: g_mem_bonus_ytd_deprn,g_mem_bonus_deprn_reserve,g_mem_eofy_reserve,
4119: close c_get_current_period_mrc;
4120:
4121: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4122: if (p_log_level_rec.statement_level) then
4123: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4124: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4125: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4126: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4127: end if;
4120:
4121: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4122: if (p_log_level_rec.statement_level) then
4123: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4124: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4125: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4126: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4127: end if;
4128: open c_get_mem_bs_row_mrc;
4121: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' then
4122: if (p_log_level_rec.statement_level) then
4123: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4124: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4125: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4126: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4127: end if;
4128: open c_get_mem_bs_row_mrc;
4129: fetch c_get_mem_bs_row_mrc into g_mem_ytd_deprn,g_mem_deprn_reserve,
4122: if (p_log_level_rec.statement_level) then
4123: fa_debug_pkg.add(l_calling_fn, 'l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
4124: fa_debug_pkg.add(l_calling_fn, 'p_Asset_hdr_rec.book_type_code', p_Asset_hdr_rec.book_type_code, p_log_level_rec => p_log_level_rec);
4125: fa_debug_pkg.add(l_calling_fn, 'p_reclassed_asset_id', p_reclassed_asset_id, p_log_level_rec => p_log_level_rec);
4126: fa_debug_pkg.add(l_calling_fn, 'p_asset_hdr_rec.asset_id', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
4127: end if;
4128: open c_get_mem_bs_row_mrc;
4129: fetch c_get_mem_bs_row_mrc into g_mem_ytd_deprn,g_mem_deprn_reserve,
4130: g_mem_bonus_ytd_deprn,g_mem_bonus_deprn_reserve,g_mem_eofy_reserve,
4170: p_mrc_sob_type_code => p_mrc_sob_type_code,
4171: x_deprn_reserve => l_mem_deprn_reserve,
4172: x_eofy_reserve => l_mem_eofy_reserve, p_log_level_rec => p_log_level_rec) then
4173: if (p_log_level_rec.statement_level) then
4174: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'populate_member_reserve', p_log_level_rec => p_log_level_rec);
4175: end if;
4176:
4177: raise calc_failed;
4178: end if;
4177: raise calc_failed;
4178: end if;
4179:
4180: if (p_log_level_rec.statement_level) then
4181: fa_debug_pkg.add(l_calling_fn, '++ This is after POPULATE_MEMBER_RESERVE ++', '+++++', p_log_level_rec => p_log_level_rec);
4182: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', l_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4183: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', l_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4184: end if;
4185:
4178: end if;
4179:
4180: if (p_log_level_rec.statement_level) then
4181: fa_debug_pkg.add(l_calling_fn, '++ This is after POPULATE_MEMBER_RESERVE ++', '+++++', p_log_level_rec => p_log_level_rec);
4182: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', l_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4183: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', l_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4184: end if;
4185:
4186: --
4179:
4180: if (p_log_level_rec.statement_level) then
4181: fa_debug_pkg.add(l_calling_fn, '++ This is after POPULATE_MEMBER_RESERVE ++', '+++++', p_log_level_rec => p_log_level_rec);
4182: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', l_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4183: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', l_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4184: end if;
4185:
4186: --
4187: -- Get period information of the period from member dpis
4193: l_period_rec,
4194: p_log_level_rec) then
4195:
4196: if (p_log_level_rec.statement_level) then
4197: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
4198: end if;
4199:
4200: raise calc_failed;
4201:
4209:
4210: l_mem_loop_first := TRUE;
4211:
4212: If (p_log_level_rec.statement_level) then
4213: fa_debug_pkg.add(l_calling_fn, '++ This is a case for ALLOCATE and reclass in source group ++', '+++++', p_log_level_rec => p_log_level_rec);
4214: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', g_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4216: end if;
4217: /*115.211.211 branch to mainline porting - strats*/
4210: l_mem_loop_first := TRUE;
4211:
4212: If (p_log_level_rec.statement_level) then
4213: fa_debug_pkg.add(l_calling_fn, '++ This is a case for ALLOCATE and reclass in source group ++', '+++++', p_log_level_rec => p_log_level_rec);
4214: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', g_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4216: end if;
4217: /*115.211.211 branch to mainline porting - strats*/
4218: if (fa_cache_pkg.fazcdbr_record.rule_name <> 'ENERGY PERIOD END BALANCE') then
4211:
4212: If (p_log_level_rec.statement_level) then
4213: fa_debug_pkg.add(l_calling_fn, '++ This is a case for ALLOCATE and reclass in source group ++', '+++++', p_log_level_rec => p_log_level_rec);
4214: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', g_mem_deprn_reserve, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add(l_calling_fn, 'x_eofy_reserve', g_mem_eofy_reserve, p_log_level_rec => p_log_level_rec);
4216: end if;
4217: /*115.211.211 branch to mainline porting - strats*/
4218: if (fa_cache_pkg.fazcdbr_record.rule_name <> 'ENERGY PERIOD END BALANCE') then
4219: if not GetPeriodInfo(to_number(to_char(p_reclassed_asset_dpis, 'J')),
4223: l_period_rec,
4224: p_log_level_rec) then
4225:
4226: if (p_log_level_rec.statement_level) then
4227: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
4228: end if;
4229:
4230: raise calc_failed;
4231:
4256: l_period_rec,
4257: p_log_level_rec) then
4258:
4259: if (p_log_level_rec.statement_level) then
4260: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
4261: end if;
4262:
4263: raise calc_failed;
4264:
4297:
4298: l_period_counter := l_period_rec.period_counter - 1;
4299:
4300: if (p_log_level_rec.statement_level) then
4301: fa_debug_pkg.add(l_calling_fn, 'Starting Period',
4302: l_period_counter, p_log_level_rec => p_log_level_rec);
4303: end if;
4304:
4305: if (p_mrc_sob_type_code = 'R') then
4493: */
4494: l_count := fa_amort_pvt.t_period_counter.COUNT;
4495:
4496: if (p_log_level_rec.statement_level) then
4497: fa_debug_pkg.add(l_calling_fn, 'Number of period fetched', l_count, p_log_level_rec => p_log_level_rec);
4498: end if;
4499:
4500: if (l_count = 1) then
4501: --
4563:
4564: end if; -- (l_count = 1)
4565:
4566: if (p_log_level_rec.statement_level) then
4567: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve', l_eofy_reserve, p_log_level_rec => p_log_level_rec);
4568: end if;
4569:
4570: /*** REMOVED
4571: end if;
4586: end if;
4587: --tk_util.debug('l_bs_ind: '||to_char(l_bs_ind));
4588:
4589: if (p_log_level_rec.statement_level) then
4590: fa_debug_pkg.add(l_calling_fn, 'Populating local fin_rec_old',
4591: fa_amort_pvt.t_cost(l_bs_ind));
4592: end if;
4593:
4594: l_asset_fin_rec_old.cost := fa_amort_pvt.t_cost(l_bs_ind);
4701: l_reserve_retired := p_asset_fin_rec_adj.cost + l_proceeds_of_sale - l_cost_of_removal + nvl(l_recapture_amount,0);
4702: end if;
4703:
4704: if (p_log_level_rec.statement_level) then
4705: fa_debug_pkg.add(l_calling_fn, 'This is Reinstatement', l_reserve_retired, p_log_level_rec => p_log_level_rec);
4706: end if;
4707:
4708: else
4709: l_reserve_retired := 0;
4812: FOR i IN l_bs_ind..l_count LOOP
4813: d := d + 1;
4814:
4815: if (p_log_level_rec.statement_level) then
4816: fa_debug_pkg.add(l_calling_fn, 'Processing period',
4817: fa_amort_pvt.t_period_counter(i));
4818: end if;
4819:
4820: if i <> 1 then
4834:
4835: --tk_util.debug('td_cost('||to_char(d)||'): '||to_char(td_cost(d)));
4836: --tk_util.debug('l_trx_period_rec.period_counter: '||to_char(l_trx_period_rec.period_counter));
4837: if (p_log_level_rec.statement_level) then
4838: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_change_in_cost(i)' , fa_amort_pvt.t_change_in_cost(i), p_log_level_rec);
4839: fa_debug_pkg.add(l_calling_fn, 'td_cost(d)' , td_cost(d), p_log_level_rec);
4840: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_reclass.cost' , l_asset_fin_rec_reclass.cost, p_log_level_rec);
4841: end if;
4842:
4835: --tk_util.debug('td_cost('||to_char(d)||'): '||to_char(td_cost(d)));
4836: --tk_util.debug('l_trx_period_rec.period_counter: '||to_char(l_trx_period_rec.period_counter));
4837: if (p_log_level_rec.statement_level) then
4838: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_change_in_cost(i)' , fa_amort_pvt.t_change_in_cost(i), p_log_level_rec);
4839: fa_debug_pkg.add(l_calling_fn, 'td_cost(d)' , td_cost(d), p_log_level_rec);
4840: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_reclass.cost' , l_asset_fin_rec_reclass.cost, p_log_level_rec);
4841: end if;
4842:
4843: if (p_reclass_src_dest = 'DESTINATION') and
4836: --tk_util.debug('l_trx_period_rec.period_counter: '||to_char(l_trx_period_rec.period_counter));
4837: if (p_log_level_rec.statement_level) then
4838: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_change_in_cost(i)' , fa_amort_pvt.t_change_in_cost(i), p_log_level_rec);
4839: fa_debug_pkg.add(l_calling_fn, 'td_cost(d)' , td_cost(d), p_log_level_rec);
4840: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_reclass.cost' , l_asset_fin_rec_reclass.cost, p_log_level_rec);
4841: end if;
4842:
4843: if (p_reclass_src_dest = 'DESTINATION') and
4844: (l_trx_period_rec.period_counter = fa_amort_pvt.t_period_counter(i)) then
4890: else
4891: --bug6903588: Need to back out this fix as it was distructing the testcase for this bug
4892: -- Cannot reproduce during the test.
4893: if (p_log_level_rec.statement_level) then
4894: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_cost(i - 1)' , fa_amort_pvt.t_cost(i - 1), p_log_level_rec);
4895: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_change_in_cost(i)' , fa_amort_pvt.t_change_in_cost(i), p_log_level_rec);
4896: end if;
4897: fa_amort_pvt.t_cost(i) := fa_amort_pvt.t_cost(i - 1) + fa_amort_pvt.t_change_in_cost(i);
4898: fa_amort_pvt.t_cip_cost(i) := fa_amort_pvt.t_cip_cost(i - 1) + fa_amort_pvt.t_change_in_cip_cost(i);
4891: --bug6903588: Need to back out this fix as it was distructing the testcase for this bug
4892: -- Cannot reproduce during the test.
4893: if (p_log_level_rec.statement_level) then
4894: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_cost(i - 1)' , fa_amort_pvt.t_cost(i - 1), p_log_level_rec);
4895: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_change_in_cost(i)' , fa_amort_pvt.t_change_in_cost(i), p_log_level_rec);
4896: end if;
4897: fa_amort_pvt.t_cost(i) := fa_amort_pvt.t_cost(i - 1) + fa_amort_pvt.t_change_in_cost(i);
4898: fa_amort_pvt.t_cip_cost(i) := fa_amort_pvt.t_cip_cost(i - 1) + fa_amort_pvt.t_change_in_cip_cost(i);
4899:
5020: fa_amort_pvt.t_allowed_deprn_limit_amount(i) := null;
5021: end if;
5022:
5023: if (p_log_level_rec.statement_level) then
5024: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_type('||to_char(i)||')',
5025: fa_amort_pvt.t_salvage_type(i));
5026: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_percent_salvage_value('||to_char(i)||')',
5027: fa_amort_pvt.t_percent_salvage_value(i));
5028: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_value('||to_char(i)||')',
5022:
5023: if (p_log_level_rec.statement_level) then
5024: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_type('||to_char(i)||')',
5025: fa_amort_pvt.t_salvage_type(i));
5026: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_percent_salvage_value('||to_char(i)||')',
5027: fa_amort_pvt.t_percent_salvage_value(i));
5028: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_value('||to_char(i)||')',
5029: fa_amort_pvt.t_salvage_value(i));
5030: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_member_salvage_value('||to_char(i)||')',
5024: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_type('||to_char(i)||')',
5025: fa_amort_pvt.t_salvage_type(i));
5026: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_percent_salvage_value('||to_char(i)||')',
5027: fa_amort_pvt.t_percent_salvage_value(i));
5028: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_value('||to_char(i)||')',
5029: fa_amort_pvt.t_salvage_value(i));
5030: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_member_salvage_value('||to_char(i)||')',
5031: fa_amort_pvt.t_member_salvage_value(i));
5032: fa_debug_pkg.add(l_calling_fn,
5026: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_percent_salvage_value('||to_char(i)||')',
5027: fa_amort_pvt.t_percent_salvage_value(i));
5028: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_value('||to_char(i)||')',
5029: fa_amort_pvt.t_salvage_value(i));
5030: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_member_salvage_value('||to_char(i)||')',
5031: fa_amort_pvt.t_member_salvage_value(i));
5032: fa_debug_pkg.add(l_calling_fn,
5033: 'fa_amort_pvt.t_deprn_limit_type('||to_char(i)||')',
5034: fa_amort_pvt.t_deprn_limit_type(i));
5028: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_salvage_value('||to_char(i)||')',
5029: fa_amort_pvt.t_salvage_value(i));
5030: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_member_salvage_value('||to_char(i)||')',
5031: fa_amort_pvt.t_member_salvage_value(i));
5032: fa_debug_pkg.add(l_calling_fn,
5033: 'fa_amort_pvt.t_deprn_limit_type('||to_char(i)||')',
5034: fa_amort_pvt.t_deprn_limit_type(i));
5035: fa_debug_pkg.add(l_calling_fn,
5036: 'fa_amort_pvt.t_allowed_deprn_limit('||to_char(i)||')',
5031: fa_amort_pvt.t_member_salvage_value(i));
5032: fa_debug_pkg.add(l_calling_fn,
5033: 'fa_amort_pvt.t_deprn_limit_type('||to_char(i)||')',
5034: fa_amort_pvt.t_deprn_limit_type(i));
5035: fa_debug_pkg.add(l_calling_fn,
5036: 'fa_amort_pvt.t_allowed_deprn_limit('||to_char(i)||')',
5037: fa_amort_pvt.t_allowed_deprn_limit(i));
5038: fa_debug_pkg.add(l_calling_fn,
5039: 'fa_amort_pvt.t_allowed_deprn_limit_amount('||to_char(i)||')',
5034: fa_amort_pvt.t_deprn_limit_type(i));
5035: fa_debug_pkg.add(l_calling_fn,
5036: 'fa_amort_pvt.t_allowed_deprn_limit('||to_char(i)||')',
5037: fa_amort_pvt.t_allowed_deprn_limit(i));
5038: fa_debug_pkg.add(l_calling_fn,
5039: 'fa_amort_pvt.t_allowed_deprn_limit_amount('||to_char(i)||')',
5040: fa_amort_pvt.t_allowed_deprn_limit_amount(i));
5041: fa_debug_pkg.add(l_calling_fn,
5042: 'fa_amort_pvt.t_member_deprn_limit_amount('||to_char(i)||')',
5037: fa_amort_pvt.t_allowed_deprn_limit(i));
5038: fa_debug_pkg.add(l_calling_fn,
5039: 'fa_amort_pvt.t_allowed_deprn_limit_amount('||to_char(i)||')',
5040: fa_amort_pvt.t_allowed_deprn_limit_amount(i));
5041: fa_debug_pkg.add(l_calling_fn,
5042: 'fa_amort_pvt.t_member_deprn_limit_amount('||to_char(i)||')',
5043: fa_amort_pvt.t_member_deprn_limit_amount(i));
5044: end if;
5045:
5070:
5071: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5072:
5073: if (p_log_level_rec.statement_level) then
5074: fa_debug_pkg.add('tk','1',fa_amort_pvt.t_member_salvage_value(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5071: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5072:
5073: if (p_log_level_rec.statement_level) then
5074: fa_debug_pkg.add('tk','1',fa_amort_pvt.t_member_salvage_value(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5072:
5073: if (p_log_level_rec.statement_level) then
5074: fa_debug_pkg.add('tk','1',fa_amort_pvt.t_member_salvage_value(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5073: if (p_log_level_rec.statement_level) then
5074: fa_debug_pkg.add('tk','1',fa_amort_pvt.t_member_salvage_value(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5074: fa_debug_pkg.add('tk','1',fa_amort_pvt.t_member_salvage_value(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5075: fa_debug_pkg.add('tk','2', fa_amort_pvt.t_member_deprn_limit_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5076: fa_debug_pkg.add('tk','3', fa_amort_pvt.t_percent_salvage_value(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5084: fa_debug_pkg.add('tk','1', fa_amort_pvt.t_reserve_adjustment_amount(i-1));
5077: fa_debug_pkg.add('tk','4', fa_amort_pvt.t_allowed_deprn_limit(i-1));
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5084: fa_debug_pkg.add('tk','1', fa_amort_pvt.t_reserve_adjustment_amount(i-1));
5085: end if;
5078: fa_debug_pkg.add('tk','5', fa_amort_pvt.t_salvage_value(i-1));
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5084: fa_debug_pkg.add('tk','1', fa_amort_pvt.t_reserve_adjustment_amount(i-1));
5085: end if;
5086:
5079: fa_debug_pkg.add('tk','6', fa_amort_pvt.t_allowed_deprn_limit_amount(i-1));
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5084: fa_debug_pkg.add('tk','1', fa_amort_pvt.t_reserve_adjustment_amount(i-1));
5085: end if;
5086:
5087: elsif ((p_reclass_src_dest is not null) and
5080: fa_debug_pkg.add('tk','7', fa_amort_pvt.t_deprn_method_code(i-1));
5081: fa_debug_pkg.add('tk','8', fa_amort_pvt.t_adjusted_rate(i-1));
5082: fa_debug_pkg.add('tk','9', fa_amort_pvt.t_bonus_rule(i-1));
5083: fa_debug_pkg.add('tk','0', fa_amort_pvt.t_expense_adjustment_amount(i-1));
5084: fa_debug_pkg.add('tk','1', fa_amort_pvt.t_reserve_adjustment_amount(i-1));
5085: end if;
5086:
5087: elsif ((p_reclass_src_dest is not null) and
5088: --bug3872075: Need group's change_in_cost etc instead of delta
5092:
5093: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5094:
5095: if (p_log_level_rec.statement_level) then
5096: fa_debug_pkg.add(l_calling_fn, 'Reclass trx and still change in', 'COST', p_log_level_rec => p_log_level_rec);
5097: end if;
5098:
5099: else
5100: if (p_log_level_rec.statement_level) then
5097: end if;
5098:
5099: else
5100: if (p_log_level_rec.statement_level) then
5101: fa_debug_pkg.add(l_calling_fn, 'Setting reset adj cost flag to ', 'N', p_log_level_rec => p_log_level_rec);
5102: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Not Required', p_log_level_rec => p_log_level_rec);
5103: end if;
5104:
5105: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'N';
5098:
5099: else
5100: if (p_log_level_rec.statement_level) then
5101: fa_debug_pkg.add(l_calling_fn, 'Setting reset adj cost flag to ', 'N', p_log_level_rec => p_log_level_rec);
5102: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Not Required', p_log_level_rec => p_log_level_rec);
5103: end if;
5104:
5105: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'N';
5106:
5112: (nvl(fa_amort_pvt.t_change_in_cip_cost(i), 0) <> 0)) then
5113:
5114: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5115: if (p_log_level_rec.statement_level) then
5116: fa_debug_pkg.add(l_calling_fn, 'There is still something changed', 'Resetting adj cost required', p_log_level_rec => p_log_level_rec);
5117: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Still Required', p_log_level_rec => p_log_level_rec);
5118: end if;
5119: elsif (nvl(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') = 'Y') then -- Added for bug 8425794 / 8244128
5120: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5113:
5114: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5115: if (p_log_level_rec.statement_level) then
5116: fa_debug_pkg.add(l_calling_fn, 'There is still something changed', 'Resetting adj cost required', p_log_level_rec => p_log_level_rec);
5117: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Still Required', p_log_level_rec => p_log_level_rec);
5118: end if;
5119: elsif (nvl(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') = 'Y') then -- Added for bug 8425794 / 8244128
5120: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5121: if (p_log_level_rec.statement_level) then
5118: end if;
5119: elsif (nvl(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') = 'Y') then -- Added for bug 8425794 / 8244128
5120: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5121: if (p_log_level_rec.statement_level) then
5122: fa_debug_pkg.add(l_calling_fn, 'There is still something changed', 'Resetting adj cost required', p_log_level_rec => p_log_level_rec);
5123: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Still Required', p_log_level_rec => p_log_level_rec);
5124: end if;
5125: else
5126: fa_amort_pvt.t_adjusted_cost(i) := fa_amort_pvt.t_adjusted_cost(i-1);
5119: elsif (nvl(fa_cache_pkg.fazcdrd_record.period_update_flag,'N') = 'Y') then -- Added for bug 8425794 / 8244128
5120: fa_amort_pvt.t_reset_adjusted_cost_flag(i) := 'Y';
5121: if (p_log_level_rec.statement_level) then
5122: fa_debug_pkg.add(l_calling_fn, 'There is still something changed', 'Resetting adj cost required', p_log_level_rec => p_log_level_rec);
5123: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost', 'Still Required', p_log_level_rec => p_log_level_rec);
5124: end if;
5125: else
5126: fa_amort_pvt.t_adjusted_cost(i) := fa_amort_pvt.t_adjusted_cost(i-1);
5127: -- Bug5732277: Adding following to reflect adjusted_cost
5128: l_asset_fin_rec_new.adjusted_cost := fa_amort_pvt.t_adjusted_cost(i);
5129: l_prev_adj_cost_flag := TRUE; --bug#15897249
5130:
5131: if (p_log_level_rec.statement_level) then
5132: fa_debug_pkg.add(l_calling_fn, 'Inheriting adj cost from', 'Previous Period', p_log_level_rec => p_log_level_rec);
5133: end if;
5134:
5135: end if;
5136:
5139: -- Bug5732277: Adding following to reflect adjusted_cost
5140: l_asset_fin_rec_new.adjusted_cost := fa_amort_pvt.t_adjusted_cost(i);
5141:
5142: if (p_log_level_rec.statement_level) then
5143: fa_debug_pkg.add(l_calling_fn, 'Resetting adjusted cost with ', '0', p_log_level_rec => p_log_level_rec);
5144: end if;
5145: end if;
5146:
5147: if (p_log_level_rec.statement_level) then
5144: end if;
5145: end if;
5146:
5147: if (p_log_level_rec.statement_level) then
5148: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_adjusted_cost('||to_char(i)||')', fa_amort_pvt.t_adjusted_cost(i));
5149: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
5150: end if;
5151:
5152: end if; -- (i = 1) or
5145: end if;
5146:
5147: if (p_log_level_rec.statement_level) then
5148: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_adjusted_cost('||to_char(i)||')', fa_amort_pvt.t_adjusted_cost(i));
5149: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
5150: end if;
5151:
5152: end if; -- (i = 1) or
5153:
5187: nvl(p_asset_fin_rec_adj.reval_amortization_basis, 0);
5188:
5189:
5190: if (p_log_level_rec.statement_level) then
5191: fa_debug_pkg.add(l_calling_fn, 'Finish Populating Global Variables', ' ', p_log_level_rec => p_log_level_rec);
5192: end if;
5193:
5194: -- fa_amort_pvt.t_reval_ceiling(i) :=
5195:
5241: p_trans_rec.transaction_key = 'MS' and
5242: nvl(p_asset_deprn_rec_adj.deprn_amount, 0) <> 0 then
5243: fa_amort_pvt.t_deprn_amount(i) := fa_amort_pvt.t_expense_adjustment_amount(i);
5244: if (p_log_level_rec.statement_level) then
5245: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_amount('||to_char(i)||')', fa_amort_pvt.t_deprn_amount(i), p_log_level_rec);
5246: end if;
5247: end if;
5248:
5249: if ((l_bs_ind <= i) and
5264: else
5265:
5266: -- HHIRAGA Added code for current period reclass under tracking
5267: if (p_log_level_rec.statement_level) then
5268: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: tracking_method', px_asset_fin_rec_new.tracking_method, p_log_level_rec => p_log_level_rec);
5269: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
5270: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_current_period_counter', l_current_period_counter, p_log_level_rec => p_log_level_rec);
5271: end if;
5272:
5265:
5266: -- HHIRAGA Added code for current period reclass under tracking
5267: if (p_log_level_rec.statement_level) then
5268: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: tracking_method', px_asset_fin_rec_new.tracking_method, p_log_level_rec => p_log_level_rec);
5269: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
5270: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_current_period_counter', l_current_period_counter, p_log_level_rec => p_log_level_rec);
5271: end if;
5272:
5273: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'CALCULATE' and
5266: -- HHIRAGA Added code for current period reclass under tracking
5267: if (p_log_level_rec.statement_level) then
5268: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: tracking_method', px_asset_fin_rec_new.tracking_method, p_log_level_rec => p_log_level_rec);
5269: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_trx_period_rec.period_counter', l_trx_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
5270: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: l_current_period_counter', l_current_period_counter, p_log_level_rec => p_log_level_rec);
5271: end if;
5272:
5273: if nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'CALCULATE' and
5274: l_trx_period_rec.period_counter = l_current_period_counter then
5287: fa_amort_pvt.t_eofy_reserve(i) := fa_amort_pvt.t_eofy_reserve(i) - l_mem_eofy_reserve;
5288: fa_amort_pvt.t_change_in_eofy_reserve(i) := (-1)* l_mem_eofy_reserve;
5289:
5290: if (p_log_level_rec.statement_level) then
5291: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
5292: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: reserve_adjustment_amount',
5293: fa_amort_pvt.t_reserve_adjustment_amount(i));
5294: end if;
5295:
5288: fa_amort_pvt.t_change_in_eofy_reserve(i) := (-1)* l_mem_eofy_reserve;
5289:
5290: if (p_log_level_rec.statement_level) then
5291: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
5292: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: reserve_adjustment_amount',
5293: fa_amort_pvt.t_reserve_adjustment_amount(i));
5294: end if;
5295:
5296: elsif nvl(px_asset_fin_rec_new.tracking_method,'NULL') = 'ALLOCATE' and
5314: fa_amort_pvt.t_change_in_eofy_reserve(i) := (-1)* l_mem_eofy_reserve;
5315: l_mem_loop_first := FALSE;
5316:
5317: if (p_log_level_rec.statement_level) then
5318: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
5319: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: reserve_adjustment_amount',
5320: fa_amort_pvt.t_reserve_adjustment_amount(i));
5321: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: eofy_reserve',
5322: fa_amort_pvt.t_eofy_reserve(i));
5315: l_mem_loop_first := FALSE;
5316:
5317: if (p_log_level_rec.statement_level) then
5318: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
5319: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: reserve_adjustment_amount',
5320: fa_amort_pvt.t_reserve_adjustment_amount(i));
5321: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: eofy_reserve',
5322: fa_amort_pvt.t_eofy_reserve(i));
5323: end if;
5317: if (p_log_level_rec.statement_level) then
5318: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
5319: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: reserve_adjustment_amount',
5320: fa_amort_pvt.t_reserve_adjustment_amount(i));
5321: fa_debug_pkg.add(l_calling_fn, 'HHIRAGA Debug: eofy_reserve',
5322: fa_amort_pvt.t_eofy_reserve(i));
5323: end if;
5324:
5325: else
5399: end if;
5400:
5401: /* TEST BY HH */
5402: if (p_log_level_rec.statement_level) then
5403: fa_debug_pkg.add(l_calling_fn, 'HH CHECK i =',
5404: i || 'at Line Number from 4555', p_log_level_rec => p_log_level_rec);
5405: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_amount(i)',
5406: fa_amort_pvt.t_deprn_amount(i));
5407: if (i > 1) then
5401: /* TEST BY HH */
5402: if (p_log_level_rec.statement_level) then
5403: fa_debug_pkg.add(l_calling_fn, 'HH CHECK i =',
5404: i || 'at Line Number from 4555', p_log_level_rec => p_log_level_rec);
5405: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_amount(i)',
5406: fa_amort_pvt.t_deprn_amount(i));
5407: if (i > 1) then
5408: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve(i - 1)',
5409: fa_amort_pvt.t_deprn_reserve(i - 1));
5404: i || 'at Line Number from 4555', p_log_level_rec => p_log_level_rec);
5405: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_amount(i)',
5406: fa_amort_pvt.t_deprn_amount(i));
5407: if (i > 1) then
5408: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve(i - 1)',
5409: fa_amort_pvt.t_deprn_reserve(i - 1));
5410: end if;
5411: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reserve_adjustment_amount(i)',
5412: fa_amort_pvt.t_reserve_adjustment_amount(i));
5407: if (i > 1) then
5408: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve(i - 1)',
5409: fa_amort_pvt.t_deprn_reserve(i - 1));
5410: end if;
5411: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reserve_adjustment_amount(i)',
5412: fa_amort_pvt.t_reserve_adjustment_amount(i));
5413: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve(i)',
5414: fa_amort_pvt.t_deprn_reserve(i));
5415:
5409: fa_amort_pvt.t_deprn_reserve(i - 1));
5410: end if;
5411: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reserve_adjustment_amount(i)',
5412: fa_amort_pvt.t_reserve_adjustment_amount(i));
5413: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve(i)',
5414: fa_amort_pvt.t_deprn_reserve(i));
5415:
5416: end if;
5417: /* End of TEST BY HH */
5577: fa_amort_pvt.t_deprn_method_code(i),
5578: fa_amort_pvt.t_life_in_months(i),
5579: p_log_level_rec)) then
5580: if (p_log_level_rec.statement_level) then
5581: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5582: 'fa_cache_pkg.fazccmt', p_log_level_rec => p_log_level_rec);
5583: end if;
5584:
5585: raise calc_failed;
5592: g_temp_number,
5593: l_dpr_in.y_begin,
5594: g_temp_integer, p_log_level_rec => p_log_level_rec) then
5595: if (p_log_level_rec.statement_level) then
5596: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5597: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5598: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5599: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5600: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5594: g_temp_integer, p_log_level_rec => p_log_level_rec) then
5595: if (p_log_level_rec.statement_level) then
5596: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5597: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5598: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5599: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5600: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5601: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
5602:
5596: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5597: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5598: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5599: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5600: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5601: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
5602:
5603: end if;
5604:
5629: g_temp_number,
5630: l_dpr_in.y_begin,
5631: g_temp_integer, p_log_level_rec => p_log_level_rec) then
5632: if (p_log_level_rec.statement_level) then
5633: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5634: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5635: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5636: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5637: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5631: g_temp_integer, p_log_level_rec => p_log_level_rec) then
5632: if (p_log_level_rec.statement_level) then
5633: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5634: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5635: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5636: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5637: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5638: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
5639:
5633: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5634: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
5635: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
5636: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
5637: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
5638: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
5639:
5640: end if;
5641:
5693: p_asset_fin_rec => px_asset_fin_rec_new,
5694: p_dpr_in => l_dpr_in,
5695: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5696: if (p_log_level_rec.statement_level) then
5697: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'FA_TRACK_MEMBER_PVT.get_member_at_start', p_log_level_rec => p_log_level_rec);
5698: end if;
5699:
5700: raise calc_failed;
5701:
5703: */
5704: end if; -- nvl(l_dpr_in.tracking_method,'OTHER') = 'ALLOCATE'
5705:
5706: if (p_log_level_rec.statement_level) then
5707: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5708: fa_debug_pkg.add(l_calling_fn, ' Call ', 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
5709: end if;
5710:
5711: --+++++++ Call Depreciation engine for rate adjustment factor +++++++
5704: end if; -- nvl(l_dpr_in.tracking_method,'OTHER') = 'ALLOCATE'
5705:
5706: if (p_log_level_rec.statement_level) then
5707: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5708: fa_debug_pkg.add(l_calling_fn, ' Call ', 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
5709: end if;
5710:
5711: --+++++++ Call Depreciation engine for rate adjustment factor +++++++
5712: if not FA_CDE_PKG.faxcde(l_dpr_in,
5713: l_dpr_arr,
5714: l_dpr_out,
5715: l_running_mode, p_log_level_rec => p_log_level_rec) then
5716: if (p_log_level_rec.statement_level) then
5717: fa_debug_pkg.add(l_calling_fn, 'Error calling',
5718: 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
5719: end if;
5720:
5721: raise calc_failed;
5721: raise calc_failed;
5722: end if;
5723:
5724: if (p_log_level_rec.statement_level) then
5725: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
5726: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
5727: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5728: end if;
5729:
5723:
5724: if (p_log_level_rec.statement_level) then
5725: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
5726: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
5727: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5728: end if;
5729:
5730: -- manual override
5731: if fa_cache_pkg.fa_deprn_override_enabled then
5762: fa_track_member_pvt.p_track_member_table.delete;
5763: fa_track_member_pvt.p_track_mem_index_table.delete;
5764:
5765: if (p_log_level_rec.statement_level) then
5766: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.p_track_member_table',
5767: 'deleted', p_log_level_rec => p_log_level_rec);
5768: end if;
5769: end if;
5770: end if;
5780: end if; ---- skip faxcde call for raf
5781:
5782:
5783: if (p_log_level_rec.statement_level) then
5784: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5785: fa_debug_pkg.add(l_calling_fn, ' Call ',
5786: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
5787: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
5788: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5781:
5782:
5783: if (p_log_level_rec.statement_level) then
5784: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5785: fa_debug_pkg.add(l_calling_fn, ' Call ',
5786: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
5787: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
5788: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5789: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
5783: if (p_log_level_rec.statement_level) then
5784: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
5785: fa_debug_pkg.add(l_calling_fn, ' Call ',
5786: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
5787: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
5788: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5789: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
5790: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5791: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
5785: fa_debug_pkg.add(l_calling_fn, ' Call ',
5786: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
5787: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
5788: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5789: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
5790: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5791: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
5792: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
5793: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
5787: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
5788: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5789: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
5790: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5791: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
5792: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
5793: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
5794: l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
5795: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.bonus_deprn_reserve',
5789: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
5790: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
5791: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
5792: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
5793: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
5794: l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
5795: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.bonus_deprn_reserve',
5796: l_asset_deprn_rec.bonus_deprn_reserve, p_log_level_rec => p_log_level_rec);
5797: end if;
5791: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
5792: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
5793: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
5794: l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
5795: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.bonus_deprn_reserve',
5796: l_asset_deprn_rec.bonus_deprn_reserve, p_log_level_rec => p_log_level_rec);
5797: end if;
5798:
5799: --* HHIRAGA modified on OCT/NOV in 2003
5817: l_recalc_start_period_num := fa_amort_pvt.t_period_num(i) - 1;
5818: end if;
5819:
5820: if (p_log_level_rec.statement_level) then
5821: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5822: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5818: end if;
5819:
5820: if (p_log_level_rec.statement_level) then
5821: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5822: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5826: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5820: if (p_log_level_rec.statement_level) then
5821: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5822: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5826: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5827: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5828: end if;
5821: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5822: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5826: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5827: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5828: end if;
5829:
5822: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5826: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5827: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5828: end if;
5829:
5830: if (nvl(l_old_recalc_end_fy,l_recalc_start_fy) = l_recalc_start_fy and
5823: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5824: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5825: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5826: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5827: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5828: end if;
5829:
5830: if (nvl(l_old_recalc_end_fy,l_recalc_start_fy) = l_recalc_start_fy and
5831: nvl(l_old_recalc_end_period_num,l_recalc_start_period_num+1) <> l_recalc_start_period_num) then
5847: l_asset_fin_rec_old.tracking_method := NULL;
5848: */
5849:
5850: if (p_log_level_rec.statement_level) then
5851: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5852: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5848: */
5849:
5850: if (p_log_level_rec.statement_level) then
5851: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5852: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5856: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5850: if (p_log_level_rec.statement_level) then
5851: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5852: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5856: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5857: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5858: end if;
5851: fa_debug_pkg.add(l_calling_fn, '++++ Call ++++', 'FA_TRACK_MEMBER_PVT.POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5852: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5856: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5857: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5858: end if;
5859:
5852: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_reset_adjusted_cost_flag(i)',
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5856: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5857: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5858: end if;
5859:
5860: if l_old_recalc_end_fy is not NULL and l_old_recalc_end_period_num is not NULL then
5853: fa_amort_pvt.t_reset_adjusted_cost_flag(i));
5854: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_fy', l_recalc_start_fy, p_log_level_rec => p_log_level_rec);
5855: fa_debug_pkg.add(l_calling_fn, 'l_recalc_start_period_num', l_recalc_start_period_num, p_log_level_rec => p_log_level_rec);
5856: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_fy', l_old_recalc_end_fy, p_log_level_rec => p_log_level_rec);
5857: fa_debug_pkg.add(l_calling_fn, 'l_old_recalc_end_period_num', l_old_recalc_end_period_num, p_log_level_rec => p_log_level_rec);
5858: end if;
5859:
5860: if l_old_recalc_end_fy is not NULL and l_old_recalc_end_period_num is not NULL then
5861: if l_old_recalc_end_period_num = fa_cache_pkg.fazcct_record.number_per_fiscal_year then
5892: p_recalc_start_period_num => l_recalc_start_period_num,
5893: p_no_allocation_for_last => l_no_allocation_for_last,
5894: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5895: if (p_log_level_rec.statement_level) then
5896: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5897: end if;
5898: raise calc_failed;
5899: end if;
5900: else
5907: p_recalc_start_period_num => l_recalc_start_period_num,
5908: p_no_allocation_for_last => l_no_allocation_for_last,
5909: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5910: if (p_log_level_rec.statement_level) then
5911: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5912: end if;
5913: raise calc_failed;
5914: end if;
5915: end if;
5930: p_recalc_start_period_num => l_recalc_start_period_num,
5931: p_no_allocation_for_last => l_no_allocation_for_last,
5932: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5933: if (p_log_level_rec.statement_level) then
5934: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5935: end if;
5936: raise calc_failed;
5937: end if;
5938: else
5945: p_recalc_start_period_num => l_recalc_start_period_num,
5946: p_no_allocation_for_last => l_no_allocation_for_last,
5947: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5948: if (p_log_level_rec.statement_level) then
5949: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5950: end if;
5951: raise calc_failed;
5952: end if;
5953: end if;
5971: p_recalc_start_period_num => l_recalc_start_period_num,
5972: p_no_allocation_for_last => l_no_allocation_for_last,
5973: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
5974: if (p_log_level_rec.statement_level) then
5975: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
5976: end if;
5977: raise calc_failed;
5978: end if;
5979:
5979:
5980: else
5981:
5982: if (p_log_level_rec.statement_level) then
5983: fa_debug_pkg.add(l_calling_fn, '##### bakcup table counter #####',
5984: fa_track_member_pvt.p_track_member_table_for_deprn.COUNT, p_log_level_rec => p_log_level_rec);
5985: end if;
5986:
5987: if not FA_TRACK_MEMBER_PVT.copy_member_table(p_backup_restore => 'RESTORE', p_log_level_rec => p_log_level_rec) then
5985: end if;
5986:
5987: if not FA_TRACK_MEMBER_PVT.copy_member_table(p_backup_restore => 'RESTORE', p_log_level_rec => p_log_level_rec) then
5988: if (p_log_level_rec.statement_level) then
5989: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'COPY_MEMBER_TABLE', p_log_level_rec => p_log_level_rec);
5990: end if;
5991: raise calc_failed;
5992: end if;
5993:
6002: p_recalc_start_period_num => l_recalc_start_period_num,
6003: p_no_allocation_for_last => 'Y',
6004: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
6005: if (p_log_level_rec.statement_level) then
6006: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'POPULATE_MEMBER_ASSETS_TABLE', p_log_level_rec => p_log_level_rec);
6007: end if;
6008: raise calc_failed;
6009: end if;
6010:
6092: px_new_raf => l_asset_fin_rec_new.rate_adjustment_factor,
6093: px_new_formula_factor => l_asset_fin_rec_new.formula_factor,
6094: p_log_level_rec => p_log_level_rec)) then
6095: if (p_log_level_rec.statement_level) then
6096: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6097: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
6098: end if;
6099:
6100: raise calc_failed;
6104: fa_amort_pvt.t_rate_adjustment_factor(i) := l_asset_fin_rec_new.rate_adjustment_factor;
6105: fa_amort_pvt.t_formula_factor(i) := l_asset_fin_rec_new.formula_factor;
6106:
6107: if (p_log_level_rec.statement_level) then
6108: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6109: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
6110: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6111: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6112: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6106:
6107: if (p_log_level_rec.statement_level) then
6108: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6109: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
6110: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6111: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6112: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6113: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6114: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6108: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6109: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
6110: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6111: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6112: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6113: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6114: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6115: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
6116: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
6110: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6111: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6112: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6113: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6114: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6115: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
6116: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
6117: end if;
6118: else
6112: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6113: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6114: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6115: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
6116: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
6117: end if;
6118: else
6119: --
6120: -- Adjusted_cost and formula_factor are setup in last faxcde call so skipping
6162: (not (fa_amort_pvt.t_depreciate_flag(i) = 'NO' or
6163: nvl(px_asset_fin_rec_new.disabled_flag, 'N') = 'Y')) then
6164:
6165: if (p_log_level_rec.statement_level) then
6166: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
6167: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
6168: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6169: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
6170: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6163: nvl(px_asset_fin_rec_new.disabled_flag, 'N') = 'Y')) then
6164:
6165: if (p_log_level_rec.statement_level) then
6166: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
6167: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
6168: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6169: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
6170: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6171: end if;
6165: if (p_log_level_rec.statement_level) then
6166: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
6167: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
6168: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6169: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
6170: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
6171: end if;
6172:
6173: -- look for next period which requires adjusted_cost reset.
6252: l_old_recalc_end_period_num := l_dpr_in.p_cl_end;
6253: --
6254:
6255: if (p_log_level_rec.statement_level) then
6256: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
6257: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
6258: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
6259: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
6260: end if;
6253: --
6254:
6255: if (p_log_level_rec.statement_level) then
6256: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
6257: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
6258: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
6259: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
6260: end if;
6261:
6254:
6255: if (p_log_level_rec.statement_level) then
6256: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
6257: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
6258: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
6259: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
6260: end if;
6261:
6262: if (fa_amort_pvt.t_period_num(i) <> 1) then
6255: if (p_log_level_rec.statement_level) then
6256: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
6257: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
6258: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
6259: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
6260: end if;
6261:
6262: if (fa_amort_pvt.t_period_num(i) <> 1) then
6263: l_dpr_in.deprn_rounding_flag := 'ADJ';
6292: l_dpr_out,
6293: l_running_mode,
6294: i, p_log_level_rec => p_log_level_rec) then
6295: if (p_log_level_rec.statement_level) then
6296: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6297: 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
6298: end if;
6299:
6300: raise calc_failed;
6300: raise calc_failed;
6301: end if;
6302:
6303: if (p_log_level_rec.statement_level) then
6304: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn',
6305: l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
6306: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
6307: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
6308: end if;
6302:
6303: if (p_log_level_rec.statement_level) then
6304: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn',
6305: l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
6306: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
6307: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
6308: end if;
6309:
6310: -- manual override
6357: if not FA_TRACK_MEMBER_PVT.member_eofy_rsv(p_asset_hdr_rec => p_asset_hdr_rec,
6358: p_dpr_in => l_dpr_in,
6359: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
6360: if (p_log_level_rec.statement_level) then
6361: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6362: 'FA_TRACK_MEMBER_PVT.member_eofy_rsv', p_log_level_rec => p_log_level_rec);
6363: end if;
6364:
6365: raise calc_failed;
6366:
6367: end if;
6368:
6369: if (p_log_level_rec.statement_level) then
6370: fa_debug_pkg.add(l_calling_fn, '###### Copy to backup #######',
6371: fa_track_member_pvt.p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
6372: end if;
6373:
6374: if (p_log_level_rec.statement_level) then
6371: fa_track_member_pvt.p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
6372: end if;
6373:
6374: if (p_log_level_rec.statement_level) then
6375: fa_debug_pkg.add(l_calling_fn, '##### bakcup table counter #####',
6376: fa_track_member_pvt.p_track_member_table_for_deprn.COUNT, p_log_level_rec => p_log_level_rec);
6377: end if;
6378:
6379: if not FA_TRACK_MEMBER_PVT.copy_member_table(p_backup_restore => 'BACKUP',
6379: if not FA_TRACK_MEMBER_PVT.copy_member_table(p_backup_restore => 'BACKUP',
6380: p_current_fiscal_year => l_dpr_in.y_begin,
6381: p_current_period_num => l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec) then
6382: if (p_log_level_rec.statement_level) then
6383: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'COPY_MEMBER_TABLE', p_log_level_rec => p_log_level_rec);
6384: end if;
6385: raise calc_failed;
6386: end if;
6387: l_backup_processed_flag := TRUE;
6386: end if;
6387: l_backup_processed_flag := TRUE;
6388:
6389: if (p_log_level_rec.statement_level) then
6390: fa_debug_pkg.add(l_calling_fn, '++++ FA_TRACK_MEMBER_PVT.MEMBER_EOFY_RSV +++', '++++', p_log_level_rec => p_log_level_rec);
6391: fa_debug_pkg.add(l_calling_fn, 'Copied p_track_member_table to bakcup area', '++++', p_log_level_rec => p_log_level_rec);
6392: end if;
6393:
6394: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
6387: l_backup_processed_flag := TRUE;
6388:
6389: if (p_log_level_rec.statement_level) then
6390: fa_debug_pkg.add(l_calling_fn, '++++ FA_TRACK_MEMBER_PVT.MEMBER_EOFY_RSV +++', '++++', p_log_level_rec => p_log_level_rec);
6391: fa_debug_pkg.add(l_calling_fn, 'Copied p_track_member_table to bakcup area', '++++', p_log_level_rec => p_log_level_rec);
6392: end if;
6393:
6394: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
6395: -- End of HHIRAGA
6394: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
6395: -- End of HHIRAGA
6396:
6397: if (p_log_level_rec.statement_level) then
6398: fa_debug_pkg.add(' '||l_calling_fn, 'ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
6399: fa_debug_pkg.add(' '||l_calling_fn, 'deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6400: end if;
6401:
6402: --tk_util.debug('l_adjusted_ind: '||to_char(l_adjusted_ind));
6395: -- End of HHIRAGA
6396:
6397: if (p_log_level_rec.statement_level) then
6398: fa_debug_pkg.add(' '||l_calling_fn, 'ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
6399: fa_debug_pkg.add(' '||l_calling_fn, 'deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6400: end if;
6401:
6402: --tk_util.debug('l_adjusted_ind: '||to_char(l_adjusted_ind));
6403: l_bs_ind := l_bs_ind + l_adjusted_ind;
6413: l_asset_deprn_rec.impairment_reserve := fa_amort_pvt.t_impairment_reserve(i);
6414:
6415:
6416: if (p_log_level_rec.statement_level) then
6417: fa_debug_pkg.add(' '||l_calling_fn, 'Depreciation is ', 'SKIPPED' , p_log_level_rec => p_log_level_rec);
6418: end if;
6419:
6420: end if; -- (l_period_rec.period_counter <> fa_amort_pvt.t_period_counter(i)) or
6421:
6524: px_new_raf => l_asset_fin_rec_new.rate_adjustment_factor,
6525: px_new_formula_factor => l_asset_fin_rec_new.formula_factor,
6526: p_log_level_rec => p_log_level_rec)) then
6527: if (p_log_level_rec.statement_level) then
6528: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6529: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
6530: end if;
6531:
6532: raise calc_failed;
6532: raise calc_failed;
6533: end if; -- (not FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS
6534:
6535: if (p_log_level_rec.statement_level) then
6536: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6537: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
6538: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6539: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6540: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6534:
6535: if (p_log_level_rec.statement_level) then
6536: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6537: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
6538: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6539: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6540: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6541: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6542: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6536: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
6537: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
6538: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6539: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6540: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6541: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6542: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6543: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
6544: end if;
6538: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
6539: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
6540: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
6541: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
6542: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
6543: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
6544: end if;
6545:
6546: px_asset_fin_rec_new.cost := fa_amort_pvt.t_cost(l_count);
6598: x_impairment_expense := nvl(l_asset_deprn_rec.impairment_reserve,0) - nvl(p_asset_deprn_rec.impairment_reserve,0) - nvl(p_asset_deprn_rec_adj.impairment_reserve,0);
6599: end if;
6600:
6601: if (p_log_level_rec.statement_level) then
6602: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6603: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6604: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec.deprn_reserve', p_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6605: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec_adj.deprn_reserve', p_asset_deprn_rec_adj.deprn_reserve, p_log_level_rec => p_log_level_rec);
6606: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve('||to_char(l_count)||')',
6599: end if;
6600:
6601: if (p_log_level_rec.statement_level) then
6602: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6603: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6604: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec.deprn_reserve', p_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6605: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec_adj.deprn_reserve', p_asset_deprn_rec_adj.deprn_reserve, p_log_level_rec => p_log_level_rec);
6606: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve('||to_char(l_count)||')',
6607: fa_amort_pvt.t_deprn_reserve(l_count));
6600:
6601: if (p_log_level_rec.statement_level) then
6602: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6603: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6604: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec.deprn_reserve', p_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6605: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec_adj.deprn_reserve', p_asset_deprn_rec_adj.deprn_reserve, p_log_level_rec => p_log_level_rec);
6606: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve('||to_char(l_count)||')',
6607: fa_amort_pvt.t_deprn_reserve(l_count));
6608: end if;
6601: if (p_log_level_rec.statement_level) then
6602: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6603: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6604: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec.deprn_reserve', p_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6605: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec_adj.deprn_reserve', p_asset_deprn_rec_adj.deprn_reserve, p_log_level_rec => p_log_level_rec);
6606: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve('||to_char(l_count)||')',
6607: fa_amort_pvt.t_deprn_reserve(l_count));
6608: end if;
6609:
6602: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve', x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6603: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6604: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec.deprn_reserve', p_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
6605: fa_debug_pkg.add(l_calling_fn, 'p_asset_deprn_rec_adj.deprn_reserve', p_asset_deprn_rec_adj.deprn_reserve, p_log_level_rec => p_log_level_rec);
6606: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_deprn_reserve('||to_char(l_count)||')',
6607: fa_amort_pvt.t_deprn_reserve(l_count));
6608: end if;
6609:
6610: -- HHIRAGA
6615: p_asset_hdr_rec => p_asset_hdr_rec,
6616: p_dpr_in => l_dpr_in,
6617: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
6618: if (p_log_level_rec.statement_level) then
6619: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6620: 'FA_TRACK_MEMBER_PVT.update_member_books', p_log_level_rec => p_log_level_rec);
6621: end if;
6622:
6623: raise calc_failed;
6625:
6626: fa_track_member_pvt.p_track_member_eofy_table.delete;
6627:
6628: if (p_log_level_rec.statement_level) then
6629: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.p_track_member_eofy_table',
6630: 'deleted', p_log_level_rec => p_log_level_rec);
6631: end if;
6632:
6633: if (p_log_level_rec.statement_level) then
6631: end if;
6632:
6633: if (p_log_level_rec.statement_level) then
6634: for i in 1.. fa_track_member_pvt.p_track_member_table.count loop
6635: fa_debug_pkg.add('HH DEBUG**', 'all records in p_track_member_table', i);
6636: if not fa_track_member_pvt.display_debug_message2(i, 'HH DEBUG**', p_log_leveL_rec) then
6637: null;
6638: end if;
6639: end loop;
6651: p_mrc_sob_type_code => p_mrc_sob_type_code, --Bug 8941132
6652: p_sob_id => p_asset_hdr_rec.set_of_books_id, --Bug 8941132
6653: p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
6654: if (p_log_level_rec.statement_level) then
6655: fa_debug_pkg.add(l_calling_fn, 'Error calling',
6656: 'FA_TRACK_MEMBER_PVT.create_update_bs_table', p_log_level_rec => p_log_level_rec);
6657: end if;
6658:
6659: raise calc_failed;
6856: --
6857: InitGlobeVariables;
6858:
6859: if (p_log_level_rec.statement_level) then
6860: fa_debug_pkg.add(l_calling_fn, 'End',
6861: x_deprn_expense||':'||x_bonus_expense||':'||x_deprn_reserve, p_log_level_rec => p_log_level_rec);
6862: end if;
6863:
6864: return true;
6870: --
6871: InitGlobeVariables;
6872:
6873: if (p_log_level_rec.statement_level) then
6874: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'invalid_trx_to_overlap', p_log_level_rec => p_log_level_rec);
6875: end if;
6876:
6877: fa_srvr_msg.add_message(calling_fn => l_calling_fn,
6878: name => 'FA_INVALID_TRX_TO_OVERLAP', p_log_level_rec => p_log_level_rec);
6883: --
6884: InitGlobeVariables;
6885:
6886: if (p_log_level_rec.statement_level) then
6887: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'calc_failed', p_log_level_rec => p_log_level_rec);
6888: end if;
6889:
6890: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
6891: return false;
6896: --
6897: InitGlobeVariables;
6898:
6899: if (p_log_level_rec.statement_level) then
6900: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
6901: end if;
6902:
6903: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
6904: raise;
7194: --tk_util.debug('-');
7195: --tk_util.debug('-');
7196: --tk_util.debug('-+++++-');
7197: if (p_log_level_rec.statement_level) then
7198: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||':'||
7199: p_asset_hdr_rec.asset_id||':'||
7200: to_char(px_trans_rec.transaction_header_id));
7201: fa_debug_pkg.add(l_calling_fn, 'Begin sob_id', p_asset_hdr_rec.set_of_books_id);
7202:
7197: if (p_log_level_rec.statement_level) then
7198: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||':'||
7199: p_asset_hdr_rec.asset_id||':'||
7200: to_char(px_trans_rec.transaction_header_id));
7201: fa_debug_pkg.add(l_calling_fn, 'Begin sob_id', p_asset_hdr_rec.set_of_books_id);
7202:
7203: end if;
7204:
7205:
7239:
7240: if not check_member_existence (p_asset_hdr_rec => p_asset_hdr_rec,
7241: p_log_level_rec => p_log_level_rec) then
7242: if (p_log_level_rec.statement_level) then
7243: fa_debug_pkg.add(l_calling_fn, 'calling check_member_existence', 'FAILED', p_log_level_rec => p_log_level_rec);
7244: end if;
7245:
7246: l_valid_type_change := FALSE;
7247:
7248: end if;
7249:
7250: else
7251: if (p_log_level_rec.statement_level) then
7252: fa_debug_pkg.add(l_calling_fn, 'Method.deprn_limit type change', 'FAILED', p_log_level_rec => p_log_level_rec);
7253: fa_debug_pkg.add(l_calling_fn, 'cost', px_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
7254: end if;
7255:
7256: l_valid_type_change := FALSE;
7249:
7250: else
7251: if (p_log_level_rec.statement_level) then
7252: fa_debug_pkg.add(l_calling_fn, 'Method.deprn_limit type change', 'FAILED', p_log_level_rec => p_log_level_rec);
7253: fa_debug_pkg.add(l_calling_fn, 'cost', px_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
7254: end if;
7255:
7256: l_valid_type_change := FALSE;
7257:
7304: p_calling_fn => l_calling_fn,
7305: p_log_level_rec => p_log_level_rec) then
7306:
7307: if (p_log_level_rec.statement_level) then
7308: fa_debug_pkg.add('calc_fin_info', 'calling FA_AMORT_PVT.createGroup', 'FAILED', p_log_level_rec => p_log_level_rec);
7309: end if;
7310:
7311: return (FALSE);
7312:
7325: then
7326: -- Member addition and adjustment that has impact to the group
7327:
7328: if (p_log_level_rec.statement_level) then
7329: fa_debug_pkg.add('calc_fin_info', 'calling FA_AMORT_PVT.maintainGroup', 'FAILED', p_log_level_rec => p_log_level_rec);
7330: end if;
7331:
7332: end if;
7333:
7353: px_trans_rec.transaction_date_entered) >=
7354: p_period_rec.calendar_period_open_date) then
7355:
7356: if (p_log_level_rec.statement_level) then
7357: fa_debug_pkg.add(l_calling_fn, 'could be dpis change', 'cont', p_log_level_rec => p_log_level_rec);
7358: end if;
7359:
7360: OPEN c_check_dpis_change;
7361: FETCH c_check_dpis_change INTO l_temp_thid;
7361: FETCH c_check_dpis_change INTO l_temp_thid;
7362: CLOSE c_check_dpis_change;
7363:
7364: if (p_log_level_rec.statement_level) then
7365: fa_debug_pkg.add(l_calling_fn, 'temp_thid', l_temp_thid, p_log_level_rec => p_log_level_rec);
7366: end if;
7367:
7368: if (l_temp_thid is not null) then
7369: l_call_bs := TRUE;
7389: -- Bug4958977: Need to check possibility of dpis change.
7390: -- This time, possible that dpis is changed from current to old
7391: -- date.
7392: if (p_log_level_rec.statement_level) then
7393: fa_debug_pkg.add(l_calling_fn, 'could be dpis change(cur to old)', 'cont');
7394: end if;
7395:
7396: OPEN c_check_dpis_change;
7397: FETCH c_check_dpis_change INTO l_temp_thid;
7397: FETCH c_check_dpis_change INTO l_temp_thid;
7398: CLOSE c_check_dpis_change;
7399:
7400: if (p_log_level_rec.statement_level) then
7401: fa_debug_pkg.add(l_calling_fn, 'temp_thid', l_temp_thid, p_log_level_rec => p_log_level_rec);
7402: end if;
7403:
7404: if (l_temp_thid is not null) then
7405: l_call_bs := TRUE;
7478:
7479: --tk_util.DumpFinRec(px_asset_fin_rec_new, 'Nfaxama');
7480:
7481: if (p_log_level_rec.statement_level) then
7482: fa_debug_pkg.add(l_calling_fn, 'End', p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
7483: end if;
7484: --tk_util.debug('-+++++-');
7485: --tk_util.debug('-');
7486: --tk_util.debug('-');
7503:
7504: exception
7505: when calc_err then
7506: if (p_log_level_rec.statement_level) then
7507: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'calc_err', p_log_level_rec => p_log_level_rec);
7508: end if;
7509:
7510: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => l_calling_fn, p_log_level_rec => p_log_level_rec);
7511: return false;
7511: return false;
7512:
7513: when others then
7514: if (p_log_level_rec.statement_level) then
7515: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
7516: end if;
7517:
7518: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => l_calling_fn, p_log_level_rec => p_log_level_rec);
7519: return FALSE;
7594: CLOSE c_get_exp_amount;
7595: end if;
7596:
7597: if (p_log_level_rec.statement_level) then
7598: fa_debug_pkg.add(l_calling_fn, 'Found Expense:'||p_trans_rec.transaction_key, x_exp_rsv_amount, p_log_level_rec => p_log_level_rec);
7599: end if;
7600:
7601:
7602: return true;
7603:
7604: EXCEPTION
7605: WHEN others THEN
7606: if (p_log_level_rec.statement_level) then
7607: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
7608: end if;
7609:
7610: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
7611: return false;
7934: error_found EXCEPTION;
7935:
7936: BEGIN
7937: if (p_log_level_rec.statement_level) then
7938: fa_debug_pkg.add(l_calling_fn, 'Begin', p_trans_rec.transaction_type_code||':'||
7939: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
7940: end if;
7941:
7942:
7972:
7973: if (NOT l_status) then
7974:
7975: if (p_log_level_rec.statement_level) then
7976: fa_debug_pkg.add(l_calling_fn, 'ERROR',
7977: 'Calling fa_query_balances_pkg.query_balances_int', p_log_level_rec => p_log_level_rec);
7978: end if;
7979:
7980: raise error_found;
8132: --tk_util.DumpDeprnRec(x_asset_deprn_rec, 'GDA');
8133: p_unplanned_exp := l_unplanned_exp;
8134:
8135: if (p_log_level_rec.statement_level) then
8136: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
8137: end if;
8138:
8139: return true;
8140:
8140:
8141: EXCEPTION
8142: when error_found then
8143: if (p_log_level_rec.statement_level) then
8144: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'error_found', p_log_level_rec => p_log_level_rec);
8145: end if;
8146:
8147: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8148: return false;
8148: return false;
8149:
8150: when others then
8151: if (p_log_level_rec.statement_level) then
8152: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
8153: end if;
8154:
8155: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8156: return false;
8405:
8406: BEGIN
8407:
8408: if (p_log_level_rec.statement_level) then
8409: fa_debug_pkg.add('====='||l_calling_fn||'=====', 'Begin', to_char(p_trans_rec.transaction_header_id)||'=====');
8410: end if;
8411:
8412: if p_trans_rec_cur.transaction_header_id = p_trans_rec.transaction_header_id
8413: and p_trans_rec.transaction_date_entered between
8423: FETCH c_cur_eofy_reserve into x_eofy_reserve;
8424: CLOSE c_cur_eofy_reserve;
8425:
8426: if (p_log_level_rec.statement_level) then
8427: fa_debug_pkg.add(l_calling_fn, 'Can determine current eofy reserve from db ', x_eofy_reserve, p_log_level_rec => p_log_level_rec);
8428: end if;
8429:
8430: else
8431:
8460:
8461: x_eofy_reserve := 0;
8462:
8463: if (p_log_level_rec.statement_level) then
8464: fa_debug_pkg.add(l_calling_fn, 'This must be addition so eofy reserve ', x_eofy_reserve, p_log_level_rec => p_log_level_rec);
8465: end if;
8466: else
8467: CLOSE c_get_deprn_period;
8468:
8475: p_unplanned_exp => l_unplanned_exp,
8476: p_log_level_rec => p_log_level_rec) then
8477:
8478: if (p_log_level_rec.statement_level) then
8479: fa_debug_pkg.add(l_calling_fn, 'Error calling',
8480: 'GetDeprnRec', p_log_level_rec => p_log_level_rec);
8481: end if;
8482:
8483: raise get_err;
8493: CLOSE c_get_ret_trx;
8494: end if;
8495:
8496: if (p_log_level_rec.statement_level) then
8497: fa_debug_pkg.add(l_calling_fn, 'Sum of Reserve Retired',
8498: l_reserve_retired, p_log_level_rec => p_log_level_rec);
8499: fa_debug_pkg.add(l_calling_fn, 'Sum of Eofy Reserve Retired',
8500: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
8501: fa_debug_pkg.add(l_calling_fn, 'l_unplanned_exp ', l_unplanned_exp, p_log_level_rec => p_log_level_rec);
8495:
8496: if (p_log_level_rec.statement_level) then
8497: fa_debug_pkg.add(l_calling_fn, 'Sum of Reserve Retired',
8498: l_reserve_retired, p_log_level_rec => p_log_level_rec);
8499: fa_debug_pkg.add(l_calling_fn, 'Sum of Eofy Reserve Retired',
8500: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
8501: fa_debug_pkg.add(l_calling_fn, 'l_unplanned_exp ', l_unplanned_exp, p_log_level_rec => p_log_level_rec);
8502: end if;
8503:
8497: fa_debug_pkg.add(l_calling_fn, 'Sum of Reserve Retired',
8498: l_reserve_retired, p_log_level_rec => p_log_level_rec);
8499: fa_debug_pkg.add(l_calling_fn, 'Sum of Eofy Reserve Retired',
8500: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
8501: fa_debug_pkg.add(l_calling_fn, 'l_unplanned_exp ', l_unplanned_exp, p_log_level_rec => p_log_level_rec);
8502: end if;
8503:
8504: if (l_period_rec.period_num = 1) then
8505: x_eofy_reserve := l_asset_deprn_rec.deprn_reserve
8514: -- - l_unplanned_exp; /* Commented for bug#7246137 */
8515: end if;
8516:
8517: if (p_log_level_rec.statement_level) then
8518: fa_debug_pkg.add(l_calling_fn, 'Can determine eofy reserve from db ', x_eofy_reserve, p_log_level_rec => p_log_level_rec);
8519: end if;
8520:
8521: end if;
8522:
8528: x_date_effective := l_date_effective;
8529: x_transaction_type_code := l_transaction_type_code;
8530:
8531: if (p_log_level_rec.statement_level) then
8532: fa_debug_pkg.add(l_calling_fn, 'Need to go earlier trx',
8533: to_char(x_transaction_header_id)||':'||
8534: to_char(x_transaction_date_entered, 'DD-MON-RR HH24:MI:SS')||':'||
8535: to_char(x_date_effective, 'DD-MON-RR HH24:MI:SS'));
8536: end if;
8543: end if;
8544:
8545: end if; -- End of current period transaction or not
8546:
8547: fa_debug_pkg.add('====='||l_calling_fn||'=====', 'End', '=====', p_log_level_rec => p_log_level_rec);
8548:
8549: return TRUE;
8550:
8551: EXCEPTION
8550:
8551: EXCEPTION
8552: WHEN get_err THEN
8553: if (p_log_level_rec.statement_level) then
8554: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'get_err', p_log_level_rec => p_log_level_rec);
8555: end if;
8556:
8557: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8558: return false;
8558: return false;
8559:
8560: WHEN others THEN
8561: if (p_log_level_rec.statement_level) then
8562: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
8563: end if;
8564:
8565: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8566: return false;
8692:
8693: BEGIN
8694:
8695: if (p_log_level_rec.statement_level) then
8696: fa_debug_pkg.add(l_calling_fn, 'Begin',
8697: to_char(p_asset_hdr_rec.asset_id)||':'||
8698: to_char(p_transaction_date_entered, 'DD-MON-YYYY'));
8699: end if;
8700:
8722: CLOSE c_get_fin_adj_rec;
8723: end if;
8724:
8725: if (p_log_level_rec.statement_level) then
8726: fa_debug_pkg.add(l_calling_fn, 'End',
8727: to_char(x_asset_fin_rec_adj.cost)||':'||
8728: to_char(x_asset_fin_rec_adj.salvage_value)||':'||
8729: to_char(x_asset_fin_rec_adj.production_capacity)||':'||
8730: to_char(x_asset_fin_rec_adj.reval_amortization_basis)||':'||
8738:
8739: EXCEPTION
8740: WHEN get_err THEN
8741: if (p_log_level_rec.statement_level) then
8742: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'get_err', p_log_level_rec => p_log_level_rec);
8743: end if;
8744:
8745: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8746: return false;
8746: return false;
8747:
8748: WHEN others THEN
8749: if (p_log_level_rec.statement_level) then
8750: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
8751: end if;
8752:
8753: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
8754: return false;
10051:
10052: BEGIN
10053:
10054: if (p_log_level_rec.statement_level) then
10055: fa_debug_pkg.add(l_calling_fn, 'Begin', px_asset_fin_rec.date_placed_in_service||':'||
10056: p_init_transaction_header_id, p_log_level_rec => p_log_level_rec);
10057: end if;
10058:
10059: x_dpis_change := FALSE;
10068:
10069: l_transaction_header_id := p_trans_rec.member_transaction_header_id;
10070:
10071: if (p_log_level_rec.statement_level) then
10072: fa_debug_pkg.add(l_calling_fn, 'Need to get Delta from member', l_asset_id, p_log_level_rec => p_log_level_rec);
10073: end if;
10074:
10075: else
10076: l_asset_id := p_asset_hdr_rec.asset_id;
10297:
10298: end if;
10299:
10300: if (p_log_level_rec.statement_level) then
10301: fa_debug_pkg.add(l_calling_fn, 'Found initial fin_rec from db',
10302: px_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
10303: end if;
10304:
10305: /*
10311: --tk_util.DumpFinRec(px_asset_fin_rec, 'GO2');
10312: --tk_util.DumpFinRec(x_asset_fin_rec_new, 'GN');
10313:
10314: if (p_log_level_rec.statement_level) then
10315: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
10316: end if;
10317:
10318: return TRUE;
10319: end if;
10323:
10324: if not (p_process_this_trx) then
10325: x_asset_fin_rec_new := px_asset_fin_rec;
10326: if (p_log_level_rec.statement_level) then
10327: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
10328: end if;
10329:
10330: return TRUE;
10331:
10551:
10552: end if; -- (px_asset_fin_rec.deprn_method_code is null)
10553:
10554: if (p_log_level_rec.statement_level) then
10555: fa_debug_pkg.add(l_calling_fn, 'Got bk to find delta from db',
10556: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
10557: end if;
10558:
10559: else
10790:
10791: end if;
10792:
10793: if (p_log_level_rec.statement_level) then
10794: fa_debug_pkg.add(l_calling_fn, 'Found initial fin_rec from db',
10795: px_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
10796: end if;
10797: /*
10798: if p_trans_rec.transaction_type_code in
10804: --tk_util.DumpFinRec(px_asset_fin_rec, 'GO2');
10805: --tk_util.DumpFinRec(x_asset_fin_rec_new, 'GN');
10806:
10807: if (p_log_level_rec.statement_level) then
10808: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
10809: end if;
10810:
10811: return TRUE;
10812:
10814:
10815: if not (p_process_this_trx) then
10816: x_asset_fin_rec_new := px_asset_fin_rec;
10817: if (p_log_level_rec.statement_level) then
10818: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
10819: end if;
10820:
10821: return TRUE;
10822: end if;
11057: CLOSE c_get_bk;
11058: end if; -- (px_asset_fin_rec.deprn_method_code is null)
11059:
11060: if (p_log_level_rec.statement_level) then
11061: fa_debug_pkg.add(l_calling_fn, 'Got bk to find delta from db',
11062: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11063: end if;
11064:
11065:
11070: l_reclass_trx := (nvl(px_asset_fin_rec.group_asset_id, 0) <>
11071: nvl(l_asset_fin_rec_adj.group_asset_id, px_asset_fin_rec.group_asset_id)); -- bug# 5383699
11072:
11073: if (p_log_level_rec.statement_level) then
11074: fa_debug_pkg.add(l_calling_fn, 'p_use_fin_rec_adj', p_use_fin_rec_adj, p_log_level_rec => p_log_level_rec);
11075: end if;
11076:
11077: /* For bug 12739028 starts */
11078: if (g_deprn_ch_trx_id is null) then
11097: g_deprn_ch_trx_id := p_trans_rec.transaction_header_id;
11098: end if;
11099:
11100: if (p_log_level_rec.statement_level) then
11101: fa_debug_pkg.add(l_calling_fn, 'g_deprn_ch_trx_id', g_deprn_ch_trx_id, p_log_level_rec => p_log_level_rec);
11102: end if;
11103:
11104: /* For bug 12739028 ends */
11105:
11149: l_asset_fin_rec_adj.unrevalued_cost := l_tmp_unrevalued_cost;
11150: l_asset_fin_rec_adj.eofy_reserve := l_tmp_eofy_reserve;
11151:
11152: if (p_log_level_rec.statement_level) then
11153: fa_debug_pkg.add(l_calling_fn, 'Need to use latest values except amounts',
11154: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11155: end if;
11156:
11157: if (l_adj_apply_new_method) then
11213: end if;
11214: -- end if; /* End if for p_trans_rec.calling_interface = 'FAXASSET' */ --8356539
11215:
11216: if (p_log_level_rec.statement_level) then
11217: fa_debug_pkg.add(l_calling_fn, 'This is the transaction user entered',
11218: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11219: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit_amount',
11220: l_asset_fin_rec_adj.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
11221: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit',
11215:
11216: if (p_log_level_rec.statement_level) then
11217: fa_debug_pkg.add(l_calling_fn, 'This is the transaction user entered',
11218: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11219: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit_amount',
11220: l_asset_fin_rec_adj.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
11221: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit',
11222: l_asset_fin_rec_adj.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
11223: end if;
11217: fa_debug_pkg.add(l_calling_fn, 'This is the transaction user entered',
11218: l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11219: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit_amount',
11220: l_asset_fin_rec_adj.allowed_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
11221: fa_debug_pkg.add(l_calling_fn, 'After if allowed_deprn_limit',
11222: l_asset_fin_rec_adj.allowed_deprn_limit, p_log_level_rec => p_log_level_rec);
11223: end if;
11224:
11225: else
11250: end if;
11251: end if;
11252: -- Process transaction from db. Current transaction has date later than this.
11253: if (p_log_level_rec.statement_level) then
11254: fa_debug_pkg.add(l_calling_fn, 'Delta comes from db', l_asset_fin_rec_adj.cost, p_log_level_rec => p_log_level_rec);
11255: end if;
11256: end if;
11257:
11258: --tk_util.DumpFinRec(l_asset_fin_rec_adj, 'GA');
11269: -- x_asset_fin_rec_new.cost := 0;
11270: -- l_asset_fin_rec_adj.cost := 0;
11271: --end if;
11272: if (p_log_level_rec.statement_level) then
11273: fa_debug_pkg.add(l_calling_fn, 'x_asset_fin_rec_new.cost', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
11274: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
11275: end if;
11276:
11277: --
11270: -- l_asset_fin_rec_adj.cost := 0;
11271: --end if;
11272: if (p_log_level_rec.statement_level) then
11273: fa_debug_pkg.add(l_calling_fn, 'x_asset_fin_rec_new.cost', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
11274: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
11275: end if;
11276:
11277: --
11278: -- Defaulting Values
11356: px_asset_deprn_rec_new => l_asset_deprn_rec,
11357: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
11358:
11359: if (p_log_level_rec.statement_level) then
11360: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11361: 'FA_ASSET_CALC_PVT.calc_new_amounts', p_log_level_rec => p_log_level_rec);
11362: end if;
11363:
11364: raise calc_failed;
11381: px_asset_fin_rec_new => x_asset_fin_rec_new,
11382: p_period_rec => l_period_rec, p_log_level_rec => p_log_level_rec) then
11383:
11384: if (p_log_level_rec.statement_level) then
11385: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11386: 'FA_ASSET_CALC_PVT.calc_prorate_date', p_log_level_rec => p_log_level_rec);
11387: end if;
11388:
11389: raise calc_failed;
11403: p_period_rec => l_period_rec
11404: , p_log_level_rec => p_log_level_rec) then
11405:
11406: if (p_log_level_rec.statement_level) then
11407: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11408: 'FA_ASSET_CALC_PVT.calc_deprn_info', p_log_level_rec => p_log_level_rec);
11409: end if;
11410:
11411: raise calc_failed;
11416: p_asset_fin_rec_adj => l_asset_fin_rec_adj,
11417: px_asset_fin_rec_new => x_asset_fin_rec_new, p_log_level_rec => p_log_level_rec) then
11418:
11419: if (p_log_level_rec.statement_level) then
11420: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11421: 'FA_ASSET_CALC_PVT.calc_deprn_start_date', p_log_level_rec => p_log_level_rec);
11422: end if;
11423:
11424: raise calc_failed;
11433: px_asset_fin_rec_new => x_asset_fin_rec_new,
11434: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
11435:
11436: if (p_log_level_rec.statement_level) then
11437: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11438: 'FA_ASSET_CALC_PVT.calc_salvage_value', p_log_level_rec => p_log_level_rec);
11439: end if;
11440:
11441: raise calc_failed;
11446: p_asset_fin_rec_adj => l_asset_fin_rec_adj,
11447: px_asset_fin_rec_new => x_asset_fin_rec_new, p_log_level_rec => p_log_level_rec) then
11448:
11449: if (p_log_level_rec.statement_level) then
11450: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11451: 'FA_ASSET_CALC_PVT.calc_rec_cost', p_log_level_rec => p_log_level_rec);
11452: end if;
11453:
11454: raise calc_failed;
11468: p_mrc_sob_type_code => p_mrc_sob_type_code,
11469: p_log_level_rec => p_log_level_rec) then
11470:
11471: if (p_log_level_rec.statement_level) then
11472: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11473: 'FA_ASSET_CALC_PVT.calc_deprn_limit_adj_rec_cost', p_log_level_rec => p_log_level_rec);
11474: end if;
11475:
11476: raise calc_failed;
11485: p_asset_fin_rec_adj => l_asset_fin_rec_adj,
11486: px_asset_fin_rec_new => x_asset_fin_rec_new, p_log_level_rec => p_log_level_rec) then
11487:
11488: if (p_log_level_rec.statement_level) then
11489: fa_debug_pkg.add(l_calling_fn, 'Falied calling',
11490: 'FA_ASSET_CALC_PVT.calc_itc_info', p_log_level_rec => p_log_level_rec);
11491: end if;
11492:
11493: raise calc_failed;
11499:
11500: --tk_util.DumpFinRec(x_asset_fin_rec_new, 'GN');
11501:
11502: if (p_log_level_rec.statement_level) then
11503: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
11504: end if;
11505:
11506: return TRUE;
11507: EXCEPTION
11506: return TRUE;
11507: EXCEPTION
11508: WHEN calc_failed THEN
11509: if (p_log_level_rec.statement_level) then
11510: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'calc_failed', p_log_level_rec => p_log_level_rec);
11511: end if;
11512:
11513: if c_get_init_mcbk%ISOPEN then
11514: CLOSE c_get_init_mcbk;
11530: return false;
11531:
11532: WHEN OTHERS THEN
11533: if (p_log_level_rec.statement_level) then
11534: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
11535: end if;
11536:
11537: if c_get_init_mcbk%ISOPEN then
11538: CLOSE c_get_init_mcbk;
12652:
12653: BEGIN
12654:
12655: if (p_log_level_rec.statement_level) then
12656: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||
12657: ':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
12658: fa_debug_pkg.add(l_calling_fn, 'Reclass values', p_reclass_src_dest||
12659: ':'||to_char(p_reclassed_asset_id)||':'||
12660: to_char(p_reclassed_asset_dpis, 'DD-MON-RR'));
12654:
12655: if (p_log_level_rec.statement_level) then
12656: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||
12657: ':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
12658: fa_debug_pkg.add(l_calling_fn, 'Reclass values', p_reclass_src_dest||
12659: ':'||to_char(p_reclassed_asset_id)||':'||
12660: to_char(p_reclassed_asset_dpis, 'DD-MON-RR'));
12661: end if;
12662:
12685: FETCH c_get_deprn_period_date INTO l_calendar_period_start_date,l_add_fiscal_year, l_entered_ytd, l_entered_reserve;
12686: CLOSE c_get_deprn_period_date;
12687:
12688: if (p_log_level_rec.statement_level) then
12689: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 0.9 ==========','', p_log_level_rec => p_log_level_rec);
12690: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12691: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12692: fa_debug_pkg.add(l_calling_fn, '++ l_add_fiscal_year', l_add_fiscal_year, p_log_level_rec => p_log_level_rec);
12693: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12686: CLOSE c_get_deprn_period_date;
12687:
12688: if (p_log_level_rec.statement_level) then
12689: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 0.9 ==========','', p_log_level_rec => p_log_level_rec);
12690: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12691: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12692: fa_debug_pkg.add(l_calling_fn, '++ l_add_fiscal_year', l_add_fiscal_year, p_log_level_rec => p_log_level_rec);
12693: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12694: end if;
12687:
12688: if (p_log_level_rec.statement_level) then
12689: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 0.9 ==========','', p_log_level_rec => p_log_level_rec);
12690: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12691: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12692: fa_debug_pkg.add(l_calling_fn, '++ l_add_fiscal_year', l_add_fiscal_year, p_log_level_rec => p_log_level_rec);
12693: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12694: end if;
12695: /* Bug 6281311 fetching it here */
12688: if (p_log_level_rec.statement_level) then
12689: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 0.9 ==========','', p_log_level_rec => p_log_level_rec);
12690: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12691: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12692: fa_debug_pkg.add(l_calling_fn, '++ l_add_fiscal_year', l_add_fiscal_year, p_log_level_rec => p_log_level_rec);
12693: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12694: end if;
12695: /* Bug 6281311 fetching it here */
12696:
12689: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 0.9 ==========','', p_log_level_rec => p_log_level_rec);
12690: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12691: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12692: fa_debug_pkg.add(l_calling_fn, '++ l_add_fiscal_year', l_add_fiscal_year, p_log_level_rec => p_log_level_rec);
12693: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12694: end if;
12695: /* Bug 6281311 fetching it here */
12696:
12697: --
12700: -- to 1st peirod of fiscal, this check is necessary and the return value will be
12701: -- used in check_overlap cursor and main cursor.
12702: --
12703: if (p_log_level_rec.statement_level) then
12704: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.0 ==========','', p_log_level_rec => p_log_level_rec);
12705: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_header_id', p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12706: fa_debug_pkg.add(l_calling_fn, '++ l_incoming_thid', l_incoming_thid, p_log_level_rec => p_log_level_rec);
12707: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
12708: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_date_entered', p_trans_rec.transaction_date_entered, p_log_level_rec => p_log_level_rec);
12701: -- used in check_overlap cursor and main cursor.
12702: --
12703: if (p_log_level_rec.statement_level) then
12704: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.0 ==========','', p_log_level_rec => p_log_level_rec);
12705: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_header_id', p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12706: fa_debug_pkg.add(l_calling_fn, '++ l_incoming_thid', l_incoming_thid, p_log_level_rec => p_log_level_rec);
12707: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
12708: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_date_entered', p_trans_rec.transaction_date_entered, p_log_level_rec => p_log_level_rec);
12709: end if;
12702: --
12703: if (p_log_level_rec.statement_level) then
12704: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.0 ==========','', p_log_level_rec => p_log_level_rec);
12705: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_header_id', p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12706: fa_debug_pkg.add(l_calling_fn, '++ l_incoming_thid', l_incoming_thid, p_log_level_rec => p_log_level_rec);
12707: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
12708: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_date_entered', p_trans_rec.transaction_date_entered, p_log_level_rec => p_log_level_rec);
12709: end if;
12710:
12703: if (p_log_level_rec.statement_level) then
12704: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.0 ==========','', p_log_level_rec => p_log_level_rec);
12705: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_header_id', p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12706: fa_debug_pkg.add(l_calling_fn, '++ l_incoming_thid', l_incoming_thid, p_log_level_rec => p_log_level_rec);
12707: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
12708: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_date_entered', p_trans_rec.transaction_date_entered, p_log_level_rec => p_log_level_rec);
12709: end if;
12710:
12711: if (p_trans_rec.transaction_type_code not like '%ADDITION') and
12704: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.0 ==========','', p_log_level_rec => p_log_level_rec);
12705: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_header_id', p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12706: fa_debug_pkg.add(l_calling_fn, '++ l_incoming_thid', l_incoming_thid, p_log_level_rec => p_log_level_rec);
12707: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
12708: fa_debug_pkg.add(l_calling_fn, '++ p_trans_rec.transaction_date_entered', p_trans_rec.transaction_date_entered, p_log_level_rec => p_log_level_rec);
12709: end if;
12710:
12711: if (p_trans_rec.transaction_type_code not like '%ADDITION') and
12712: (p_trans_rec.amortization_start_date is not null) then
12716: p_asset_hdr_rec.set_of_books_id,
12717: l_period_rec,
12718: p_log_level_rec) then
12719: if (p_log_level_rec.statement_level) then
12720: fa_debug_pkg.add(l_calling_fn, 'Error calling',
12721: 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
12722: end if;
12723:
12724: raise calc_failed;
12735: else
12736: l_process_addition := 1;
12737: end if;
12738: end if;
12739: fa_debug_pkg.add(l_calling_fn, 'l_process_addition: After changing', l_process_addition, p_log_level_rec => p_log_level_rec);
12740: end if;
12741:
12742: -- Bug 5726160
12743: if p_running_mode = fa_std_types.FA_DPR_CATCHUP then
12765: OPEN c_get_retirement_pdate;
12766: FETCH c_get_retirement_pdate
12767: INTO l_override_limit_date;
12768: if c_get_retirement_pdate%notfound then
12769: fa_debug_pkg.add(l_calling_fn, 'Error Fetching cursor',
12770: 'c_get_retirement_pdate');
12771: raise calc_failed;
12772: end if;
12773: CLOSE c_get_retirement_pdate;
12779: p_mrc_sob_type_code,
12780: p_asset_hdr_rec.set_of_books_id,
12781: l_override_limit_period_rec,
12782: p_log_level_rec) then
12783: fa_debug_pkg.add(l_calling_fn, 'Error calling',
12784: 'GetPeriodInfo');
12785: raise calc_failed;
12786: end if;
12787:
12785: raise calc_failed;
12786: end if;
12787:
12788: if (p_log_level_rec.statement_level) then
12789: fa_debug_pkg.add(l_calling_fn, 'Checking overlapped trxs',
12790: p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id , p_log_level_rec => p_log_level_rec);
12791: end if;
12792:
12793: /* Bug 6281311 moving this code to above
12795: FETCH c_get_deprn_period_date INTO l_calendar_period_start_date, l_entered_ytd, l_entered_reserve;
12796: CLOSE c_get_deprn_period_date;
12797:
12798: if (p_log_level_rec.statement_level) then
12799: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.9 ==========','', p_log_level_rec => p_log_level_rec);
12800: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12801: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12802: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12803: end if; */
12796: CLOSE c_get_deprn_period_date;
12797:
12798: if (p_log_level_rec.statement_level) then
12799: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.9 ==========','', p_log_level_rec => p_log_level_rec);
12800: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12801: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12802: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12803: end if; */
12804:
12797:
12798: if (p_log_level_rec.statement_level) then
12799: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.9 ==========','', p_log_level_rec => p_log_level_rec);
12800: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12801: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12802: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12803: end if; */
12804:
12805:
12798: if (p_log_level_rec.statement_level) then
12799: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 1.9 ==========','', p_log_level_rec => p_log_level_rec);
12800: fa_debug_pkg.add(l_calling_fn, '++ l_calendar_period_start_date', l_calendar_period_start_date, p_log_level_rec => p_log_level_rec);
12801: fa_debug_pkg.add(l_calling_fn, '++ l_entered_ytd', l_entered_ytd, p_log_level_rec => p_log_level_rec);
12802: fa_debug_pkg.add(l_calling_fn, '++ l_entered_reserve', l_entered_reserve, p_log_level_rec => p_log_level_rec);
12803: end if; */
12804:
12805:
12806: LOOP
12816: END IF;
12817: -- bug 12344343 END
12818:
12819: if (p_log_level_rec.statement_level) then
12820: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.0 ==========','', p_log_level_rec => p_log_level_rec);
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12817: -- bug 12344343 END
12818:
12819: if (p_log_level_rec.statement_level) then
12820: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.0 ==========','', p_log_level_rec => p_log_level_rec);
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12825: fa_debug_pkg.add(l_calling_fn, 'l_start_from_addition', l_start_from_addition, p_log_level_rec => p_log_level_rec);
12818:
12819: if (p_log_level_rec.statement_level) then
12820: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.0 ==========','', p_log_level_rec => p_log_level_rec);
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12825: fa_debug_pkg.add(l_calling_fn, 'l_start_from_addition', l_start_from_addition, p_log_level_rec => p_log_level_rec);
12826: end if;
12819: if (p_log_level_rec.statement_level) then
12820: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.0 ==========','', p_log_level_rec => p_log_level_rec);
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12825: fa_debug_pkg.add(l_calling_fn, 'l_start_from_addition', l_start_from_addition, p_log_level_rec => p_log_level_rec);
12826: end if;
12827:
12820: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.0 ==========','', p_log_level_rec => p_log_level_rec);
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12825: fa_debug_pkg.add(l_calling_fn, 'l_start_from_addition', l_start_from_addition, p_log_level_rec => p_log_level_rec);
12826: end if;
12827:
12828: -- fyi: l_calendar_period_start_date: The start date of the period in which the asset was added: Period of addition
12821: fa_debug_pkg.add(l_calling_fn, '++ IN 1st LOOP: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12822: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY'));
12823: fa_debug_pkg.add(l_calling_fn, '++ Period of Addition: l_calendar_period_start_date', to_char(l_calendar_period_start_date,'MM/DD/YYYY'));
12824: fa_debug_pkg.add(l_calling_fn, 'l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12825: fa_debug_pkg.add(l_calling_fn, 'l_start_from_addition', l_start_from_addition, p_log_level_rec => p_log_level_rec);
12826: end if;
12827:
12828: -- fyi: l_calendar_period_start_date: The start date of the period in which the asset was added: Period of addition
12829: -- bug 12344343 modified IF condition to check l_start_from_addition also
12849:
12850: CLOSE c_check_overlap2;
12851:
12852: if (p_log_level_rec.statement_level) then
12853: fa_debug_pkg.add(l_calling_fn, 't_co_thid.count', t_co_thid.count, p_log_level_rec => p_log_level_rec);
12854: end if;
12855:
12856: l_start_from_first := FALSE;
12857:
12856: l_start_from_first := FALSE;
12857:
12858: for i in 1..t_co_thid.count loop
12859: if (p_log_level_rec.statement_level) then
12860: fa_debug_pkg.add(l_calling_fn, 't_co_trx_date', t_co_trx_date(i));
12861: end if;
12862:
12863: if (t_co_trx_date(i) < l_period_rec.calendar_period_open_date) then
12864: if (p_log_level_rec.statement_level) then
12861: end if;
12862:
12863: if (t_co_trx_date(i) < l_period_rec.calendar_period_open_date) then
12864: if (p_log_level_rec.statement_level) then
12865: fa_debug_pkg.add(l_calling_fn, 'l_start_from_first', 'TRUE', p_log_level_rec => p_log_level_rec);
12866: end if;
12867: l_start_from_first := TRUE;
12868: EXIT;
12869: elsif (t_co_trx_date(i) < nvl(l_trans_rec.transaction_date_entered,
12876: end if;
12877: end loop;
12878:
12879: if (p_log_level_rec.statement_level) then
12880: fa_debug_pkg.add(l_calling_fn, 'End of for loop', 'end', p_log_level_rec => p_log_level_rec);
12881: end if;
12882:
12883: else
12884: l_start_from_first := TRUE;
12892: l_trans_rec.transaction_type_code;
12893: CLOSE c_get_first_trx;
12894:
12895: if (p_log_level_rec.statement_level) then
12896: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.1 : FROM c_get_first_trx cursor ==========','', p_log_level_rec => p_log_level_rec);
12897: fa_debug_pkg.add(l_calling_fn, '++ TRX_DATE_ENTERED is prior to Period of Addition, EXIT AND GO TO ADDITION ','', p_log_level_rec => p_log_level_rec);
12898: fa_debug_pkg.add(l_calling_fn, '++ NEW FIRST TRX: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12899: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12900: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
12893: CLOSE c_get_first_trx;
12894:
12895: if (p_log_level_rec.statement_level) then
12896: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.1 : FROM c_get_first_trx cursor ==========','', p_log_level_rec => p_log_level_rec);
12897: fa_debug_pkg.add(l_calling_fn, '++ TRX_DATE_ENTERED is prior to Period of Addition, EXIT AND GO TO ADDITION ','', p_log_level_rec => p_log_level_rec);
12898: fa_debug_pkg.add(l_calling_fn, '++ NEW FIRST TRX: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12899: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12900: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
12901: end if;
12894:
12895: if (p_log_level_rec.statement_level) then
12896: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.1 : FROM c_get_first_trx cursor ==========','', p_log_level_rec => p_log_level_rec);
12897: fa_debug_pkg.add(l_calling_fn, '++ TRX_DATE_ENTERED is prior to Period of Addition, EXIT AND GO TO ADDITION ','', p_log_level_rec => p_log_level_rec);
12898: fa_debug_pkg.add(l_calling_fn, '++ NEW FIRST TRX: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12899: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12900: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
12901: end if;
12902:
12895: if (p_log_level_rec.statement_level) then
12896: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.1 : FROM c_get_first_trx cursor ==========','', p_log_level_rec => p_log_level_rec);
12897: fa_debug_pkg.add(l_calling_fn, '++ TRX_DATE_ENTERED is prior to Period of Addition, EXIT AND GO TO ADDITION ','', p_log_level_rec => p_log_level_rec);
12898: fa_debug_pkg.add(l_calling_fn, '++ NEW FIRST TRX: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12899: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12900: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
12901: end if;
12902:
12903: end if; -- (l_start_from_first)
12896: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.1 : FROM c_get_first_trx cursor ==========','', p_log_level_rec => p_log_level_rec);
12897: fa_debug_pkg.add(l_calling_fn, '++ TRX_DATE_ENTERED is prior to Period of Addition, EXIT AND GO TO ADDITION ','', p_log_level_rec => p_log_level_rec);
12898: fa_debug_pkg.add(l_calling_fn, '++ NEW FIRST TRX: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12899: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12900: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
12901: end if;
12902:
12903: end if; -- (l_start_from_first)
12904:
12918: --tk_util.debug('creation_date: '||to_char(g_temp_date2, 'DD-MON-RR HH24:MI:SS'));
12919: --tk_util.debug('l_trans_rec.transaction_type_code: '||g_temp_char30);
12920:
12921: if (p_log_level_rec.statement_level) then
12922: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.2 : IN c_check_overlap ==========','', p_log_level_rec => p_log_level_rec);
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12919: --tk_util.debug('l_trans_rec.transaction_type_code: '||g_temp_char30);
12920:
12921: if (p_log_level_rec.statement_level) then
12922: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.2 : IN c_check_overlap ==========','', p_log_level_rec => p_log_level_rec);
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12920:
12921: if (p_log_level_rec.statement_level) then
12922: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.2 : IN c_check_overlap ==========','', p_log_level_rec => p_log_level_rec);
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12921: if (p_log_level_rec.statement_level) then
12922: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.2 : IN c_check_overlap ==========','', p_log_level_rec => p_log_level_rec);
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12929: fa_debug_pkg.add(l_calling_fn, '++ g_temp_char30: Trx Type Code', g_temp_char30, p_log_level_rec => p_log_level_rec);
12922: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 2.2 : IN c_check_overlap ==========','', p_log_level_rec => p_log_level_rec);
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12929: fa_debug_pkg.add(l_calling_fn, '++ g_temp_char30: Trx Type Code', g_temp_char30, p_log_level_rec => p_log_level_rec);
12930: end if;
12923: fa_debug_pkg.add(l_calling_fn, '++ INPUT: l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12929: fa_debug_pkg.add(l_calling_fn, '++ g_temp_char30: Trx Type Code', g_temp_char30, p_log_level_rec => p_log_level_rec);
12930: end if;
12931:
12924: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY'));
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12929: fa_debug_pkg.add(l_calling_fn, '++ g_temp_char30: Trx Type Code', g_temp_char30, p_log_level_rec => p_log_level_rec);
12930: end if;
12931:
12932: -- Bug#4049799: Replaced this with the following: l_check_overlap_found := c_check_overlap%FOUND; */
12925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
12926: fa_debug_pkg.add(l_calling_fn, '++ OUTPUT: g_temp_number: THID', g_temp_number, p_log_level_rec => p_log_level_rec);
12927: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date1: Trx Date', g_temp_date1, p_log_level_rec => p_log_level_rec);
12928: fa_debug_pkg.add(l_calling_fn, '++ g_temp_date2: Effective_Date', g_temp_date2, p_log_level_rec => p_log_level_rec);
12929: fa_debug_pkg.add(l_calling_fn, '++ g_temp_char30: Trx Type Code', g_temp_char30, p_log_level_rec => p_log_level_rec);
12930: end if;
12931:
12932: -- Bug#4049799: Replaced this with the following: l_check_overlap_found := c_check_overlap%FOUND; */
12933: if c_check_overlap%NOTFOUND then
12938:
12939: CLOSE c_check_overlap;
12940:
12941: if (p_log_level_rec.statement_level) then
12942: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.0 ==========','', p_log_level_rec => p_log_level_rec);
12943: if (l_check_overlap_found) then
12944: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'TRUE', p_log_level_rec => p_log_level_rec);
12945: else
12946: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'FALSE', p_log_level_rec => p_log_level_rec);
12940:
12941: if (p_log_level_rec.statement_level) then
12942: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.0 ==========','', p_log_level_rec => p_log_level_rec);
12943: if (l_check_overlap_found) then
12944: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'TRUE', p_log_level_rec => p_log_level_rec);
12945: else
12946: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'FALSE', p_log_level_rec => p_log_level_rec);
12947: end if;
12948: end if;
12942: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.0 ==========','', p_log_level_rec => p_log_level_rec);
12943: if (l_check_overlap_found) then
12944: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'TRUE', p_log_level_rec => p_log_level_rec);
12945: else
12946: fa_debug_pkg.add(l_calling_fn, '++ l_check_overlap_found', 'FALSE', p_log_level_rec => p_log_level_rec);
12947: end if;
12948: end if;
12949:
12950: if (l_check_overlap_found) then
12949:
12950: if (l_check_overlap_found) then
12951:
12952: if (p_log_level_rec.statement_level) then
12953: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.1 ==========','', p_log_level_rec => p_log_level_rec);
12954: end if;
12955:
12956: l_trans_rec.transaction_header_id := g_temp_number;
12957: l_trans_rec.transaction_date_entered := g_temp_date1;
12971: p_asset_hdr_rec.set_of_books_id,
12972: l_period_rec,
12973: p_log_level_rec) then
12974: if (p_log_level_rec.statement_level) then
12975: fa_debug_pkg.add(l_calling_fn, 'Error calling',
12976: 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
12977: end if;
12978:
12979: raise calc_failed;
12987: end if;
12988: end if;
12989:
12990: if (p_log_level_rec.statement_level) then
12991: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.2 WHEN l_check_overlap FOUND ==========','', p_log_level_rec => p_log_level_rec);
12992: fa_debug_pkg.add(l_calling_fn, '++ l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12993: end if;
12994:
12995: else
12988: end if;
12989:
12990: if (p_log_level_rec.statement_level) then
12991: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.2 WHEN l_check_overlap FOUND ==========','', p_log_level_rec => p_log_level_rec);
12992: fa_debug_pkg.add(l_calling_fn, '++ l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
12993: end if;
12994:
12995: else
12996:
12994:
12995: else
12996:
12997: if (p_log_level_rec.statement_level) then
12998: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.2 WHEN l_check_overlap NOT FOUND ==========','', p_log_level_rec => p_log_level_rec);
12999: fa_debug_pkg.add(l_calling_fn, '++ l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
13000: end if;
13001:
13002: --
12995: else
12996:
12997: if (p_log_level_rec.statement_level) then
12998: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.2 WHEN l_check_overlap NOT FOUND ==========','', p_log_level_rec => p_log_level_rec);
12999: fa_debug_pkg.add(l_calling_fn, '++ l_process_addition', l_process_addition, p_log_level_rec => p_log_level_rec);
13000: end if;
13001:
13002: --
13003: -- If the member asset is currently a member or will be a member
13012:
13013: if (fa_cache_pkg.fazcdrd_record.use_eofy_reserve_flag = 'Y') then
13014:
13015: if (p_log_level_rec.statement_level) then
13016: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.2.1 ==========','', p_log_level_rec => p_log_level_rec);
13017: end if;
13018:
13019: if not GetEofyReserve(
13020: p_trans_rec => l_trans_rec,
13030: p_mrc_sob_type_code => p_mrc_sob_type_code,
13031: p_calling_fn => l_calling_fn,
13032: p_log_level_rec => p_log_level_rec) then
13033: if (p_log_level_rec.statement_level) then
13034: fa_debug_pkg.add(l_calling_fn, 'Error calling',
13035: 'GetEofyReserve', p_log_level_rec => p_log_level_rec);
13036: end if;
13037:
13038: raise calc_failed;
13042: l_get_eofy_thid := l_trans_rec.transaction_header_id;
13043: end if;
13044:
13045: if (p_log_level_rec.statement_level) then
13046: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3 ==========','', p_log_level_rec => p_log_level_rec);
13047: end if;
13048:
13049:
13050: if (nvl(fa_cache_pkg.fazcdrd_record.use_eofy_reserve_flag, 'N') = 'N') or
13067: l_impair_reserve_retired := null;
13068: l_recognize_gain_loss := null;
13069:
13070: if (p_log_level_rec.statement_level) then
13071: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3.1 ==========','', p_log_level_rec => p_log_level_rec);
13072: end if;
13073:
13074: OPEN c_get_retirement(l_trans_rec.transaction_header_id);
13075: FETCH c_get_retirement INTO l_retirement_id,
13085: l_recognize_gain_loss;
13086:
13087: if c_get_retirement%NOTFOUND then
13088: if (p_log_level_rec.statement_level) then
13089: fa_debug_pkg.add(l_calling_fn, 'Check Overlap', 'Search previous trx', p_log_level_rec => p_log_level_rec);
13090: end if;
13091:
13092: CLOSE c_get_retirement;
13093:
13091:
13092: CLOSE c_get_retirement;
13093:
13094: if (p_log_level_rec.statement_level) then
13095: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3.2 ==========','', p_log_level_rec => p_log_level_rec);
13096: end if;
13097:
13098: -- Bug 13028310 no need to search for any other transaction in case of extended assets
13099: -- because we do not want to process addition and any transaction before asset got extended
13100: -- and after extension asset can not have anything other than retirement
13101:
13102: IF px_asset_fin_rec_new.deprn_method_code = 'JP-STL-EXTND' then
13103: if (p_log_level_rec.statement_level) then
13104: fa_debug_pkg.add(l_calling_fn, '==========Exiting Loop for Extnd Assets==========','', p_log_level_rec => p_log_level_rec);
13105: end if;
13106: exit;
13107: END IF;
13108:
13118: exit;
13119: end if;
13120:
13121: if (p_log_level_rec.statement_level) then
13122: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3.2.1 ==========','', p_log_level_rec => p_log_level_rec);
13123: end if;
13124:
13125: CLOSE c_get_prev_trx;
13126: else
13127: -- This retirement has not reinstated yet so ok to proceed
13128: CLOSE c_get_retirement;
13129:
13130: if (p_log_level_rec.statement_level) then
13131: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3.3 ==========','', p_log_level_rec => p_log_level_rec);
13132: end if;
13133:
13134: exit;
13135: end if; -- c_get_retirement%NOTFOUND
13134: exit;
13135: end if; -- c_get_retirement%NOTFOUND
13136: else
13137: if (p_log_level_rec.statement_level) then
13138: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.3.9 ==========','', p_log_level_rec => p_log_level_rec);
13139: end if;
13140:
13141: exit;
13142: end if; -- l_trans_rec.transaction_type_code like '%RETIREMENT
13142: end if; -- l_trans_rec.transaction_type_code like '%RETIREMENT
13143:
13144: else
13145: if (p_log_level_rec.statement_level) then
13146: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.4.1 ==========','', p_log_level_rec => p_log_level_rec);
13147: end if;
13148:
13149: l_trans_rec.transaction_header_id := l_eofy_thid;
13150: l_trans_rec.transaction_date_entered := l_eofy_trx_date_entered;
13151: l_trans_rec.who_info.creation_date := l_eofy_date_effective;
13152: end if;
13153: else
13154: if (p_log_level_rec.statement_level) then
13155: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 3.5 ==========','', p_log_level_rec => p_log_level_rec);
13156: end if;
13157:
13158: -- Will find eofy_reserve from old books row.
13159: exit;
13169:
13170: if (l_temp_cnt > 200) then
13171:
13172: if (p_log_level_rec.statement_level) then
13173: fa_debug_pkg.add(l_calling_fn, '++ Checking overlapped trxs with ',
13174: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY HH24:MI:SS'));
13175: end if;
13176:
13177: raise calc_failed;
13187: l_retirement_flag := 'Y';
13188: end if;
13189:
13190: if (p_log_level_rec.statement_level) then
13191: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4 : BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13192: fa_debug_pkg.add(l_calling_fn, '++ FETCHING TRANSACTIONS AFTER - TRX_DATE : EFF_DATE',
13193: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY') || ' : '||
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13188: end if;
13189:
13190: if (p_log_level_rec.statement_level) then
13191: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4 : BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13192: fa_debug_pkg.add(l_calling_fn, '++ FETCHING TRANSACTIONS AFTER - TRX_DATE : EFF_DATE',
13193: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY') || ' : '||
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13196: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13191: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4 : BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13192: fa_debug_pkg.add(l_calling_fn, '++ FETCHING TRANSACTIONS AFTER - TRX_DATE : EFF_DATE',
13193: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY') || ' : '||
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13196: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13197: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13198: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag, p_log_level_rec => p_log_level_rec);
13199: end if;
13192: fa_debug_pkg.add(l_calling_fn, '++ FETCHING TRANSACTIONS AFTER - TRX_DATE : EFF_DATE',
13193: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY') || ' : '||
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13196: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13197: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13198: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag, p_log_level_rec => p_log_level_rec);
13199: end if;
13200:
13193: to_char(l_trans_rec.transaction_date_entered, 'MM/DD/YYYY') || ' : '||
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13196: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13197: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13198: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag, p_log_level_rec => p_log_level_rec);
13199: end if;
13200:
13201: -- Bug 8674466 : Propagating fix of 7699305
13194: to_char(l_trans_rec.who_info.creation_date, 'MM/DD/YYYY HH24:MI:SS'));
13195: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13196: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13197: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13198: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag, p_log_level_rec => p_log_level_rec);
13199: end if;
13200:
13201: -- Bug 8674466 : Propagating fix of 7699305
13202: -- Check if there are any future prorate retirements in the period
13230: and cp.start_date between fy.start_date and fy.end_date
13231: and con.prorate_date between cp.start_date and cp.end_date;
13232:
13233: if (p_log_level_rec.statement_level) then
13234: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305:1 After l_ret_prorate_pc ==========','');
13235: fa_debug_pkg.add(l_calling_fn, '++ l_ret_prorate_pc', l_ret_prorate_pc);
13236: end if;
13237:
13238: SELECT count(th.transaction_header_id)
13231: and con.prorate_date between cp.start_date and cp.end_date;
13232:
13233: if (p_log_level_rec.statement_level) then
13234: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305:1 After l_ret_prorate_pc ==========','');
13235: fa_debug_pkg.add(l_calling_fn, '++ l_ret_prorate_pc', l_ret_prorate_pc);
13236: end if;
13237:
13238: SELECT count(th.transaction_header_id)
13239: INTO l_future_ret_count
13267: and th.asset_id = p_asset_hdr_rec.asset_id
13268: and th.transaction_type_code = 'ADDITION';
13269:
13270: if (p_log_level_rec.statement_level) then
13271: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305: BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','');
13272: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13273: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13274: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id);
13275: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag);
13268: and th.transaction_type_code = 'ADDITION';
13269:
13270: if (p_log_level_rec.statement_level) then
13271: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305: BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','');
13272: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13273: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13274: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id);
13275: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag);
13276: end if;
13269:
13270: if (p_log_level_rec.statement_level) then
13271: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305: BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','');
13272: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13273: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13274: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id);
13275: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag);
13276: end if;
13277:
13270: if (p_log_level_rec.statement_level) then
13271: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305: BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','');
13272: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13273: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13274: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id);
13275: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag);
13276: end if;
13277:
13278: end if;
13271: fa_debug_pkg.add(l_calling_fn, '========== Recalc Bug 7699305: BEFORE LOOP FOR CURSOR c_get_ths_adj ==========','');
13272: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_date_entered', to_char(l_trans_rec.transaction_date_entered,'MM/DD/YYYY HH24:MI:SS'));
13273: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.who_info.creation_date', to_char(l_trans_rec.who_info.creation_date,'MM/DD/YYYY HH24:MI:SS'));
13274: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id);
13275: fa_debug_pkg.add(l_calling_fn, '++ l_retirement_flag', l_retirement_flag);
13276: end if;
13277:
13278: end if;
13279: end if;
13315: LIMIT l_limit;
13316:
13317:
13318: if (p_log_level_rec.statement_level) then
13319: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1 IN Fetch c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13320: fa_debug_pkg.add(l_calling_fn, 'Number of rows fetched',
13321: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
13322: end if;
13323:
13316:
13317:
13318: if (p_log_level_rec.statement_level) then
13319: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1 IN Fetch c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13320: fa_debug_pkg.add(l_calling_fn, 'Number of rows fetched',
13321: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
13322: end if;
13323:
13324: -- Store total row count
13389: l_impair_reserve := 0;
13390:
13391:
13392: if (p_log_level_rec.statement_level) then
13393: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1.1 IN For-Loop of c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13390:
13391:
13392: if (p_log_level_rec.statement_level) then
13393: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1.1 IN For-Loop of c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13391:
13392: if (p_log_level_rec.statement_level) then
13393: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1.1 IN For-Loop of c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13392: if (p_log_level_rec.statement_level) then
13393: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1.1 IN For-Loop of c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13393: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 4.1.1 IN For-Loop of c_get_ths_adj ==========','', p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13401: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type',l_dbr_event_type, p_log_level_rec => p_log_level_rec);
13394: fa_debug_pkg.add(l_calling_fn, '++ IN c_get_ths_adj: t_which_select('||to_char(i)||')',t_which_select(i));
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13401: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type',l_dbr_event_type, p_log_level_rec => p_log_level_rec);
13402: end if;
13395: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_header_id('||to_char(i)||')',t_transaction_header_id(i));
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13401: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type',l_dbr_event_type, p_log_level_rec => p_log_level_rec);
13402: end if;
13403:
13396: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_type_code('||to_char(i)||')',t_transaction_type_code(i));
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13401: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type',l_dbr_event_type, p_log_level_rec => p_log_level_rec);
13402: end if;
13403:
13404:
13397: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_date_entered('||to_char(i)||')',to_char(t_transaction_date_entered(i),'MM/DD/YYYY'));
13398: fa_debug_pkg.add(l_calling_fn, '++ t_amortization_start_date('||to_char(i)||')',to_char(t_amortization_start_date(i),'MM/DD/YYYY'));
13399: fa_debug_pkg.add(l_calling_fn, '++ t_date_effective('||to_char(i)||')',to_char(t_date_effective(i),'MM/DD/YYYY HH24:MI:SS'));
13400: fa_debug_pkg.add(l_calling_fn, '++ t_transaction_subtype('||to_char(i)||')',t_transaction_subtype(i));
13401: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type',l_dbr_event_type, p_log_level_rec => p_log_level_rec);
13402: end if;
13403:
13404:
13405: if (p_log_level_rec.statement_level) then
13402: end if;
13403:
13404:
13405: if (p_log_level_rec.statement_level) then
13406: fa_debug_pkg.add(l_calling_fn, '++ BEFORE SETTING', '...', p_log_level_rec => p_log_level_rec);
13407: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13408: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13409: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13410: end if;
13403:
13404:
13405: if (p_log_level_rec.statement_level) then
13406: fa_debug_pkg.add(l_calling_fn, '++ BEFORE SETTING', '...', p_log_level_rec => p_log_level_rec);
13407: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13408: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13409: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13410: end if;
13411:
13404:
13405: if (p_log_level_rec.statement_level) then
13406: fa_debug_pkg.add(l_calling_fn, '++ BEFORE SETTING', '...', p_log_level_rec => p_log_level_rec);
13407: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13408: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13409: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13410: end if;
13411:
13412: --
13405: if (p_log_level_rec.statement_level) then
13406: fa_debug_pkg.add(l_calling_fn, '++ BEFORE SETTING', '...', p_log_level_rec => p_log_level_rec);
13407: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13408: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13409: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13410: end if;
13411:
13412: --
13413: -- don't want to process addition after any trx.
13440: end if;
13441:
13442:
13443: if (p_log_level_rec.statement_level) then
13444: fa_debug_pkg.add(l_calling_fn, '++ AFTER SETTING', '...', p_log_level_rec => p_log_level_rec);
13445: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13446: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13447: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13448: fa_debug_pkg.add(l_calling_fn, '++ l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13441:
13442:
13443: if (p_log_level_rec.statement_level) then
13444: fa_debug_pkg.add(l_calling_fn, '++ AFTER SETTING', '...', p_log_level_rec => p_log_level_rec);
13445: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13446: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13447: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13448: fa_debug_pkg.add(l_calling_fn, '++ l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13449: end if;
13442:
13443: if (p_log_level_rec.statement_level) then
13444: fa_debug_pkg.add(l_calling_fn, '++ AFTER SETTING', '...', p_log_level_rec => p_log_level_rec);
13445: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13446: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13447: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13448: fa_debug_pkg.add(l_calling_fn, '++ l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13449: end if;
13450:
13443: if (p_log_level_rec.statement_level) then
13444: fa_debug_pkg.add(l_calling_fn, '++ AFTER SETTING', '...', p_log_level_rec => p_log_level_rec);
13445: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13446: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13447: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13448: fa_debug_pkg.add(l_calling_fn, '++ l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13449: end if;
13450:
13451:
13444: fa_debug_pkg.add(l_calling_fn, '++ AFTER SETTING', '...', p_log_level_rec => p_log_level_rec);
13445: fa_debug_pkg.add(l_calling_fn, '++ l_adj_processed', l_adj_processed, p_log_level_rec => p_log_level_rec);
13446: fa_debug_pkg.add(l_calling_fn, '++ l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13447: fa_debug_pkg.add(l_calling_fn, '++ l_add_processed', l_add_processed, p_log_level_rec => p_log_level_rec);
13448: fa_debug_pkg.add(l_calling_fn, '++ l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13449: end if;
13450:
13451:
13452: l_asset_fin_rec_old := l_asset_fin_rec_new;
13511: p_asset_hdr_rec.set_of_books_id,
13512: l_period_rec,
13513: p_log_level_rec) then
13514: if (p_log_level_rec.statement_level) then
13515: fa_debug_pkg.add(l_calling_fn, 'Error calling',
13516: 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
13517: end if;
13518:
13519: raise calc_failed;
13531: -- Find least transaction header id
13532: FOR j IN 1..t_transaction_header_id.COUNT LOOP
13533:
13534: if (p_log_level_rec.statement_level) then
13535: fa_debug_pkg.add(l_calling_fn, 'This is first trx', l_incoming_thid, p_log_level_rec => p_log_level_rec);
13536: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id(j)', t_transaction_header_id(j));
13537: fa_debug_pkg.add(l_calling_fn, 't_transaction_type_code(j)', t_transaction_type_code(j));
13538: end if;
13539:
13532: FOR j IN 1..t_transaction_header_id.COUNT LOOP
13533:
13534: if (p_log_level_rec.statement_level) then
13535: fa_debug_pkg.add(l_calling_fn, 'This is first trx', l_incoming_thid, p_log_level_rec => p_log_level_rec);
13536: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id(j)', t_transaction_header_id(j));
13537: fa_debug_pkg.add(l_calling_fn, 't_transaction_type_code(j)', t_transaction_type_code(j));
13538: end if;
13539:
13540: --Bug6933891
13533:
13534: if (p_log_level_rec.statement_level) then
13535: fa_debug_pkg.add(l_calling_fn, 'This is first trx', l_incoming_thid, p_log_level_rec => p_log_level_rec);
13536: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id(j)', t_transaction_header_id(j));
13537: fa_debug_pkg.add(l_calling_fn, 't_transaction_type_code(j)', t_transaction_type_code(j));
13538: end if;
13539:
13540: --Bug6933891
13541: -- This is for void trx to be pocessed if that is dated before addition trx.
13549: l_add_void_exist := TRUE;
13550: end if;
13551:
13552: if (p_log_level_rec.statement_level) then
13553: fa_debug_pkg.add(l_calling_fn, 'l_add_void_exist', l_add_void_exist, p_log_level_rec => p_log_level_rec);
13554: fa_debug_pkg.add(l_calling_fn, 'l_add_exist', l_add_exist, p_log_level_rec => p_log_level_rec);
13555: end if;
13556:
13557:
13550: end if;
13551:
13552: if (p_log_level_rec.statement_level) then
13553: fa_debug_pkg.add(l_calling_fn, 'l_add_void_exist', l_add_void_exist, p_log_level_rec => p_log_level_rec);
13554: fa_debug_pkg.add(l_calling_fn, 'l_add_exist', l_add_exist, p_log_level_rec => p_log_level_rec);
13555: end if;
13556:
13557:
13558: if (nvl(l_least_thid, l_incoming_thid) <> t_transaction_header_id(j)) and
13583:
13584: END LOOP;
13585:
13586: if (p_log_level_rec.statement_level) then
13587: fa_debug_pkg.add(l_calling_fn, 'Least transaction header id',
13588: l_least_thid, p_log_level_rec => p_log_level_rec);
13589: end if;
13590:
13591:
13602: p_unplanned_exp => l_unplanned_exp,
13603: p_log_level_rec => p_log_level_rec) then
13604:
13605: if (p_log_level_rec.statement_level) then
13606: fa_debug_pkg.add(l_calling_fn, 'Error calling',
13607: 'GetDeprnRec', p_log_level_rec => p_log_level_rec);
13608: end if;
13609:
13610: raise calc_failed;
13629: end if;
13630: end if; -- End of Special processes for first transaction
13631:
13632: if (p_log_level_rec.statement_level) then
13633: fa_debug_pkg.add(l_calling_fn, 'l_add_void_exist', l_add_void_exist, p_log_level_rec => p_log_level_rec);
13634: fa_debug_pkg.add(l_calling_fn, 'l_add_exist', l_add_exist, p_log_level_rec => p_log_level_rec);
13635: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13636: end if;
13637:
13630: end if; -- End of Special processes for first transaction
13631:
13632: if (p_log_level_rec.statement_level) then
13633: fa_debug_pkg.add(l_calling_fn, 'l_add_void_exist', l_add_void_exist, p_log_level_rec => p_log_level_rec);
13634: fa_debug_pkg.add(l_calling_fn, 'l_add_exist', l_add_exist, p_log_level_rec => p_log_level_rec);
13635: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13636: end if;
13637:
13638: --Bug6933891
13631:
13632: if (p_log_level_rec.statement_level) then
13633: fa_debug_pkg.add(l_calling_fn, 'l_add_void_exist', l_add_void_exist, p_log_level_rec => p_log_level_rec);
13634: fa_debug_pkg.add(l_calling_fn, 'l_add_exist', l_add_exist, p_log_level_rec => p_log_level_rec);
13635: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13636: end if;
13637:
13638: --Bug6933891
13639: -- This is for void trx to be pocessed if that is dated before addition trx.
13643: l_process_this_trx := TRUE;
13644: l_is_this_void := FALSE;
13645:
13646: if (p_log_level_rec.statement_level) then
13647: fa_debug_pkg.add(l_calling_fn, 'Process this trx even if this is void trx', t_transaction_type_code(i));
13648: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13649: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13650: end if;
13651: end if;
13644: l_is_this_void := FALSE;
13645:
13646: if (p_log_level_rec.statement_level) then
13647: fa_debug_pkg.add(l_calling_fn, 'Process this trx even if this is void trx', t_transaction_type_code(i));
13648: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13649: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13650: end if;
13651: end if;
13652:
13645:
13646: if (p_log_level_rec.statement_level) then
13647: fa_debug_pkg.add(l_calling_fn, 'Process this trx even if this is void trx', t_transaction_type_code(i));
13648: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
13649: fa_debug_pkg.add(l_calling_fn, 'l_process_this_trx', l_process_this_trx, p_log_level_rec => p_log_level_rec);
13650: end if;
13651: end if;
13652:
13653: if (l_asset_fin_rec_old.recoverable_cost is null) then
13665: x_eofy_salvage_value => l_eofy_sal_val,
13666: x_eop_recoverable_cost => l_eop_rec_cost,
13667: x_eop_salvage_value => l_eop_sal_val, p_log_level_rec => p_log_level_rec)) then
13668: if (p_log_level_rec.statement_level) then
13669: fa_debug_pkg.add(l_calling_fn, 'Error calling',
13670: 'FA_CALC_DEPRN_BASIS1_PKG.GET_EOFY_EOP', p_log_level_rec => p_log_level_rec);
13671: end if;
13672:
13673: raise calc_failed;
13701: (p_asset_deprn_rec_adj.deprn_reserve <> 0 OR p_asset_deprn_rec_adj.ytd_deprn <> 0) and
13702: G_release <> 11 then
13703: l_amort_res_adj_poa := TRUE ;
13704: if (p_log_level_rec.statement_level) then
13705: fa_debug_pkg.add(l_calling_fn, 'User has done an amortized reserve adj', 'TRUE', p_log_level_rec => p_log_level_rec);
13706: end if;
13707: end if;
13708: -- Bug 13620748 end
13709:
13707: end if;
13708: -- Bug 13620748 end
13709:
13710: if (p_log_level_rec.statement_level) then
13711: fa_debug_pkg.add(l_calling_fn, 'l_eofy_fy', l_eofy_fy, p_log_level_rec => p_log_level_rec);
13712: fa_debug_pkg.add(l_calling_fn, 'l_eofy_rec_cost', l_eofy_rec_cost, p_log_level_rec => p_log_level_rec);
13713: fa_debug_pkg.add(l_calling_fn, 'l_eofy_sal_val', l_eofy_sal_val, p_log_level_rec => p_log_level_rec);
13714: fa_debug_pkg.add(l_calling_fn, 'l_eop_rec_cost', l_eop_rec_cost, p_log_level_rec => p_log_level_rec);
13715: fa_debug_pkg.add(l_calling_fn, 'l_eop_sal_val', l_eop_sal_val, p_log_level_rec => p_log_level_rec);
13708: -- Bug 13620748 end
13709:
13710: if (p_log_level_rec.statement_level) then
13711: fa_debug_pkg.add(l_calling_fn, 'l_eofy_fy', l_eofy_fy, p_log_level_rec => p_log_level_rec);
13712: fa_debug_pkg.add(l_calling_fn, 'l_eofy_rec_cost', l_eofy_rec_cost, p_log_level_rec => p_log_level_rec);
13713: fa_debug_pkg.add(l_calling_fn, 'l_eofy_sal_val', l_eofy_sal_val, p_log_level_rec => p_log_level_rec);
13714: fa_debug_pkg.add(l_calling_fn, 'l_eop_rec_cost', l_eop_rec_cost, p_log_level_rec => p_log_level_rec);
13715: fa_debug_pkg.add(l_calling_fn, 'l_eop_sal_val', l_eop_sal_val, p_log_level_rec => p_log_level_rec);
13716: end if;
13709:
13710: if (p_log_level_rec.statement_level) then
13711: fa_debug_pkg.add(l_calling_fn, 'l_eofy_fy', l_eofy_fy, p_log_level_rec => p_log_level_rec);
13712: fa_debug_pkg.add(l_calling_fn, 'l_eofy_rec_cost', l_eofy_rec_cost, p_log_level_rec => p_log_level_rec);
13713: fa_debug_pkg.add(l_calling_fn, 'l_eofy_sal_val', l_eofy_sal_val, p_log_level_rec => p_log_level_rec);
13714: fa_debug_pkg.add(l_calling_fn, 'l_eop_rec_cost', l_eop_rec_cost, p_log_level_rec => p_log_level_rec);
13715: fa_debug_pkg.add(l_calling_fn, 'l_eop_sal_val', l_eop_sal_val, p_log_level_rec => p_log_level_rec);
13716: end if;
13717:
13710: if (p_log_level_rec.statement_level) then
13711: fa_debug_pkg.add(l_calling_fn, 'l_eofy_fy', l_eofy_fy, p_log_level_rec => p_log_level_rec);
13712: fa_debug_pkg.add(l_calling_fn, 'l_eofy_rec_cost', l_eofy_rec_cost, p_log_level_rec => p_log_level_rec);
13713: fa_debug_pkg.add(l_calling_fn, 'l_eofy_sal_val', l_eofy_sal_val, p_log_level_rec => p_log_level_rec);
13714: fa_debug_pkg.add(l_calling_fn, 'l_eop_rec_cost', l_eop_rec_cost, p_log_level_rec => p_log_level_rec);
13715: fa_debug_pkg.add(l_calling_fn, 'l_eop_sal_val', l_eop_sal_val, p_log_level_rec => p_log_level_rec);
13716: end if;
13717:
13718: if (l_trans_rec.transaction_header_id = l_incoming_thid) then
13711: fa_debug_pkg.add(l_calling_fn, 'l_eofy_fy', l_eofy_fy, p_log_level_rec => p_log_level_rec);
13712: fa_debug_pkg.add(l_calling_fn, 'l_eofy_rec_cost', l_eofy_rec_cost, p_log_level_rec => p_log_level_rec);
13713: fa_debug_pkg.add(l_calling_fn, 'l_eofy_sal_val', l_eofy_sal_val, p_log_level_rec => p_log_level_rec);
13714: fa_debug_pkg.add(l_calling_fn, 'l_eop_rec_cost', l_eop_rec_cost, p_log_level_rec => p_log_level_rec);
13715: fa_debug_pkg.add(l_calling_fn, 'l_eop_sal_val', l_eop_sal_val, p_log_level_rec => p_log_level_rec);
13716: end if;
13717:
13718: if (l_trans_rec.transaction_header_id = l_incoming_thid) then
13719:
13717:
13718: if (l_trans_rec.transaction_header_id = l_incoming_thid) then
13719:
13720: if (p_log_level_rec.statement_level) then
13721: fa_debug_pkg.add(l_calling_fn, 'Entered Transaction', 'TRUE', p_log_level_rec => p_log_level_rec);
13722: end if;
13723:
13724: --Bug 13620748
13725: -- we will avoid this only if user has done reserve adj in POA
13751: l_calc_deprn_flag := FALSE;
13752: end if;
13753: else
13754: if (p_log_level_rec.statement_level) then
13755: fa_debug_pkg.add(l_calling_fn, 'Entered Transaction', 'FALSE', p_log_level_rec => p_log_level_rec);
13756: end if;
13757:
13758: l_use_fin_rec_adj := FALSE;
13759: end if;
13779: l_recognize_gain_loss;
13780:
13781: if c_get_mc_retirement%NOTFOUND then
13782: if (p_log_level_rec.statement_level) then
13783: fa_debug_pkg.add(l_calling_fn, 'Process this transaction', 'FALSE', p_log_level_rec => p_log_level_rec);
13784: end if;
13785:
13786: l_process_this_trx := FALSE;
13787: else
13792: CLOSE c_get_mc_rsv_retired;
13793: end if;
13794:
13795: if (p_log_level_rec.statement_level) then
13796: fa_debug_pkg.add(l_calling_fn, 'Process this '||
13797: l_trans_rec.transaction_type_code, 'TRUE', p_log_level_rec => p_log_level_rec);
13798: end if;
13799: end if; -- c_get_mc_retirement%NOTFOUND
13800:
13816: l_recognize_gain_loss;
13817:
13818: if c_get_retirement%NOTFOUND then
13819: if (p_log_level_rec.statement_level) then
13820: fa_debug_pkg.add(l_calling_fn, 'Process this transaction', 'FALSE', p_log_level_rec => p_log_level_rec);
13821: end if;
13822:
13823: l_process_this_trx := FALSE;
13824: else
13830: CLOSE c_get_rsv_retired;
13831: end if;
13832:
13833: if (p_log_level_rec.statement_level) then
13834: fa_debug_pkg.add(l_calling_fn, 'Process this '||
13835: l_trans_rec.transaction_type_code, 'TRUE', p_log_level_rec => p_log_level_rec);
13836: end if;
13837:
13838: end if; -- c_get_retirement%NOTFOUND
13841:
13842: end if; -- (p_mrc_sob_type_code = 'R')
13843:
13844: if (p_log_level_rec.statement_level) then
13845: fa_debug_pkg.add(l_calling_fn, 'Retirement Id',
13846: l_retirement_id, p_log_level_rec => p_log_level_rec);
13847: fa_debug_pkg.add(l_calling_fn, 'Retired Reserve',
13848: l_reserve_retired, p_log_level_rec => p_log_level_rec);
13849: end if;
13843:
13844: if (p_log_level_rec.statement_level) then
13845: fa_debug_pkg.add(l_calling_fn, 'Retirement Id',
13846: l_retirement_id, p_log_level_rec => p_log_level_rec);
13847: fa_debug_pkg.add(l_calling_fn, 'Retired Reserve',
13848: l_reserve_retired, p_log_level_rec => p_log_level_rec);
13849: end if;
13850:
13851: elsif l_trans_rec.transaction_type_code = G_TRX_TYPE_REV then
13886: end if;
13887:
13888:
13889: if (p_log_level_rec.statement_level) then
13890: fa_debug_pkg.add(l_calling_fn, 'Revaluation Reserve',
13891: l_reval_reserve, p_log_level_rec => p_log_level_rec);
13892: fa_debug_pkg.add(l_calling_fn, 'Revaluation Reserve',
13893: l_reval_bonus_reserve, p_log_level_rec => p_log_level_rec);
13894: end if;
13888:
13889: if (p_log_level_rec.statement_level) then
13890: fa_debug_pkg.add(l_calling_fn, 'Revaluation Reserve',
13891: l_reval_reserve, p_log_level_rec => p_log_level_rec);
13892: fa_debug_pkg.add(l_calling_fn, 'Revaluation Reserve',
13893: l_reval_bonus_reserve, p_log_level_rec => p_log_level_rec);
13894: end if;
13895:
13896: elsif (l_trans_rec.transaction_key = 'IM') then
13908: CLOSE c_get_impair_rsv;
13909: end if;
13910:
13911: if (p_log_level_rec.statement_level) then
13912: fa_debug_pkg.add(l_calling_fn, 'Impairment Reserve', l_impair_reserve, p_log_level_rec => p_log_level_rec);
13913: end if;
13914:
13915: end if; -- l_trans_rec.transaction_type_code in (G_TRX_TYPE_FUL_RET, G_TRX_TYPE_PAR_RET)
13916:
13920: if (l_process_this_trx) or
13921: ((i = 1) and (l_row_count < l_limit)) then
13922:
13923: if (p_log_level_rec.statement_level) then
13924: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 6.0 : Calling GetFinRec ==========','', p_log_level_rec => p_log_level_rec);
13925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13926: end if;
13927:
13928: -- Bug # 8356539 added below code to pass deprn limit type to
13921: ((i = 1) and (l_row_count < l_limit)) then
13922:
13923: if (p_log_level_rec.statement_level) then
13924: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 6.0 : Calling GetFinRec ==========','', p_log_level_rec => p_log_level_rec);
13925: fa_debug_pkg.add(l_calling_fn, '++ l_trans_rec.transaction_header_id', l_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
13926: end if;
13927:
13928: -- Bug # 8356539 added below code to pass deprn limit type to
13929: -- adjustment api when called from backend
13946: x_dpis_change => l_dpis_change,
13947: p_mrc_sob_type_code => p_mrc_sob_type_code,
13948: p_log_level_rec => p_log_level_rec) then
13949: if (p_log_level_rec.statement_level) then
13950: fa_debug_pkg.add(l_calling_fn, 'Error calling',
13951: 'GetFinRec', p_log_level_rec => p_log_level_rec);
13952: end if;
13953:
13954: raise calc_failed;
13962: if (l_reserve_retired <> 0) then
13963: l_reserve_retired := l_asset_deprn_rec.deprn_reserve *
13964: (l_cost_retired /nvl(l_asset_fin_rec_old.cost,l_asset_fin_rec_new.cost - l_cost_retired));
13965: if not FA_UTILS_PKG.faxrnd(l_reserve_retired, p_asset_hdr_rec.book_type_code, p_asset_hdr_rec.set_of_books_id,p_log_level_rec => p_log_level_rec) then
13966: fa_debug_pkg.add(l_calling_fn, 'calling FA_UTILS_PKG.faxrnd', 'FAILED', p_log_level_rec => p_log_level_rec);
13967: raise calc_failed;
13968: end if;
13969: end if;
13970:
13968: end if;
13969: end if;
13970:
13971: if (p_log_level_rec.statement_level) then
13972: fa_debug_pkg.add(l_calling_fn, 'Recalculated Reserve Retired',
13973: l_reserve_retired, p_log_level_rec => p_log_level_rec);
13974: end if;
13975:
13976: -- Populate local retire rec for depreciable basis to bahave like retirement
13996: --tk_util.debug('check: '||to_char(l_brow_ytd_deprn)||':'||to_char(l_brow_deprn_reserve));
13997: --
13998: -- need to initialize l_asset_deprn_rec with B row.
13999: if (p_log_level_rec.statement_level) then
14000: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 6.5 : Resetting l_asset_deprn_rec to ZERO due to DPIS Change ==========','', p_log_level_rec => p_log_level_rec);
14001: end if;
14002:
14003: l_asset_deprn_rec.deprn_amount := 0;
14004: l_asset_deprn_rec.ytd_deprn := 0; --bug 8540563 nvl(l_brow_ytd_deprn, 0);
14025: l_dbr_event_type := l_default_dbr_event_type;
14026: end if;
14027:
14028: if (p_log_level_rec.statement_level) then
14029: fa_debug_pkg.add(l_calling_fn, 'DPIS Change', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14030: fa_debug_pkg.add(l_calling_fn, 'new ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
14031: fa_debug_pkg.add(l_calling_fn, 'new deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14032: end if;
14033: end if;
14026: end if;
14027:
14028: if (p_log_level_rec.statement_level) then
14029: fa_debug_pkg.add(l_calling_fn, 'DPIS Change', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14030: fa_debug_pkg.add(l_calling_fn, 'new ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
14031: fa_debug_pkg.add(l_calling_fn, 'new deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14032: end if;
14033: end if;
14034: --tk_util.debug('1 rec_cost: '||to_char(px_asset_fin_rec_new.recoverable_cost));
14027:
14028: if (p_log_level_rec.statement_level) then
14029: fa_debug_pkg.add(l_calling_fn, 'DPIS Change', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14030: fa_debug_pkg.add(l_calling_fn, 'new ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
14031: fa_debug_pkg.add(l_calling_fn, 'new deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14032: end if;
14033: end if;
14034: --tk_util.debug('1 rec_cost: '||to_char(px_asset_fin_rec_new.recoverable_cost));
14035:
14085: CLOSE c_get_impair_exp;
14086: end if;
14087: l_asset_deprn_rec.impairment_reserve := l_asset_deprn_rec.impairment_reserve - l_impair_reserve;
14088: if (p_log_level_rec.statement_level) then
14089: fa_debug_pkg.add(l_calling_fn, 'Impairment reserve reversed', l_impair_reserve, p_log_level_rec => p_log_level_rec);
14090: end if;
14091: end if;
14092: --tk_util.debug('1eofy rsv: '||to_char(l_asset_fin_rec_new.eofy_reserve));
14093:
14163: if (not fa_cache_pkg.fazccmt(
14164: l_asset_fin_rec_new.deprn_method_code,
14165: l_asset_fin_rec_new.life_in_months, p_log_level_rec => p_log_level_rec)) then
14166: if (p_log_level_rec.statement_level) then
14167: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14168: 'fa_cache_pkg.fazccmt', p_log_level_rec => p_log_level_rec);
14169: end if;
14170:
14171: raise calc_failed;
14182: l_energy_member := TRUE;
14183: end if;
14184:
14185: if (p_log_level_rec.statement_level) then
14186: fa_debug_pkg.add(l_calling_fn, 'Japan Tax: l_trans_rec.transaction_key',
14187: l_trans_rec.transaction_key, p_log_level_rec => p_log_level_rec);
14188: end if;
14189:
14190: -- skip faxcde call for raf
14208: g_temp_number,
14209: l_dpr_in.y_begin,
14210: g_temp_integer, p_log_level_rec => p_log_level_rec) then
14211: if (p_log_level_rec.statement_level) then
14212: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14213: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
14214: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
14215: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
14216: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
14210: g_temp_integer, p_log_level_rec => p_log_level_rec) then
14211: if (p_log_level_rec.statement_level) then
14212: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14213: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
14214: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
14215: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
14216: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
14217: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
14218:
14212: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14213: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
14214: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
14215: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
14216: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
14217: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
14218:
14219: end if;
14220:
14264: p_asset_hdr_rec => p_asset_hdr_rec,
14265: p_dpr_in => l_dpr_in,
14266: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
14267: if (p_log_level_rec.statement_level) then
14268: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14269: 'FA_TRACK_MEMBER_PVT.get_member_at_start', p_log_level_rec => p_log_level_rec);
14270: end if;
14271:
14272: raise calc_failed;
14277:
14278: l_dpr_in.cost_frac := null; -- Bug 5893429
14279:
14280: if (p_log_level_rec.statement_level) then
14281: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14282: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14283: fa_debug_pkg.add(l_calling_fn, ' Call ', 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
14284: end if;
14285:
14278: l_dpr_in.cost_frac := null; -- Bug 5893429
14279:
14280: if (p_log_level_rec.statement_level) then
14281: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14282: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14283: fa_debug_pkg.add(l_calling_fn, ' Call ', 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
14284: end if;
14285:
14286: --+++++++ Call Depreciation engine for rate adjustment factor +++++++
14279:
14280: if (p_log_level_rec.statement_level) then
14281: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14282: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14283: fa_debug_pkg.add(l_calling_fn, ' Call ', 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
14284: end if;
14285:
14286: --+++++++ Call Depreciation engine for rate adjustment factor +++++++
14287: if not FA_CDE_PKG.faxcde(l_dpr_in,
14288: l_dpr_arr,
14289: l_dpr_out,
14290: l_running_mode, p_log_level_rec => p_log_level_rec) then
14291: if (p_log_level_rec.statement_level) then
14292: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14293: 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
14294: end if;
14295:
14296: raise calc_failed;
14296: raise calc_failed;
14297: end if;
14298:
14299: if (p_log_level_rec.statement_level) then
14300: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14301: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
14302: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14303: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14304: end if;
14297: end if;
14298:
14299: if (p_log_level_rec.statement_level) then
14300: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14301: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
14302: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14303: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14304: end if;
14305:
14299: if (p_log_level_rec.statement_level) then
14300: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 1 ==========','', p_log_level_rec => p_log_level_rec);
14301: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv',
14302: l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14303: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14304: end if;
14305:
14306: -- manual override
14307: if fa_cache_pkg.fa_deprn_override_enabled then
14363: fa_track_member_pvt.p_track_member_table.delete;
14364: fa_track_member_pvt.p_track_mem_index_table.delete;
14365:
14366: if (p_log_level_rec.statement_level) then
14367: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.p_track_member_table',
14368: 'deleted', p_log_level_rec => p_log_level_rec);
14369: end if;
14370: end if;
14371:
14434: x_exp_rsv_amount => l_reserve_adj,
14435: p_log_level_rec => p_log_level_rec )) then
14436:
14437: if (p_log_level_rec.statement_level) then
14438: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14439: 'GetExpRsv', p_log_level_rec => p_log_level_rec);
14440: end if;
14441:
14442: raise calc_failed;
14451: end if;
14452:
14453: --tk_util.debug('3eofy rsv: '||to_char(l_asset_fin_rec_new.eofy_reserve));
14454: if (p_log_level_rec.statement_level) then
14455: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14456: fa_debug_pkg.add(l_calling_fn, ' Call ',
14457: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14458: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1 ==========','', p_log_level_rec => p_log_level_rec);
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14452:
14453: --tk_util.debug('3eofy rsv: '||to_char(l_asset_fin_rec_new.eofy_reserve));
14454: if (p_log_level_rec.statement_level) then
14455: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14456: fa_debug_pkg.add(l_calling_fn, ' Call ',
14457: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14458: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1 ==========','', p_log_level_rec => p_log_level_rec);
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14460: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14454: if (p_log_level_rec.statement_level) then
14455: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14456: fa_debug_pkg.add(l_calling_fn, ' Call ',
14457: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14458: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1 ==========','', p_log_level_rec => p_log_level_rec);
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14460: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14461: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
14462: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14455: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14456: fa_debug_pkg.add(l_calling_fn, ' Call ',
14457: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14458: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1 ==========','', p_log_level_rec => p_log_level_rec);
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14460: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14461: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
14462: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14463: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve_retired',
14457: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14458: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1 ==========','', p_log_level_rec => p_log_level_rec);
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14460: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14461: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
14462: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14463: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve_retired',
14464: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
14465: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_adj.eofy_reserve',
14459: fa_debug_pkg.add(l_calling_fn, 'p_trans_rec.transaction_type_code',
14460: p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14461: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
14462: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14463: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve_retired',
14464: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
14465: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_adj.eofy_reserve',
14466: l_asset_fin_rec_adj.eofy_reserve, p_log_level_rec => p_log_level_rec);
14467: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
14461: fa_debug_pkg.add(l_calling_fn, 'l_trans_rec.transaction_type_code',
14462: l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14463: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve_retired',
14464: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
14465: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_adj.eofy_reserve',
14466: l_asset_fin_rec_adj.eofy_reserve, p_log_level_rec => p_log_level_rec);
14467: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
14468: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
14469: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
14463: fa_debug_pkg.add(l_calling_fn, 'l_eofy_reserve_retired',
14464: l_eofy_reserve_retired, p_log_level_rec => p_log_level_rec);
14465: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_adj.eofy_reserve',
14466: l_asset_fin_rec_adj.eofy_reserve, p_log_level_rec => p_log_level_rec);
14467: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
14468: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
14469: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
14470: l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14471: end if;
14465: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_adj.eofy_reserve',
14466: l_asset_fin_rec_adj.eofy_reserve, p_log_level_rec => p_log_level_rec);
14467: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.eofy_reserve',
14468: l_asset_fin_rec_new.eofy_reserve, p_log_level_rec => p_log_level_rec);
14469: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve',
14470: l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14471: end if;
14472:
14473: --tk_util.debug('4 rec_cost: '||to_char(px_asset_fin_rec_new.recoverable_cost));
14478: if (not (l_invoice_transaction_id is not null and
14479: nvl(l_asset_fin_rec_old.cost, 0) = l_asset_fin_rec_new.cost)) then
14480:
14481: if (p_log_level_rec.statement_level) then
14482: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1.1 ==========','', p_log_level_rec => p_log_level_rec);
14483: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14484: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14485: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_recoverable_cost', l_asset_fin_rec_new.adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
14486: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.method_code', l_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
14479: nvl(l_asset_fin_rec_old.cost, 0) = l_asset_fin_rec_new.cost)) then
14480:
14481: if (p_log_level_rec.statement_level) then
14482: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1.1 ==========','', p_log_level_rec => p_log_level_rec);
14483: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14484: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14485: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_recoverable_cost', l_asset_fin_rec_new.adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
14486: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.method_code', l_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
14487: end if;
14480:
14481: if (p_log_level_rec.statement_level) then
14482: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1.1 ==========','', p_log_level_rec => p_log_level_rec);
14483: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14484: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14485: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_recoverable_cost', l_asset_fin_rec_new.adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
14486: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.method_code', l_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
14487: end if;
14488: -- Bug 6704518 Populate the transaction_key for Extended method
14481: if (p_log_level_rec.statement_level) then
14482: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1.1 ==========','', p_log_level_rec => p_log_level_rec);
14483: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14484: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14485: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_recoverable_cost', l_asset_fin_rec_new.adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
14486: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.method_code', l_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
14487: end if;
14488: -- Bug 6704518 Populate the transaction_key for Extended method
14489: -- Bug 8211842: Pass trx_key as ES if extended has started else pass EN
14482: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling call_deprn_basis 1.1 ==========','', p_log_level_rec => p_log_level_rec);
14483: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14484: fa_debug_pkg.add(l_calling_fn, '++ l_dbr_event_type', l_dbr_event_type, p_log_level_rec => p_log_level_rec);
14485: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_recoverable_cost', l_asset_fin_rec_new.adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
14486: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.method_code', l_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
14487: end if;
14488: -- Bug 6704518 Populate the transaction_key for Extended method
14489: -- Bug 8211842: Pass trx_key as ES if extended has started else pass EN
14490: if (l_asset_fin_rec_new.deprn_method_code = 'JP-STL-EXTND') then
14533: px_new_raf => l_asset_fin_rec_new.rate_adjustment_factor,
14534: px_new_formula_factor => l_asset_fin_rec_new.formula_factor,
14535: p_log_level_rec => p_log_level_rec)) then
14536: if (p_log_level_rec.statement_level) then
14537: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14538: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14539: end if;
14540:
14541: raise calc_failed;
14558:
14559: end if;
14560:
14561: if (p_log_level_rec.statement_level) then
14562: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling CALL_DEPRN_BASIS 1 ==========','', p_log_level_rec => p_log_level_rec);
14563: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14564: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor', l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14565: end if;
14566:
14559: end if;
14560:
14561: if (p_log_level_rec.statement_level) then
14562: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling CALL_DEPRN_BASIS 1 ==========','', p_log_level_rec => p_log_level_rec);
14563: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14564: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor', l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14565: end if;
14566:
14567: else
14560:
14561: if (p_log_level_rec.statement_level) then
14562: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling CALL_DEPRN_BASIS 1 ==========','', p_log_level_rec => p_log_level_rec);
14563: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost', l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14564: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor', l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14565: end if;
14566:
14567: else
14568: l_asset_fin_rec_new.adjusted_cost := l_asset_fin_rec_old.adjusted_cost;
14571: end if;
14572:
14573: if (p_log_level_rec.statement_level) then
14574:
14575: fa_debug_pkg.add
14576: (fname => l_calling_fn,
14577: element => 'impairment_reserve',
14578: value => p_asset_deprn_rec.impairment_reserve, p_log_level_rec => p_log_level_rec);
14579:
14576: (fname => l_calling_fn,
14577: element => 'impairment_reserve',
14578: value => p_asset_deprn_rec.impairment_reserve, p_log_level_rec => p_log_level_rec);
14579:
14580: fa_debug_pkg.add
14581: (fname => l_calling_fn,
14582: element => 'trx_type_code',
14583: value => p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
14584: end if;
14593: end if;
14594:
14595: --tk_util.debug('l_asset_fin_rec_new.cost: '||to_char(l_asset_fin_rec_new.cost));
14596: if (p_log_level_rec.statement_level) then
14597: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
14598: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14599: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
14600: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14601: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
14595: --tk_util.debug('l_asset_fin_rec_new.cost: '||to_char(l_asset_fin_rec_new.cost));
14596: if (p_log_level_rec.statement_level) then
14597: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
14598: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14599: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
14600: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14601: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
14602: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14603: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
14597: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
14598: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
14599: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
14600: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14601: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
14602: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14603: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
14604: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
14605: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14599: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
14600: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
14601: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
14602: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14603: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
14604: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
14605: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14606: end if;
14607:
14601: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
14602: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
14603: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
14604: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
14605: fa_debug_pkg.add(l_calling_fn, '====== ', '==============================', p_log_level_rec => p_log_level_rec);
14606: end if;
14607:
14608: end if; -- (l_process_this_trx)
14609:
14623: -- next transaction from database and determine if depreciation needs
14624: -- to be called or not.
14625: --
14626: if (p_log_level_rec.statement_level) then
14627: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
14628: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id.COUNT',
14629: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
14630: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
14631: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14624: -- to be called or not.
14625: --
14626: if (p_log_level_rec.statement_level) then
14627: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
14628: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id.COUNT',
14629: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
14630: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
14631: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14632: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
14626: if (p_log_level_rec.statement_level) then
14627: fa_debug_pkg.add(l_calling_fn, 'Run Depreciation ', i, p_log_level_rec => p_log_level_rec);
14628: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id.COUNT',
14629: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
14630: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
14631: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14632: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
14633: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14634: end if;
14628: fa_debug_pkg.add(l_calling_fn, 't_transaction_header_id.COUNT',
14629: t_transaction_header_id.COUNT, p_log_level_rec => p_log_level_rec);
14630: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter',
14631: l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14632: fa_debug_pkg.add(l_calling_fn, 'p_period_rec.period_counter',
14633: p_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14634: end if;
14635:
14636: if (i < t_transaction_header_id.COUNT) then
14654: p_asset_hdr_rec.set_of_books_id,
14655: l_next_period_rec,
14656: p_log_level_rec) then
14657: if (p_log_level_rec.statement_level) then
14658: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14659: 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
14660: end if;
14661:
14662: raise calc_failed;
14670:
14671: end if; -- (i < t_transaction_header_id.COUNT)
14672:
14673: if (p_log_level_rec.statement_level) then
14674: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.0 : Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14671: end if; -- (i < t_transaction_header_id.COUNT)
14672:
14673: if (p_log_level_rec.statement_level) then
14674: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.0 : Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14679: fa_debug_pkg.add(l_calling_fn, '++ l_limit', l_limit, p_log_level_rec => p_log_level_rec);
14672:
14673: if (p_log_level_rec.statement_level) then
14674: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.0 : Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14679: fa_debug_pkg.add(l_calling_fn, '++ l_limit', l_limit, p_log_level_rec => p_log_level_rec);
14680: end if;
14673: if (p_log_level_rec.statement_level) then
14674: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.0 : Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14679: fa_debug_pkg.add(l_calling_fn, '++ l_limit', l_limit, p_log_level_rec => p_log_level_rec);
14680: end if;
14681: --Bug6755649
14674: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.0 : Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14679: fa_debug_pkg.add(l_calling_fn, '++ l_limit', l_limit, p_log_level_rec => p_log_level_rec);
14680: end if;
14681: --Bug6755649
14682: --If the transaction processed is partial retirement then save the calculated adj cost
14675: fa_debug_pkg.add(l_calling_fn, '++ i', i, p_log_level_rec => p_log_level_rec);
14676: fa_debug_pkg.add(l_calling_fn, '++ l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14677: fa_debug_pkg.add(l_calling_fn, '++ l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14678: fa_debug_pkg.add(l_calling_fn, '++ l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14679: fa_debug_pkg.add(l_calling_fn, '++ l_limit', l_limit, p_log_level_rec => p_log_level_rec);
14680: end if;
14681: --Bug6755649
14682: --If the transaction processed is partial retirement then save the calculated adj cost
14683: -- and cost frac.
14715: p_asset_hdr_rec.set_of_books_id,
14716: l_next_period_rec,
14717: p_log_level_rec) then
14718: if (p_log_level_rec.statement_level) then
14719: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14720: 'GetPeriodInfo', p_log_level_rec => p_log_level_rec);
14721: end if;
14722:
14723: raise calc_failed;
14724: end if;
14725: end if;
14726:
14727: if (p_log_level_rec.statement_level) then
14728: fa_debug_pkg.add(l_calling_fn, 'Fetched next transaction information ', l_limit, p_log_level_rec => p_log_level_rec);
14729: end if;
14730:
14731: end if; -- (i = l_limit)
14732:
14772: end if;
14773:
14774:
14775: if (p_log_level_rec.statement_level) then
14776: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.5 :Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14773:
14774:
14775: if (p_log_level_rec.statement_level) then
14776: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.5 :Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14774:
14775: if (p_log_level_rec.statement_level) then
14776: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.5 :Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14775: if (p_log_level_rec.statement_level) then
14776: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.5 :Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14776: fa_debug_pkg.add(l_calling_fn, '========== Recalc Step 8.5 :Checking whether to run Deprn ==========','', p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14777: fa_debug_pkg.add(l_calling_fn, 'l_next_trx_trx_date_entered', to_char(l_next_trx_trx_date_entered,'MM/DD/YYYY'));
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14778: fa_debug_pkg.add(l_calling_fn, 'l_next_period_rec.period_counter', l_next_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14779: fa_debug_pkg.add(l_calling_fn, 'l_period_rec.period_counter', l_period_rec.period_counter, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14787: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
14780: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_old.depreciate_flag', l_asset_fin_rec_old.depreciate_flag, p_log_level_rec => p_log_level_rec);
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14787: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
14788: end if;
14781: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.depreciate_flag', l_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14787: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
14788: end if;
14789:
14782: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14787: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
14788: end if;
14789:
14790: if (l_next_trx_trx_date_entered is null or
14783: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
14784: fa_debug_pkg.add(l_calling_fn, 'px_asset_fin_rec_new.depreciate_flag', px_asset_fin_rec_new.depreciate_flag, p_log_level_rec => p_log_level_rec);
14785: fa_debug_pkg.add(l_calling_fn, 'l_depreciate_flag', l_depreciate_flag, p_log_level_rec => p_log_level_rec);
14786: fa_debug_pkg.add(l_calling_fn, 'l_energy_member', l_energy_member, p_log_level_rec => p_log_level_rec);
14787: fa_debug_pkg.add(l_calling_fn, 'l_is_this_void', l_is_this_void, p_log_level_rec => p_log_level_rec);
14788: end if;
14789:
14790: if (l_next_trx_trx_date_entered is null or
14791: l_next_period_rec.period_counter > l_period_rec.period_counter) and
14799: l_dpr_in.y_begin := l_period_rec.fiscal_year;
14800: l_dpr_in.p_cl_begin := l_period_rec.period_num;
14801:
14802: if (p_log_level_rec.statement_level) then
14803: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14804: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
14805: end if;
14806:
14807: if (i < t_transaction_header_id.COUNT) or (i = l_limit) then
14800: l_dpr_in.p_cl_begin := l_period_rec.period_num;
14801:
14802: if (p_log_level_rec.statement_level) then
14803: fa_debug_pkg.add(l_calling_fn, 'Depreciation starts from period of ', l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14804: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_begin, p_log_level_rec => p_log_level_rec);
14805: end if;
14806:
14807: if (i < t_transaction_header_id.COUNT) or (i = l_limit) then
14808: if (p_log_level_rec.statement_level) then
14805: end if;
14806:
14807: if (i < t_transaction_header_id.COUNT) or (i = l_limit) then
14808: if (p_log_level_rec.statement_level) then
14809: fa_debug_pkg.add(l_calling_fn, 'Depreciate until ', 'Next Transaction', p_log_level_rec => p_log_level_rec);
14810: end if;
14811: --
14812: -- Find how many periods to depreciate until next transaction headers
14813: -- Set FA_STD_TYPES.dpr_struct for depreciation(faxcde) call.
14821: end if;
14822:
14823: elsif (i = t_transaction_header_id.COUNT) then
14824: if (p_log_level_rec.statement_level) then
14825: fa_debug_pkg.add(l_calling_fn, 'Depreciate until ', 'Current period', p_log_level_rec => p_log_level_rec);
14826: end if;
14827: --
14828: -- This is the last transaction to process. So depreciate
14829: -- until last period.
14838:
14839: end if; -- (i < t_transaction_header_id.COUNT) or (i = l_limit)
14840:
14841: if (p_log_level_rec.statement_level) then
14842: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14843: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
14844: end if;
14845:
14846: if (l_period_rec.period_num <> 1) then
14839: end if; -- (i < t_transaction_header_id.COUNT) or (i = l_limit)
14840:
14841: if (p_log_level_rec.statement_level) then
14842: fa_debug_pkg.add(l_calling_fn, 'Depreciation will end at period of ', l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14843: fa_debug_pkg.add(l_calling_fn, 'and year of ', l_dpr_in.y_end, p_log_level_rec => p_log_level_rec);
14844: end if;
14845:
14846: if (l_period_rec.period_num <> 1) then
14847: l_dpr_in.deprn_rounding_flag := 'ADJ';
14885: --Bug6755649 ends
14886:
14887: l_dpr_in.cost_frac := l_cost_frac;
14888:
14889: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost_frac', l_dpr_in.cost_frac, p_log_level_rec => p_log_level_rec);
14890: -- End of bug fix 5893429
14891:
14892: -- Bug 8398064: if current partial retirement is in same period as prev row in overlapping txns
14893: -- then reset deprn rsv if there are no amort adj or reval overlaps.
14901: t_transaction_type_code(i) like '%RETIREMENT'
14902: then
14903: l_overlapping_rets := TRUE;
14904: l_rem_frac := l_asset_fin_rec_new.cost / l_asset_fin_rec_old.cost;
14905: fa_debug_pkg.add(l_calling_fn, '++ OVERLAPPING TXNS 1', t_transaction_header_id(i) );
14906: fa_debug_pkg.add(l_calling_fn, '++ OVERLAPPING TXNS 2', t_transaction_header_id(i-1) );
14907: l_dpr_in.deprn_rsv := l_rem_frac * l_dpr_in.deprn_rsv;
14908: l_b := FA_UTILS_PKG.faxrnd(l_dpr_in.deprn_rsv, p_asset_hdr_rec.book_type_code, p_asset_hdr_rec.set_of_books_id,p_log_level_rec => p_log_level_rec);
14909: end if;
14902: then
14903: l_overlapping_rets := TRUE;
14904: l_rem_frac := l_asset_fin_rec_new.cost / l_asset_fin_rec_old.cost;
14905: fa_debug_pkg.add(l_calling_fn, '++ OVERLAPPING TXNS 1', t_transaction_header_id(i) );
14906: fa_debug_pkg.add(l_calling_fn, '++ OVERLAPPING TXNS 2', t_transaction_header_id(i-1) );
14907: l_dpr_in.deprn_rsv := l_rem_frac * l_dpr_in.deprn_rsv;
14908: l_b := FA_UTILS_PKG.faxrnd(l_dpr_in.deprn_rsv, p_asset_hdr_rec.book_type_code, p_asset_hdr_rec.set_of_books_id,p_log_level_rec => p_log_level_rec);
14909: end if;
14910: end;
14911: end if;
14912: -- Bug 8398064
14913:
14914: if (p_log_level_rec.statement_level) then
14915: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14912: -- Bug 8398064
14913:
14914: if (p_log_level_rec.statement_level) then
14915: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14913:
14914: if (p_log_level_rec.statement_level) then
14915: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14921: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.deprn_rsv',l_dpr_in.deprn_rsv, p_log_level_rec => p_log_level_rec);
14914: if (p_log_level_rec.statement_level) then
14915: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14921: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.deprn_rsv',l_dpr_in.deprn_rsv, p_log_level_rec => p_log_level_rec);
14922: end if;
14915: fa_debug_pkg.add(l_calling_fn, '========== Recalc Before Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14921: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.deprn_rsv',l_dpr_in.deprn_rsv, p_log_level_rec => p_log_level_rec);
14922: end if;
14923:
14916: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.cost',l_dpr_in.cost, p_log_level_rec => p_log_level_rec);
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14921: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.deprn_rsv',l_dpr_in.deprn_rsv, p_log_level_rec => p_log_level_rec);
14922: end if;
14923:
14924: -- 8211842 : faxcde will look for POSTED depreciation overrides
14917: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.adj_cost',l_dpr_in.adj_cost, p_log_level_rec => p_log_level_rec);
14918: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.rate_adj_factor',l_dpr_in.rate_adj_factor, p_log_level_rec => p_log_level_rec);
14919: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.prior_fy_exp',l_dpr_in.prior_fy_exp, p_log_level_rec => p_log_level_rec);
14920: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.eofy_reserve',l_dpr_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
14921: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_in.deprn_rsv',l_dpr_in.deprn_rsv, p_log_level_rec => p_log_level_rec);
14922: end if;
14923:
14924: -- 8211842 : faxcde will look for POSTED depreciation overrides
14925: -- for periods before override_period_counter
14932: l_dpr_arr,
14933: l_dpr_out,
14934: l_running_mode, p_log_level_rec => p_log_level_rec) then
14935: if (p_log_level_rec.statement_level) then
14936: fa_debug_pkg.add(l_calling_fn, 'Error calling',
14937: 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
14938: end if;
14939:
14940: raise calc_failed;
14940: raise calc_failed;
14941: end if;
14942:
14943: if (p_log_level_rec.statement_level) then
14944: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14941: end if;
14942:
14943: if (p_log_level_rec.statement_level) then
14944: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14942:
14943: if (p_log_level_rec.statement_level) then
14944: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14943: if (p_log_level_rec.statement_level) then
14944: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14944: fa_debug_pkg.add(l_calling_fn, '========== Recalc After Calling faxcde 2 ==========','', p_log_level_rec => p_log_level_rec);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14952: fa_debug_pkg.add(l_calling_fn, '++ AFTER: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
14945: fa_debug_pkg.add(l_calling_fn, '++ Depreciation started from YEAR : PERIOD ', l_dpr_in.y_begin ||' : '|| l_dpr_in.p_cl_begin, p_log_level_rec => p_log_level_rec);
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14952: fa_debug_pkg.add(l_calling_fn, '++ AFTER: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
14953: end if;
14946: fa_debug_pkg.add(l_calling_fn, '++ Depreciation ended at YEAR : PERIOD ', l_dpr_in.y_end ||' : '|| l_dpr_in.p_cl_end, p_log_level_rec => p_log_level_rec);
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14952: fa_debug_pkg.add(l_calling_fn, '++ AFTER: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
14953: end if;
14954:
14947: fa_debug_pkg.add(l_calling_fn, '++ l_dpr_out.new_adj_cost', l_dpr_out.new_adj_cost, p_log_level_rec => p_log_level_rec);
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14952: fa_debug_pkg.add(l_calling_fn, '++ AFTER: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
14953: end if;
14954:
14955:
14948: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_ytd_deprn', l_dpr_out.new_ytd_deprn, p_log_level_rec => p_log_level_rec);
14949: fa_debug_pkg.add(l_calling_fn, 'l_dpr_out.new_deprn_rsv', l_dpr_out.new_deprn_rsv, p_log_level_rec => p_log_level_rec);
14950: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost , p_log_level_rec => p_log_level_rec);
14951: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_recoverable_cost',l_asset_fin_rec_new.adjusted_recoverable_cost , p_log_level_rec => p_log_level_rec);
14952: fa_debug_pkg.add(l_calling_fn, '++ AFTER: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
14953: end if;
14954:
14955:
14956: -- manual override
15020: if not FA_TRACK_MEMBER_PVT.member_eofy_rsv(p_asset_hdr_rec => p_asset_hdr_rec,
15021: p_dpr_in => l_dpr_in,
15022: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
15023: if (p_log_level_rec.statement_level) then
15024: fa_debug_pkg.add(l_calling_fn, 'Error calling',
15025: 'FA_TRACK_MEMBER_PVT.member_eofy_rsv', p_log_level_rec => p_log_level_rec);
15026: end if;
15027:
15028: raise calc_failed;
15032: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
15033:
15034: elsif (l_energy_member) then
15035: if (p_log_level_rec.statement_level) then
15036: fa_debug_pkg.add(l_calling_fn, 'This is energy member ',
15037: 'No member level deprn calculation', p_log_level_rec => p_log_level_rec);
15038: end if;
15039:
15040:
15040:
15041:
15042: else
15043: if (p_log_level_rec.statement_level) then
15044: fa_debug_pkg.add(l_calling_fn, 'There is another transactions to process this period',
15045: 'or this is current period', p_log_level_rec => p_log_level_rec);
15046: end if;
15047:
15048: end if; -- (l_next_trx_period_counter is null or
15056: l_process_this_trx := TRUE;
15057:
15058:
15059: if (p_log_level_rec.statement_level) then
15060: fa_debug_pkg.add(l_calling_fn, '++ calc_catchup: p_trans_rec.transaction_type_code', p_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
15061: end if;
15062:
15063: -- Bug 5726160
15064: if p_running_mode = fa_std_types.FA_DPR_CATCHUP then
15071: l_catchup_begin_deprn_rec.bonus_deprn_reserve := l_asset_deprn_rec.bonus_deprn_reserve;
15072: l_catchup_begin_deprn_rec.impairment_reserve := l_asset_deprn_rec.impairment_reserve;
15073:
15074: if (p_log_level_rec.statement_level) then
15075: fa_debug_pkg.add(' '||l_calling_fn, 'SETTING l_catchup_begin_deprn_rec.deprn_reserve (+ +)', l_catchup_begin_deprn_rec.deprn_reserve);
15076: end if;
15077:
15078: end if;
15079:
15079:
15080: elsif p_trans_rec.transaction_type_code like '%RETIREMENT' then
15081:
15082: if (p_log_level_rec.statement_level) then
15083: fa_debug_pkg.add(' '||l_calling_fn, '++ calc_catchup: l_trans_rec.transaction_type_code 1...', l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
15084: fa_debug_pkg.add(' '||l_calling_fn, '++ calc_catchup: l_entered_reserve 1...', l_entered_reserve, p_log_level_rec => p_log_level_rec);
15085: end if;
15086:
15087: if l_trans_rec.transaction_type_code = 'ADDITION' and l_entered_reserve <> 0 then
15080: elsif p_trans_rec.transaction_type_code like '%RETIREMENT' then
15081:
15082: if (p_log_level_rec.statement_level) then
15083: fa_debug_pkg.add(' '||l_calling_fn, '++ calc_catchup: l_trans_rec.transaction_type_code 1...', l_trans_rec.transaction_type_code, p_log_level_rec => p_log_level_rec);
15084: fa_debug_pkg.add(' '||l_calling_fn, '++ calc_catchup: l_entered_reserve 1...', l_entered_reserve, p_log_level_rec => p_log_level_rec);
15085: end if;
15086:
15087: if l_trans_rec.transaction_type_code = 'ADDITION' and l_entered_reserve <> 0 then
15088:
15101:
15102: l_asset_deprn_rec.deprn_reserve := l_temp_reserve;
15103:
15104: if (p_log_level_rec.statement_level) then
15105: fa_debug_pkg.add(' '||l_calling_fn, '++ RESETTING l_asset_deprn_rec.deprn_reserve (+ +) ...', l_asset_deprn_rec.deprn_reserve);
15106: end if;
15107:
15108: end if;
15109:
15111:
15112: end if;
15113:
15114: if (p_log_level_rec.statement_level) then
15115: fa_debug_pkg.add(' '||l_calling_fn, 'ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
15116: fa_debug_pkg.add(' '||l_calling_fn, 'deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
15117: fa_debug_pkg.add(l_calling_fn, '++ AFTER 2: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
15118: end if;
15119:
15112: end if;
15113:
15114: if (p_log_level_rec.statement_level) then
15115: fa_debug_pkg.add(' '||l_calling_fn, 'ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
15116: fa_debug_pkg.add(' '||l_calling_fn, 'deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
15117: fa_debug_pkg.add(l_calling_fn, '++ AFTER 2: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
15118: end if;
15119:
15120: END LOOP; -- FOR i IN 1..t_transaction_header_id.COUNT LOOP
15113:
15114: if (p_log_level_rec.statement_level) then
15115: fa_debug_pkg.add(' '||l_calling_fn, 'ytd_deprn', l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
15116: fa_debug_pkg.add(' '||l_calling_fn, 'deprn_reserve', l_asset_deprn_rec.deprn_reserve, p_log_level_rec => p_log_level_rec);
15117: fa_debug_pkg.add(l_calling_fn, '++ AFTER 2: l_asset_deprn_rec.deprn_reserve (+ +)', l_asset_deprn_rec.deprn_reserve);
15118: end if;
15119:
15120: END LOOP; -- FOR i IN 1..t_transaction_header_id.COUNT LOOP
15121:
15125:
15126: CLOSE c_get_ths_adj;
15127:
15128: if (p_log_level_rec.statement_level) then
15129: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 9 : End of c_get_ths_adj LOOP ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15130: end if;
15131:
15132: if (p_log_level_rec.statement_level) then
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15129: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 9 : End of c_get_ths_adj LOOP ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15130: end if;
15131:
15132: if (p_log_level_rec.statement_level) then
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15130: end if;
15131:
15132: if (p_log_level_rec.statement_level) then
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15131:
15132: if (p_log_level_rec.statement_level) then
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15139: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit',l_asset_fin_rec_new.prior_deprn_limit, p_log_level_rec => p_log_level_rec);
15132: if (p_log_level_rec.statement_level) then
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15139: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit',l_asset_fin_rec_new.prior_deprn_limit, p_log_level_rec => p_log_level_rec);
15140: end if;
15133: fa_debug_pkg.add(l_calling_fn, '+++++++++++ Recalc Step 9 : BEFORE calling CALL_DEPRN_BASIS ++++++++++','', p_log_level_rec => p_log_level_rec);
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15139: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit',l_asset_fin_rec_new.prior_deprn_limit, p_log_level_rec => p_log_level_rec);
15140: end if;
15141:
15134: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15139: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit',l_asset_fin_rec_new.prior_deprn_limit, p_log_level_rec => p_log_level_rec);
15140: end if;
15141:
15142: -- Bug 9804275
15135: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15136: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15137: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15138: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit_amount',l_asset_fin_rec_new.prior_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
15139: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.prior_deprn_limit',l_asset_fin_rec_new.prior_deprn_limit, p_log_level_rec => p_log_level_rec);
15140: end if;
15141:
15142: -- Bug 9804275
15143: -- Basis reset not needed if FORMULA/NBV/Basis rule is used
15180: px_new_raf => l_asset_fin_rec_new.rate_adjustment_factor,
15181: px_new_formula_factor => l_asset_fin_rec_new.formula_factor,
15182: p_log_level_rec => p_log_level_rec)) then
15183: if (p_log_level_rec.statement_level) then
15184: fa_debug_pkg.add(l_calling_fn, 'Error calling',
15185: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS', p_log_level_rec => p_log_level_rec);
15186: end if;
15187: raise calc_failed;
15188: end if; -- fix for Bug 9804275
15188: end if; -- fix for Bug 9804275
15189: end if; -- (not FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS
15190:
15191: if (p_log_level_rec.statement_level) then
15192: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 10 : AFTER calling CALL_DEPRN_BASIS ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15193: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15194: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15195: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15189: end if; -- (not FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS
15190:
15191: if (p_log_level_rec.statement_level) then
15192: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 10 : AFTER calling CALL_DEPRN_BASIS ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15193: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15194: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15195: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15197: end if;
15190:
15191: if (p_log_level_rec.statement_level) then
15192: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 10 : AFTER calling CALL_DEPRN_BASIS ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15193: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15194: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15195: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15197: end if;
15198:
15191: if (p_log_level_rec.statement_level) then
15192: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 10 : AFTER calling CALL_DEPRN_BASIS ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15193: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15194: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15195: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15197: end if;
15198:
15199: if (p_log_level_rec.statement_level) then
15192: fa_debug_pkg.add(l_calling_fn, '++ Recalc Step 10 : AFTER calling CALL_DEPRN_BASIS ------------------------------------------------','', p_log_level_rec => p_log_level_rec);
15193: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.cost',l_asset_fin_rec_new.cost, p_log_level_rec => p_log_level_rec);
15194: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.adjusted_cost',l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15195: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.rate_adjustment_factor',l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15197: end if;
15198:
15199: if (p_log_level_rec.statement_level) then
15200: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
15196: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.formula_factor',l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15197: end if;
15198:
15199: if (p_log_level_rec.statement_level) then
15200: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
15201: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
15202: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
15203: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15204: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
15198:
15199: if (p_log_level_rec.statement_level) then
15200: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
15201: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
15202: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
15203: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15204: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
15205: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15206: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
15200: fa_debug_pkg.add(l_calling_fn, 'Returned values from ',
15201: 'FA_CALC_DEPRN_BASIS1_PKG.CALL_DEPRN_BASIS AMORT_ADJ3', p_log_level_rec => p_log_level_rec);
15202: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
15203: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15204: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
15205: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15206: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
15207: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15208: end if;
15202: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.adjusted_cost',
15203: l_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
15204: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.rate_adjustment_factor',
15205: l_asset_fin_rec_new.rate_adjustment_factor, p_log_level_rec => p_log_level_rec);
15206: fa_debug_pkg.add(l_calling_fn, 'l_asset_fin_rec_new.formula_factor',
15207: l_asset_fin_rec_new.formula_factor, p_log_level_rec => p_log_level_rec);
15208: end if;
15209:
15210: px_asset_fin_rec_new.cost := l_asset_fin_rec_new.cost;
15307: x_impairment_expense := nvl(l_asset_deprn_rec.ytd_impairment, 0) -
15308: nvl(p_asset_deprn_rec.ytd_impairment, 0) -
15309: nvl(p_asset_deprn_rec_adj.ytd_impairment, 0);
15310: if (p_log_level_rec.statement_level) then
15311: fa_debug_pkg.add(l_calling_fn, '++ Bug8398064: x_deprn_expense (back out expense) ', x_deprn_expense,p_log_level_rec => p_log_level_rec);
15312: end if;
15313: --Bug 8398064:End
15314: elsif (p_trans_rec.transaction_type_code = 'REINSTATEMENT') then
15315: -- Bug 5726160
15341: nvl(p_asset_deprn_rec_adj.impairment_reserve, 0);
15342: end if;
15343:
15344: if (p_log_level_rec.statement_level) then
15345: fa_debug_pkg.add(l_calling_fn, '++++ Recalc Step 11 : Set x_deprn_expense ','...', p_log_level_rec => p_log_level_rec);
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15342: end if;
15343:
15344: if (p_log_level_rec.statement_level) then
15345: fa_debug_pkg.add(l_calling_fn, '++++ Recalc Step 11 : Set x_deprn_expense ','...', p_log_level_rec => p_log_level_rec);
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15343:
15344: if (p_log_level_rec.statement_level) then
15345: fa_debug_pkg.add(l_calling_fn, '++++ Recalc Step 11 : Set x_deprn_expense ','...', p_log_level_rec => p_log_level_rec);
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15351: fa_debug_pkg.add(l_calling_fn, '++ ++ x_deprn_expense (INPUT-NEW=OUTPUT)', x_deprn_expense);
15344: if (p_log_level_rec.statement_level) then
15345: fa_debug_pkg.add(l_calling_fn, '++++ Recalc Step 11 : Set x_deprn_expense ','...', p_log_level_rec => p_log_level_rec);
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15351: fa_debug_pkg.add(l_calling_fn, '++ ++ x_deprn_expense (INPUT-NEW=OUTPUT)', x_deprn_expense);
15352: end if;
15345: fa_debug_pkg.add(l_calling_fn, '++++ Recalc Step 11 : Set x_deprn_expense ','...', p_log_level_rec => p_log_level_rec);
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15351: fa_debug_pkg.add(l_calling_fn, '++ ++ x_deprn_expense (INPUT-NEW=OUTPUT)', x_deprn_expense);
15352: end if;
15353:
15346: fa_debug_pkg.add(l_calling_fn, '++ p_asset_fin_rec_old.period_counter_fully_reserved', p_asset_fin_rec_old.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15351: fa_debug_pkg.add(l_calling_fn, '++ ++ x_deprn_expense (INPUT-NEW=OUTPUT)', x_deprn_expense);
15352: end if;
15353:
15354: --+++++++++ Call member level maintenance for tracking +++++++
15347: fa_debug_pkg.add(l_calling_fn, '++ l_asset_fin_rec_new.period_counter_fully_reserved', l_asset_fin_rec_new.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
15348: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec.deprn_reserve (INPUT)', p_asset_deprn_rec.deprn_reserve);
15349: fa_debug_pkg.add(l_calling_fn, '++ ++ p_asset_deprn_rec_adj.deprn_reserve (INPUT)', p_asset_deprn_rec_adj.deprn_reserve);
15350: fa_debug_pkg.add(l_calling_fn, '++ ++ l_asset_deprn_rec.deprn_reserve (NEW)', l_asset_deprn_rec.deprn_reserve);
15351: fa_debug_pkg.add(l_calling_fn, '++ ++ x_deprn_expense (INPUT-NEW=OUTPUT)', x_deprn_expense);
15352: end if;
15353:
15354: --+++++++++ Call member level maintenance for tracking +++++++
15355: if nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE' then
15358: p_asset_hdr_rec => p_asset_hdr_rec,
15359: p_dpr_in => l_dpr_in,
15360: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
15361: if (p_log_level_rec.statement_level) then
15362: fa_debug_pkg.add(l_calling_fn, 'Error calling',
15363: 'FA_TRACK_MEMBER_PVT.update_member_books', p_log_level_rec => p_log_level_rec);
15364: end if;
15365:
15366: raise calc_failed;
15368:
15369: fa_track_member_pvt.p_track_member_eofy_table.delete;
15370:
15371: if (p_log_level_rec.statement_level) then
15372: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.p_track_member_eofy_table',
15373: 'deleted', p_log_level_rec => p_log_level_rec);
15374: end if;
15375:
15376: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
15375:
15376: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
15377:
15378: if (p_log_level_rec.statement_level) then
15379: fa_debug_pkg.add(l_calling_fn, 'End',
15380: x_deprn_expense||':'||x_bonus_expense, p_log_level_rec => p_log_level_rec);
15381: end if;
15382:
15383: return true;
15384:
15385: EXCEPTION
15386: WHEN invalid_trx_to_overlap THEN
15387: if (p_log_level_rec.statement_level) then
15388: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'invalid_trx_to_overlap', p_log_level_rec => p_log_level_rec);
15389: end if;
15390:
15391: if c_get_ths_adj%ISOPEN then
15392: CLOSE c_get_ths_adj;
15396: name => 'FA_INVALID_TRX_TO_OVERLAP', p_log_level_rec => p_log_level_rec);
15397: return false;
15398: WHEN calc_failed THEN
15399: if (p_log_level_rec.statement_level) then
15400: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'calc_failed', p_log_level_rec => p_log_level_rec);
15401: end if;
15402:
15403: if c_get_ths_adj%ISOPEN then
15404: CLOSE c_get_ths_adj;
15413: return false;
15414:
15415: WHEN OTHERS THEN
15416: if (p_log_level_rec.statement_level) then
15417: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
15418: end if;
15419:
15420: if c_check_overlap%ISOPEN then
15421: CLOSE c_check_overlap;
15493: --tk_util.debug('-');
15494: --tk_util.debug('-');
15495: --tk_util.debug('-+++++-');
15496: if (p_log_level_rec.statement_level) then
15497: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
15498: end if;
15499:
15500:
15501: -- err:=DBMS_PROFILER.START_PROFILER ('faxama:'||to_char(sysdate,'dd-Mon-YYYY hh:mi:ss'));
15505: X_impairment_exp := 0;
15506:
15507: if (p_asset_type_rec.asset_type='CIP') then
15508: if (p_log_level_rec.statement_level) then
15509: fa_debug_pkg.add(l_calling_fn, 'Nothing to calculate with CIP asset',' ', p_log_level_rec => p_log_level_rec);
15510: fa_debug_pkg.add(l_calling_fn, 'Exiting faxama immediately',
15511: p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
15512: end if;
15513: return true;
15506:
15507: if (p_asset_type_rec.asset_type='CIP') then
15508: if (p_log_level_rec.statement_level) then
15509: fa_debug_pkg.add(l_calling_fn, 'Nothing to calculate with CIP asset',' ', p_log_level_rec => p_log_level_rec);
15510: fa_debug_pkg.add(l_calling_fn, 'Exiting faxama immediately',
15511: p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
15512: end if;
15513: return true;
15514:
15520: --return FALSE;
15521: end if;
15522:
15523: if (p_log_level_rec.statement_level) then
15524: FA_DEBUG_PKG.ADD
15525: (fname => 'FA_AMORT_PKG.faxama',
15526: element => 'First asset_type',
15527: value => p_asset_type_rec.asset_type, p_log_level_rec => p_log_level_rec);
15528: end if;
15568: if (nvl(p_asset_fin_rec_old.tracking_method, 'NO TRACK') = 'ALLOCATE') and -- ENERGY
15569: (fa_cache_pkg.fazcdrd_record.rule_name = 'ENERGY PERIOD END BALANCE') and -- ENERGY
15570: (px_trans_rec.transaction_type_code = 'REINSTATEMENT') then -- ENERGY
15571: if (p_log_level_rec.statement_level) then
15572: fa_debug_pkg.add(l_calling_fn, 'calling function ',
15573: 'FA_AMORT_PVT.calc_raf_adj_cost', p_log_level_rec => p_log_level_rec);
15574: end if;
15575:
15576: l_asset_deprn_rec_new := p_asset_deprn_rec;
15643: end if;
15644: --tk_util.DumpFinRec(px_asset_fin_rec_new, 'Nfaxama');
15645:
15646: if (p_log_level_rec.statement_level) then
15647: fa_debug_pkg.add(l_calling_fn, 'End', p_asset_type_rec.asset_type||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
15648: end if;
15649: --tk_util.debug('-+++++-');
15650: --tk_util.debug('-');
15651: --tk_util.debug('-');
15668:
15669: exception
15670: when calc_err then
15671: if (p_log_level_rec.statement_level) then
15672: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'calc_err', p_log_level_rec => p_log_level_rec);
15673: end if;
15674:
15675: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => l_calling_fn, p_log_level_rec => p_log_level_rec);
15676: return false;
15676: return false;
15677:
15678: when others then
15679: if (p_log_level_rec.statement_level) then
15680: fa_debug_pkg.add(l_calling_fn, 'EXCEPTION', 'others: '||sqlerrm, p_log_level_rec => p_log_level_rec);
15681: end if;
15682:
15683: FA_SRVR_MSG.ADD_SQL_ERROR(CALLING_FN => l_calling_fn, p_log_level_rec => p_log_level_rec);
15684: return FALSE;
16036: end if;
16037: -- End of Manual Override
16038:
16039: if (p_log_level_rec.statement_level) then
16040: FA_DEBUG_PKG.ADD
16041: (fname => 'FA_AMORT_PKG.faxraf',
16042: element => 'method code',
16043: value => px_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
16044: FA_DEBUG_PKG.ADD
16040: FA_DEBUG_PKG.ADD
16041: (fname => 'FA_AMORT_PKG.faxraf',
16042: element => 'method code',
16043: value => px_asset_fin_rec_new.deprn_method_code, p_log_level_rec => p_log_level_rec);
16044: FA_DEBUG_PKG.ADD
16045: (fname => 'FA_AMORT_PKG.faxraf',
16046: element => 'life',
16047: value => px_asset_fin_rec_new.life_in_months, p_log_level_rec => p_log_level_rec);
16048: end if;
16070: l_deprn_last_year_flag := FALSE;
16071: end if;
16072:
16073: if (p_log_level_rec.statement_level) then
16074: FA_DEBUG_PKG.ADD
16075: (fname => 'FA_AMORT_PKG.faxraf',
16076: element => 'After fazccmt',
16077: value => 2, p_log_level_rec => p_log_level_rec);
16078: end if;
16079:
16080: l_err_string := 'FA_AMT_BD_DPR_STRUCT';
16081:
16082: if (p_log_level_rec.statement_level)then
16083: FA_DEBUG_PKG.ADD
16084: (fname =>' FA_AMORT_PKG.faxraf',
16085: element => 'deprn_rounding_flag- before faxbds',
16086: value => px_asset_fin_rec_new.annual_deprn_rounding_flag, p_log_level_rec => p_log_level_rec);
16087: FA_DEBUG_PKG.ADD
16083: FA_DEBUG_PKG.ADD
16084: (fname =>' FA_AMORT_PKG.faxraf',
16085: element => 'deprn_rounding_flag- before faxbds',
16086: value => px_asset_fin_rec_new.annual_deprn_rounding_flag, p_log_level_rec => p_log_level_rec);
16087: FA_DEBUG_PKG.ADD
16088: (fname => 'FA_AMORT_PKG.faxraf',
16089: element => 'FA_STD TYPE deprn_rnd- before faxbds',
16090: value => FA_STD_TYPES.FA_DPR_ROUND_ADJ, p_log_level_rec => p_log_level_rec);
16091: end if;
16113: l_dpr_row.deprn_override_flag := fa_std_types.FA_NO_OVERRIDE;
16114:
16115: -- l_err_string := 'FA_AMT_CAL_DP_EXP';
16116: if (p_log_level_rec.statement_level) then
16117: FA_DEBUG_PKG.ADD
16118: (fname => 'FA_AMORT_PKG.faxraf',
16119: element => 'Before faxcde',
16120: value => 3, p_log_level_rec => p_log_level_rec);
16121: FA_DEBUG_PKG.ADD
16117: FA_DEBUG_PKG.ADD
16118: (fname => 'FA_AMORT_PKG.faxraf',
16119: element => 'Before faxcde',
16120: value => 3, p_log_level_rec => p_log_level_rec);
16121: FA_DEBUG_PKG.ADD
16122: (fname => 'FA_AMORT_PKG.faxraf',
16123: element => 'l_dpr_row.deprn_rounding_flag ',
16124: value => l_dpr_row.deprn_rounding_flag, p_log_level_rec => p_log_level_rec);
16125: end if;
16218: l_dpr_row.mrc_sob_type_code := p_mrc_sob_type_code;
16219: l_dpr_row.set_of_books_id := p_asset_hdr_rec.set_of_books_id;
16220:
16221: if (p_log_level_rec.statement_level) then
16222: FA_DEBUG_PKG.ADD(fname => 'FA_AMORT_PKG.faxraf',
16223: element => 'Before call to faxcde regular case',
16224: value => l_dpr_row.bonus_rule, p_log_level_rec => p_log_level_rec);
16225: end if;
16226:
16232: FA_SRVR_MSG.ADD_MESSAGE
16233: (CALLING_FN => 'FA_AMORT_PKG.faxraf',
16234: NAME=>'FA_AMT_CAL_DP_EXP', p_log_level_rec => p_log_level_rec);
16235: if (p_log_level_rec.statement_level) then
16236: FA_DEBUG_PKG.ADD
16237: (fname => 'FA_AMORT_PKG.faxraf',
16238: element => 'After faxcde',
16239: value => 'False', p_log_level_rec => p_log_level_rec);
16240: FA_DEBUG_PKG.ADD
16236: FA_DEBUG_PKG.ADD
16237: (fname => 'FA_AMORT_PKG.faxraf',
16238: element => 'After faxcde',
16239: value => 'False', p_log_level_rec => p_log_level_rec);
16240: FA_DEBUG_PKG.ADD
16241: (fname => 'FA_AMORT_PKG.faxraf',
16242: element => 'l_dpr_out.rate_adj_factor',
16243: value => l_dpr_row.rate_adj_factor, p_log_level_rec => p_log_level_rec);
16244: FA_DEBUG_PKG.ADD
16240: FA_DEBUG_PKG.ADD
16241: (fname => 'FA_AMORT_PKG.faxraf',
16242: element => 'l_dpr_out.rate_adj_factor',
16243: value => l_dpr_row.rate_adj_factor, p_log_level_rec => p_log_level_rec);
16244: FA_DEBUG_PKG.ADD
16245: (fname => 'FA_AMORT_PKG.faxraf',
16246: element => 'l_dpr_out.adj_capacity',
16247: value => l_dpr_row.adj_capacity, p_log_level_rec => p_log_level_rec);
16248: FA_DEBUG_PKG.ADD
16244: FA_DEBUG_PKG.ADD
16245: (fname => 'FA_AMORT_PKG.faxraf',
16246: element => 'l_dpr_out.adj_capacity',
16247: value => l_dpr_row.adj_capacity, p_log_level_rec => p_log_level_rec);
16248: FA_DEBUG_PKG.ADD
16249: (fname => 'FA_AMORT_PKG.faxraf',
16250: element => 'l_dpr_out.capacity',
16251: value => l_dpr_row.capacity, p_log_level_rec => p_log_level_rec);
16252: end if;
16257: fa_std_types.deprn_override_trigger_enabled:= FALSE;
16258: if l_use_override then -- pass deprn_override_flag to faxiat
16259: px_trans_rec.deprn_override_flag:= l_dpr_out.deprn_override_flag;
16260: if (p_log_level_rec.statement_level) then
16261: FA_DEBUG_PKG.ADD(fname=>'FA_AMORT_PKG.faxraf',
16262: element=>'deprn_override_flag1',
16263: value=>l_dpr_out.deprn_override_flag, p_log_level_rec => p_log_level_rec);
16264: end if;
16265: else
16631: end if;
16632:
16633: -- Override
16634: if (p_log_level_rec.statement_level) then
16635: FA_DEBUG_PKG.ADD
16636: (fname => 'FA_AMORT_PKG.faxraf',
16637: element => 'deprn_override_flag2',
16638: value => l_dpr_out.deprn_override_flag, p_log_level_rec => p_log_level_rec);
16639: end if;
16696: l_deprn_summary.bonus_deprn_rsv) -
16697: ( (l_dpr_row.bonus_deprn_rsv * 2) - l_deprn_summary.bonus_deprn_rsv);
16698:
16699: if (p_log_level_rec.statement_level) then
16700: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16701: element=>'px_bonus_deprn_exp ',
16702: value=>px_bonus_deprn_exp, p_log_level_rec => p_log_level_rec);
16703: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16704: element=>'l_dpr_out.new_bonus_deprn_rsv ',
16699: if (p_log_level_rec.statement_level) then
16700: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16701: element=>'px_bonus_deprn_exp ',
16702: value=>px_bonus_deprn_exp, p_log_level_rec => p_log_level_rec);
16703: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16704: element=>'l_dpr_out.new_bonus_deprn_rsv ',
16705: value=>l_dpr_out.new_bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16706: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16707: element=>'l_dpr_row.bonus_deprn_rsv',
16702: value=>px_bonus_deprn_exp, p_log_level_rec => p_log_level_rec);
16703: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16704: element=>'l_dpr_out.new_bonus_deprn_rsv ',
16705: value=>l_dpr_out.new_bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16706: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16707: element=>'l_dpr_row.bonus_deprn_rsv',
16708: value=>l_dpr_row.bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16709: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16710: element=>'l_dpr_row.bonus_deprn_rsv',
16705: value=>l_dpr_out.new_bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16706: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16707: element=>'l_dpr_row.bonus_deprn_rsv',
16708: value=>l_dpr_row.bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16709: FA_DEBUG_PKG.ADD (fname=>'FA_AMORT_PKG.faxraf',
16710: element=>'l_dpr_row.bonus_deprn_rsv',
16711: value=>l_deprn_summary.bonus_deprn_rsv, p_log_level_rec => p_log_level_rec);
16712: end if;
16713: end if;
16840:
16841: BEGIN
16842:
16843: if (p_log_level_rec.statement_level) then
16844: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
16845: end if;
16846:
16847: -- Skipping call to the function because it is not necessary for straight line
16848: -- or flat-cost with period end balance and use recoverable cost basis rules
16865: x_eofy_salvage_value => l_eofy_sal_val,
16866: x_eop_recoverable_cost => l_eop_rec_cost,
16867: x_eop_salvage_value => l_eop_sal_val, p_log_level_rec => p_log_level_rec)) then
16868: if (p_log_level_rec.statement_level) then
16869: fa_debug_pkg.add(l_calling_fn, 'Error calling',
16870: 'FA_CALC_DEPRN_BASIS1_PKG.GET_EOFY_EOP', p_log_level_rec => p_log_level_rec);
16871: end if;
16872:
16873: raise calc_err;
16966: l_temp_number,
16967: l_dpr_in.y_begin,
16968: l_temp_integer, p_log_level_rec => p_log_level_rec) then
16969: if (p_log_level_rec.statement_level) then
16970: fa_debug_pkg.add(l_calling_fn, 'Error calling',
16971: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
16972: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
16973: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
16974: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
16968: l_temp_integer, p_log_level_rec => p_log_level_rec) then
16969: if (p_log_level_rec.statement_level) then
16970: fa_debug_pkg.add(l_calling_fn, 'Error calling',
16971: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
16972: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
16973: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
16974: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
16975: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
16976: end if;
16970: fa_debug_pkg.add(l_calling_fn, 'Error calling',
16971: 'fa_cache_pkg.fazccp', p_log_level_rec => p_log_level_rec);
16972: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.prorate_calendar',
16973: fa_cache_pkg.fazcbc_record.prorate_calendar, p_log_level_rec => p_log_level_rec);
16974: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcbc_record.fiscal_year_name',
16975: fa_cache_pkg.fazcbc_record.fiscal_year_name, p_log_level_rec => p_log_level_rec);
16976: end if;
16977:
16978: raise calc_err;
16996: if (not fa_cache_pkg.fazccmt(
16997: px_asset_fin_rec_new.deprn_method_code,
16998: px_asset_fin_rec_new.life_in_months, p_log_level_rec => p_log_level_rec)) then
16999: if (p_log_level_rec.statement_level) then
17000: fa_debug_pkg.add(l_calling_fn, 'Error calling',
17001: 'fa_cache_pkg.fazccmt', p_log_level_rec => p_log_level_rec);
17002: end if;
17003:
17004: raise calc_err;
17040: p_asset_fin_rec => px_asset_fin_rec_new,
17041: p_dpr_in => l_dpr_in,
17042: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
17043: if (p_log_level_rec.statement_level) then
17044: fa_debug_pkg.add(l_calling_fn, 'Error calling', 'FA_TRACK_MEMBER_PVT.get_member_at_start', p_log_level_rec => p_log_level_rec);
17045: end if;
17046:
17047: raise calc_failed;
17048:
17056: l_dpr_arr,
17057: l_dpr_out,
17058: l_running_mode, p_log_level_rec => p_log_level_rec) then
17059: if (p_log_level_rec.statement_level) then
17060: fa_debug_pkg.add(l_calling_fn, 'Error calling',
17061: 'FA_CDE_PKG.faxcde', p_log_level_rec => p_log_level_rec);
17062: end if;
17063:
17064: raise calc_err;
17162: if nvl(l_dpr_in.tracking_method,'OTHER') = 'ALLOCATE' then
17163: fa_track_member_pvt.p_track_member_table.delete;
17164: fa_track_member_pvt.p_track_mem_index_table.delete;
17165: if (p_log_level_rec.statement_level) then
17166: fa_debug_pkg.add(l_calling_fn, 'Delete p_track_member_table', '+++', p_log_level_rec => p_log_level_rec);
17167: end if;
17168: end if;
17169:
17170: --Bug6988399 Added the code to populate the eofy reserve if the asset has become non fully reserved after
17228: end if;
17229: /*Bug# 10106735 */
17230: if px_asset_fin_rec_new.rate_adjustment_factor = 0 then
17231: if (p_log_level_rec.statement_level) then
17232: fa_debug_pkg.add(l_calling_fn, 'After CALL_DEPRN_BASIS', 'New RAF is zero setting value of old RAF', p_log_level_rec => p_log_level_rec);
17233: end if;
17234: px_asset_fin_rec_new.rate_adjustment_factor := p_asset_fin_rec_old.rate_adjustment_factor;
17235: end if;
17236: --Bug6736655
17251: p_calling_fn => l_calling_fn,
17252: p_log_level_rec => p_log_level_rec) then
17253:
17254: if (p_log_level_rec.statement_level) then
17255: fa_debug_pkg.add(l_calling_fn, 'calling FA_AMORT_PVT.createGroup', 'FAILED', p_log_level_rec => p_log_level_rec);
17256: end if;
17257:
17258: return (FALSE);
17259:
17269: p_asset_hdr_rec => p_asset_hdr_rec,
17270: p_dpr_in => l_dpr_in,
17271: p_mrc_sob_type_code => p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec) then
17272: if (p_log_level_rec.statement_level) then
17273: fa_debug_pkg.add(l_calling_fn, 'Error calling',
17274: 'FA_TRACK_MEMBER_PVT.update_member_books', p_log_level_rec => p_log_level_rec);
17275: end if;
17276:
17277: raise calc_err;
17277: raise calc_err;
17278: end if;
17279:
17280: if (p_log_level_rec.statement_level) then
17281: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.create_update_bs_table',
17282: 'called', p_log_level_rec => p_log_level_rec);
17283: end if;
17284:
17285: if not FA_TRACK_MEMBER_PVT.create_update_bs_table(p_trans_rec => p_trans_rec,
17288: p_mrc_sob_type_code => p_mrc_sob_type_code, --Bug 8941132
17289: p_sob_id => p_asset_hdr_rec.set_of_books_id, --Bug 8941132
17290: p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
17291: if (p_log_level_rec.statement_level) then
17292: fa_debug_pkg.add(l_calling_fn, 'Error calling',
17293: 'FA_TRACK_MEMBER_PVT.create_update_bs_table', p_log_level_rec => p_log_level_rec);
17294: end if;
17295:
17296: raise calc_err;
17300: fa_track_member_pvt.p_track_member_table.delete;
17301: fa_track_member_pvt.p_track_mem_index_table.delete;
17302:
17303: if (p_log_level_rec.statement_level) then
17304: fa_debug_pkg.add(l_calling_fn, 'fa_track_member_pvt.p_track_member_eofy_table/member_table',
17305: 'deleted', p_log_level_rec => p_log_level_rec);
17306: end if;
17307:
17308: end if; -- nvl(px_asset_fin_rec_new.tracking_method,'OTHER') = 'ALLOCATE'
17364:
17365: end if; -- (p_asset_type_rec.asset_type = 'GROUP')
17366:
17367: if (p_log_level_rec.statement_level) then
17368: fa_debug_pkg.add(l_calling_fn, 'End', px_asset_fin_rec_new.adjusted_cost, p_log_level_rec => p_log_level_rec);
17369: end if;
17370:
17371: return true;
17372:
17420: ;
17421: chk_err exception;
17422: BEGIN
17423: if (p_log_level_rec.statement_level) then
17424: fa_debug_pkg.add(l_calling_fn, 'Begin', p_transaction_header_id, p_log_level_rec => p_log_level_rec);
17425: end if;
17426:
17427: OPEN c_check_dpis_change;
17428: FETCH c_check_dpis_change into x_asset_fin_rec.cost
17433:
17434: CLOSE c_check_dpis_change;
17435:
17436: if (p_log_level_rec.statement_level) then
17437: fa_debug_pkg.add(l_calling_fn, 'x_period_counter_out', x_period_counter_out, p_log_level_rec => p_log_level_rec);
17438: end if;
17439:
17440:
17441: if (p_log_level_rec.statement_level) then
17438: end if;
17439:
17440:
17441: if (p_log_level_rec.statement_level) then
17442: fa_debug_pkg.add(l_calling_fn, 'x_period_counter_out', x_period_counter_out, p_log_level_rec => p_log_level_rec);
17443: fa_debug_pkg.add(l_calling_fn, 'x_asset_fin_rec.cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17444: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17445: end if;
17446:
17439:
17440:
17441: if (p_log_level_rec.statement_level) then
17442: fa_debug_pkg.add(l_calling_fn, 'x_period_counter_out', x_period_counter_out, p_log_level_rec => p_log_level_rec);
17443: fa_debug_pkg.add(l_calling_fn, 'x_asset_fin_rec.cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17444: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17445: end if;
17446:
17447: return true;
17440:
17441: if (p_log_level_rec.statement_level) then
17442: fa_debug_pkg.add(l_calling_fn, 'x_period_counter_out', x_period_counter_out, p_log_level_rec => p_log_level_rec);
17443: fa_debug_pkg.add(l_calling_fn, 'x_asset_fin_rec.cost', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17444: fa_debug_pkg.add(l_calling_fn, 'End', x_asset_fin_rec.cost, p_log_level_rec => p_log_level_rec);
17445: end if;
17446:
17447: return true;
17448:
17473: l_temp_thid NUMBER;
17474:
17475: BEGIN
17476: if (p_log_level_rec.statement_level) then
17477: fa_debug_pkg.add(l_calling_fn, 'Begin', p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
17478: end if;
17479:
17480: OPEN c_mem_exists;
17481: FETCH c_mem_exists INTO l_temp_thid;
17480: OPEN c_mem_exists;
17481: FETCH c_mem_exists INTO l_temp_thid;
17482:
17483: if (p_log_level_rec.statement_level) then
17484: fa_debug_pkg.add(l_calling_fn, 'Begin', c_mem_exists%notfound);
17485: end if;
17486:
17487: if (c_mem_exists%notfound) then
17488: CLOSE c_mem_exists;
17494:
17495: EXCEPTION
17496: when others then
17497: if (p_log_level_rec.statement_level) then
17498: fa_debug_pkg.add(l_calling_fn, 'Error', sqlerrm, p_log_level_rec => p_log_level_rec);
17499: end if;
17500:
17501: fa_srvr_msg.add_sql_error(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
17502: return false;