[Home] [Help]
1230: , imp.asset_id -- Bug# 7000391
1231: , nvl(books.sorp_enabled_flag, 'N') -- Bug 6666666
1232: , imp.net_selling_price --Bug# 7511258
1233: , imp.value_in_use --Bug# 7511258
1234: from fa_impairments imp
1235: , fa_itf_impairments itf
1236: , fa_book_controls books
1237: where imp.request_id = p_request_id
1238: and imp.book_type_code = p_book_type_code
1357: AND set_of_books_id = p_set_of_books_id;
1358:
1359: CURSOR c_check_imp(c_asset_id number,c_cgu_id number) is
1360: select 'POSTED'
1361: from fa_impairments
1362: where status = 'POSTED'
1363: and ((asset_id = c_asset_id or cash_generating_unit_id = c_cgu_id) or
1364: (asset_id in (select asset_id from fa_books fbs
1365: where fbs.book_type_code = p_book_type_code
1418: --
1419: -- May need to create outer loop to limit records to fetch
1420: --
1421: if (p_log_level_rec.statement_level) then
1422: fa_debug_pkg.add(l_calling_fn,'Fetching', 'from FA_IMPAIRMENTS', p_log_level_rec => p_log_level_rec);
1423: end if;
1424:
1425: if (p_mrc_sob_type_code = 'R') then
1426: OPEN c_mc_get_impairments;
1453: if (p_log_level_rec.statement_level) then
1454: fa_debug_pkg.add(l_calling_fn,'Fecthed impairments', t_impairment_id.count, p_log_level_rec => p_log_level_rec);
1455: fa_debug_pkg.add(l_calling_fn,'fmv', t_fair_market_value(1));
1456: fa_debug_pkg.add(l_calling_fn,'nbv', t_net_book_value(1));
1457: fa_debug_pkg.add(l_calling_fn,'Updating', 'FA_IMPAIRMENTS', p_log_level_rec => p_log_level_rec);
1458: end if;
1459:
1460: if (p_mrc_sob_type_code = 'R') then
1461: FORALL i in 1..t_impairment_id.count
1469: WHERE ROWID = t_rowid(i)
1470: RETURNING IMPAIRMENT_AMOUNT BULK COLLECT INTO t_impairment_amount;
1471: else
1472: FORALL i in 1..t_impairment_id.count
1473: UPDATE FA_IMPAIRMENTS IMP
1474: SET NET_BOOK_VALUE = t_net_book_value(i)
1475: , IMPAIRMENT_AMOUNT = round(decode(nvl(t2_impairment_amount(i), 0), 0,
1476: t_net_book_value(i) - t_fair_market_value(i), t2_impairment_amount(i)),l_precision)
1477: , IMPAIRMENT_DATE = nvl(IMPAIRMENT_DATE, p_transaction_date)
1758: SET NET_BOOK_VALUE = t_net_book_value(i)
1759: WHERE ROWID = t_rowid(i);
1760: else
1761: FORALL i in 1..t_impairment_id.count
1762: UPDATE FA_IMPAIRMENTS IMP
1763: SET NET_BOOK_VALUE = t_net_book_value(i)
1764: WHERE ROWID = t_rowid(i);
1765: end if;
1766: --Bug#8614268