121: and set_of_books_id = p_set_of_books_id;
122:
123: begin <
124: if (p_log_level_rec.statement_level) then
125: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec => p_log_level_rec);
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
122:
123: begin <
124: if (p_log_level_rec.statement_level) then
125: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec => p_log_level_rec);
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
123: begin <
124: if (p_log_level_rec.statement_level) then
125: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec => p_log_level_rec);
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
131: fa_debug_pkg.add(l_calling_fn,'P_excess_allocation_option:P_subtraction_flag',P_excess_allocation_option||':'||P_subtraction_flag, p_log_level_rec => p_log_level_rec);
124: if (p_log_level_rec.statement_level) then
125: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec => p_log_level_rec);
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
131: fa_debug_pkg.add(l_calling_fn,'P_excess_allocation_option:P_subtraction_flag',P_excess_allocation_option||':'||P_subtraction_flag, p_log_level_rec => p_log_level_rec);
132: end if;
125: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec => p_log_level_rec);
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
131: fa_debug_pkg.add(l_calling_fn,'P_excess_allocation_option:P_subtraction_flag',P_excess_allocation_option||':'||P_subtraction_flag, p_log_level_rec => p_log_level_rec);
132: end if;
133:
126: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec => p_log_level_rec);
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
131: fa_debug_pkg.add(l_calling_fn,'P_excess_allocation_option:P_subtraction_flag',P_excess_allocation_option||':'||P_subtraction_flag, p_log_level_rec => p_log_level_rec);
132: end if;
133:
134: -- Check if Cache Package has been called:
127: fa_debug_pkg.add(l_calling_fn,'P_fiscal_year:P_period_counter:h_period_counter',P_fiscal_year||':'||P_period_counter||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
128: fa_debug_pkg.add(l_calling_fn,'P_group_deprn_amount:P_group_bonus_amount',P_group_deprn_amount||':'||P_group_bonus_amount, p_log_level_rec => p_log_level_rec);
129: fa_debug_pkg.add(l_calling_fn,'P_tracking_method:P_mode:P_mrc_sob_type_code',P_tracking_method||':'||P_mode||':'||P_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
130: fa_debug_pkg.add(l_calling_fn,'P_allocate_to_fully_ret:rsv_flag', P_allocate_to_fully_ret_flag||':'||P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
131: fa_debug_pkg.add(l_calling_fn,'P_excess_allocation_option:P_subtraction_flag',P_excess_allocation_option||':'||P_subtraction_flag, p_log_level_rec => p_log_level_rec);
132: end if;
133:
134: -- Check if Cache Package has been called:
135: if FA_CACHE_PKG.fazcbc_record.set_of_books_id is null then
202:
203: else -- Calculation Type
204: -- Debug
205: if (p_log_level_rec.statement_level) then
206: fa_debug_pkg.add(l_calling_fn,'P_depreciation_option:P_member_rollup_flag',P_depreciation_option||':'||P_member_rollup_flag, p_log_level_rec => p_log_level_rec);
207: end if;
208: /* for now, Calculate Method is handled in Depreciation Engine. in this case, this part will be just skipped. */
209: end if;
210:
945:
946: BEGIN <
947:
948: if (p_log_level_rec.statement_level) then
949: fa_debug_pkg.add(l_calling_fn,'++ ALLOCATE Started ++','+++', p_log_level_rec => p_log_level_rec);
950: end if;
951:
952: -- Set parameters into internal variables
953: h_group_asset_id := P_group_asset_id;
980:
981: h_perds_per_yr := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;
982:
983: if (p_log_level_rec.statement_level) then
984: fa_debug_pkg.add(l_calling_fn, 'h_sob_id:book:period_ctr:cur_period_num:perds_per_fy'
985: , p_set_of_books_id||':'||h_book_type_code||':'||
986: h_period_counter||':'||h_current_period_number||':'||h_perds_per_yr, p_log_level_rec => p_log_level_rec);
987: end if;
988:
994:
995: if (l_group_dbr_name = 'ENERGY PERIOD END BALANCE') then
996:
997: if (p_log_level_rec.statement_level) then
998: fa_debug_pkg.add(l_calling_fn, 'Call',
999: 'fa_query_balances_pkg.query_balances', p_log_level_rec => p_log_level_rec);
1000: end if;
1001:
1002: fa_query_balances_pkg.query_balances(
1034: X_set_of_books_id => p_set_of_books_id,
1035: p_log_level_rec => p_log_level_rec);
1036:
1037: if (p_log_level_rec.statement_level) then
1038: fa_debug_pkg.add(l_calling_fn, 'l_group_reserve',
1039: l_group_reserve, p_log_level_rec => p_log_level_rec);
1040: end if;
1041:
1042: end if; -- (l_group_dbr_name = 'ENERGY PERIOD END BALANCE')
1055: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1056:
1057: if not p_track_member_table.exists(1) then
1058: if (p_log_level_rec.statement_level) then
1059: fa_debug_pkg.add(l_calling_fn, 'populate previous rows', 'call here', p_log_level_rec => p_log_level_rec);
1060: end if;
1061:
1062: if not populate_previous_rows(p_book_type_code => h_book_type_code,
1063: p_group_asset_id => h_group_asset_id,
1074: end if; -- End of preparion for Adjustment mode
1075: end if;
1076:
1077: if (p_log_level_rec.statement_level) then
1078: fa_debug_pkg.add(l_calling_fn, 'Before start to loop for total amounts:p_track_member_table.COUNT',
1079: p_track_member_table.count, p_log_level_rec => p_log_level_rec);
1080: end if;
1081:
1082: -- Get the Allocation Basis
1272: end if;
1273: end if; -- Total allocation basis logic end
1274:
1275: if (p_log_level_rec.statement_level) then
1276: fa_debug_pkg.add(l_calling_fn,'h_total_cost:h_total_adj_cost:h_total_rec_cost',
1277: h_total_cost||':'||h_total_adjusted_cost||':'||h_total_recoverable_cost, p_log_level_rec => p_log_level_rec);
1278: end if;
1279:
1280: --* Calculate allocated amounts for all member assets
1287: h_total_allocation_basis := h_total_adjusted_cost;
1288: end if;
1289:
1290: if (p_log_level_rec.statement_level) then
1291: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec => p_log_level_rec);
1292: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec => p_log_level_rec);
1293: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec => p_log_level_rec);
1294: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec => p_log_level_rec);
1295: end if;
1288: end if;
1289:
1290: if (p_log_level_rec.statement_level) then
1291: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec => p_log_level_rec);
1292: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec => p_log_level_rec);
1293: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec => p_log_level_rec);
1294: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec => p_log_level_rec);
1295: end if;
1296:
1289:
1290: if (p_log_level_rec.statement_level) then
1291: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec => p_log_level_rec);
1292: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec => p_log_level_rec);
1293: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec => p_log_level_rec);
1294: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec => p_log_level_rec);
1295: end if;
1296:
1297: --bug6923135
1290: if (p_log_level_rec.statement_level) then
1291: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec => p_log_level_rec);
1292: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec => p_log_level_rec);
1293: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec => p_log_level_rec);
1294: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec => p_log_level_rec);
1295: end if;
1296:
1297: --bug6923135
1298: -- bypassing following check if the mode is DEPRECIATION so that even allocation basis is zero,
1302: if nvl(h_total_allocation_basis,0) = 0
1303: and nvl(P_mode,'DEPRECIATION') <> 'DEPRECIATION' --bug6923135
1304: then -- Since system cannot calculate the allocation
1305: if (p_log_level_rec.statement_level) then
1306: fa_debug_pkg.add(l_calling_fn,'Since total allocation basis is ZERO','Skip out this function', p_log_level_rec => p_log_level_rec);
1307: end if;
1308:
1309: goto skip_allocate;
1310: end if;
1329:
1330: For i in 1 .. p_track_member_table.COUNT loop
1331:
1332: if (p_log_level_rec.statement_level) then
1333: fa_debug_pkg.add(l_calling_fn,'adjustment-loop started: indicator of this loop', i, p_log_level_rec => p_log_level_rec);
1334: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1335: end if;
1336:
1337: if p_track_member_table(i).group_asset_id = h_group_asset_id and
1330: For i in 1 .. p_track_member_table.COUNT loop
1331:
1332: if (p_log_level_rec.statement_level) then
1333: fa_debug_pkg.add(l_calling_fn,'adjustment-loop started: indicator of this loop', i, p_log_level_rec => p_log_level_rec);
1334: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1335: end if;
1336:
1337: if p_track_member_table(i).group_asset_id = h_group_asset_id and
1338: p_track_member_table(i).period_counter = h_period_counter and
1350: or
1351: (nvl(P_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'Y') then
1352:
1353: if (p_log_level_rec.statement_level) then
1354: fa_debug_pkg.add(l_calling_fn,
1355: 'table('||i||').group_asset_id:period_counter,sob_id,reserved_flag:retired_flag ',
1356: p_track_member_table(i).group_Asset_id||':'||
1357: p_track_member_table(i).period_counter||
1358: ':'|| p_track_member_table(i).set_of_books_id||':'||
1373: h_bonus_ytd_deprn := p_track_member_table(i).bonus_ytd_deprn;
1374: end if;
1375:
1376: if (p_log_level_rec.statement_level) then
1377: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i);
1378: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1379: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1380: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec => p_log_level_rec);
1381: end if;
1374: end if;
1375:
1376: if (p_log_level_rec.statement_level) then
1377: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i);
1378: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1379: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1380: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec => p_log_level_rec);
1381: end if;
1382:
1376: if (p_log_level_rec.statement_level) then
1377: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i);
1378: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1379: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1380: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec => p_log_level_rec);
1381: end if;
1382:
1383: -- Set Allocation Basis
1384: -- ENERGY
1399: h_bonus_amount := nvl(P_group_bonus_amount,0);
1400: x_calc_done := 'N';
1401:
1402: if (p_log_level_rec.statement_level) then
1403: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1404: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1405: h_allocation_basis||':'||h_total_allocation_basis||':'|| x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1406: end if;
1407:
1400: x_calc_done := 'N';
1401:
1402: if (p_log_level_rec.statement_level) then
1403: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1404: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1405: h_allocation_basis||':'||h_total_allocation_basis||':'|| x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1406: end if;
1407:
1408: -- Call Allocation_main to allocate the group amount to member assets
1474:
1475: l_last_asset_index := i;
1476:
1477: if (p_log_level_rec.statement_level) then
1478: fa_debug_pkg.add(l_calling_fn, 'Updated current period row into p_track_member_table', '***');
1479:
1480: if not display_debug_message2(i, l_calling_fn,
1481: p_log_level_rec) then
1482: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
1478: fa_debug_pkg.add(l_calling_fn, 'Updated current period row into p_track_member_table', '***');
1479:
1480: if not display_debug_message2(i, l_calling_fn,
1481: p_log_level_rec) then
1482: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
1483: end if;
1484:
1485: end if;
1486: end if;
1500: -- passed group amount doesn't include current period catchup expense,
1501: -- so add up the catchup expense at this place
1502: if nvl(P_subtraction_flag,'N') = 'Y' then
1503: if (p_log_level_rec.statement_level) then
1504: fa_debug_pkg.add(l_calling_fn,'++ Start to add current period expense catch up ++','+++', p_log_level_rec => p_log_level_rec);
1505: end if;
1506:
1507: if p_mrc_sob_type_code <> 'R' then
1508: -- Get group level adjustment
1516: close FA_ADJ_EXPENSE_MRC;
1517: end if;
1518:
1519: if (p_log_level_rec.statement_level) then
1520: fa_debug_pkg.add(l_calling_fn, 'h_deprn_expense:h_bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
1521: end if;
1522:
1523: -- h_deprn_amount := h_deprn_amount + nvl(h_deprn_expense,0);
1524: -- h_bonus_amount := h_bonus_amount + nvl(h_bonus_expense,0);
1530: if p_mrc_sob_type_code <> 'R' then
1531:
1532: For mem in ALL_MEMBERS loop
1533: if (p_log_level_rec.statement_level) then
1534: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id, p_log_level_rec => p_log_level_rec);
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1531:
1532: For mem in ALL_MEMBERS loop
1533: if (p_log_level_rec.statement_level) then
1534: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id, p_log_level_rec => p_log_level_rec);
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1532: For mem in ALL_MEMBERS loop
1533: if (p_log_level_rec.statement_level) then
1534: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id, p_log_level_rec => p_log_level_rec);
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1533: if (p_log_level_rec.statement_level) then
1534: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id, p_log_level_rec => p_log_level_rec);
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1541: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book');
1534: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id, p_log_level_rec => p_log_level_rec);
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1541: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book');
1542: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1535: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag, p_log_level_rec => p_log_level_rec);
1536: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag, p_log_level_rec => p_log_level_rec);
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1541: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book');
1542: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1543: end if;
1537: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved, p_log_level_rec => p_log_level_rec);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1541: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book');
1542: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1543: end if;
1544:
1545: OPEN c_adj_count(mem.asset_id);
1538: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired, p_log_level_rec => p_log_level_rec);
1539: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
1540:
1541: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book');
1542: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1543: end if;
1544:
1545: OPEN c_adj_count(mem.asset_id);
1546: FETCH c_adj_count INTO l_adj_count;
1568: OPEN c_get_adj(mem.asset_id); -- ENERGY
1569: FETCH c_get_adj INTO l_reserve_amount; -- ENERGY
1570: CLOSE c_get_adj; -- ENERGY
1571: if (p_log_level_rec.statement_level) then
1572: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
1573: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec => p_log_level_rec);
1574: end if;
1575:
1576: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1569: FETCH c_get_adj INTO l_reserve_amount; -- ENERGY
1570: CLOSE c_get_adj; -- ENERGY
1571: if (p_log_level_rec.statement_level) then
1572: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
1573: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec => p_log_level_rec);
1574: end if;
1575:
1576: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1577: l_track_member_in.reserve_adjustment_amount := l_reserve_amount; -- ENERGY
1579: h_deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1580: h_member_asset_id := mem.asset_id;
1581:
1582: if (p_log_level_rec.statement_level) then
1583: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Member Asset to be processed ',
1584: h_member_asset_id);
1585: end if;
1586:
1587: -- Check fiscal year of populated deprn summary
1633:
1634: x_calc_done := 'N';
1635:
1636: if (p_log_level_rec.statement_level) then
1637: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1638: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1639: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1640: end if;
1641:
1634: x_calc_done := 'N';
1635:
1636: if (p_log_level_rec.statement_level) then
1637: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1638: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1639: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1640: end if;
1641:
1642: -- Call Allocation_main to allocate the group amount to member assets
1697:
1698: For mem in ALL_MEMBERS_MRC loop
1699:
1700: if (p_log_level_rec.statement_level) then
1701: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Reporting Book');
1702: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1703: end if;
1704:
1705: OPEN c_mc_adj_count(mem.asset_id);
1698: For mem in ALL_MEMBERS_MRC loop
1699:
1700: if (p_log_level_rec.statement_level) then
1701: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Reporting Book');
1702: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++');
1703: end if;
1704:
1705: OPEN c_mc_adj_count(mem.asset_id);
1706: FETCH c_mc_adj_count INTO l_adj_count;
1727: OPEN c_get_mc_adj(mem.asset_id); -- ENERGY
1728: FETCH c_get_mc_adj INTO l_reserve_amount; -- ENERGY
1729: CLOSE c_get_mc_adj; -- ENERGY
1730: if (p_log_level_rec.statement_level) then
1731: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
1732: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec => p_log_level_rec);
1733: end if;
1734:
1735: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1728: FETCH c_get_mc_adj INTO l_reserve_amount; -- ENERGY
1729: CLOSE c_get_mc_adj; -- ENERGY
1730: if (p_log_level_rec.statement_level) then
1731: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
1732: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec => p_log_level_rec);
1733: end if;
1734:
1735: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1736: l_track_member_in.reserve_adjustment_amount := l_reserve_amount; -- ENERGY
1739: l_track_member_in.deprn_reserve := h_deprn_reserve;
1740: h_member_asset_id := mem.asset_id;
1741:
1742: if (p_log_level_rec.statement_level) then
1743: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Member Asset to be processed ',
1744: h_member_asset_id);
1745: end if;
1746:
1747: -- Check fiscal year of populated deprn summary
1790: h_rec_cost_for_odda := mem.recoverable_cost;
1791: h_sv_for_odda := mem.salvage_value;
1792:
1793: if (p_log_level_rec.statement_level) then
1794: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1795: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1796: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1797: end if;
1798:
1791: h_sv_for_odda := mem.salvage_value;
1792:
1793: if (p_log_level_rec.statement_level) then
1794: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++');
1795: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1796: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1797: end if;
1798:
1799: -- Call Allocation_main to allocate the group amount to member assets
1859: if nvl(x_calc_done,'N') = 'Y' and nvl(l_track_member_out.override_flag,'N') <> 'Y' then
1860:
1861: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1862: if (p_log_level_rec.statement_level) then
1863: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding Logic', 'for ADJUSTMENT', p_log_level_rec => p_log_level_rec);
1864: end if;
1865:
1866: x_sum_of_deprn_amount := 0;
1867: x_sum_of_bonus_amount := 0;
1878: end if;
1879: END LOOP;
1880: else
1881: if (p_log_level_rec.statement_level) then
1882: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding Logic', 'for DEPRECIATION', p_log_level_rec => p_log_level_rec);
1883: end if;
1884:
1885: select nvl(sum(system_deprn_amount),0),
1886: nvl(sum(system_bonus_amount),0)
1909: end;
1910: end if;
1911:
1912: if (p_log_level_rec.statement_level) then
1913: fa_debug_pkg.add(l_calling_fn, 'x_sum_of_deprn:bonus_amount',
1914: x_sum_of_deprn_amount||':'||x_sum_of_bonus_amount, p_log_level_rec => p_log_level_rec);
1915: end if;
1916:
1917: -- Final Asset Rounding Adjustment
1928: x_allocated_bonus_amount := x_allocated_bonus_amount - h_bonus_ytd_deprn;
1929: end if;
1930:
1931: if (p_log_level_rec.statement_level) then
1932: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||
1933: x_allocated_bonus_amount);
1934: fa_debug_pkg.add(l_calling_fn, 'x_check_reserve_flag', x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1935: end if;
1936:
1930:
1931: if (p_log_level_rec.statement_level) then
1932: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||
1933: x_allocated_bonus_amount);
1934: fa_debug_pkg.add(l_calling_fn, 'x_check_reserve_flag', x_check_reserve_flag, p_log_level_rec => p_log_level_rec);
1935: end if;
1936:
1937: if nvl(x_check_reserve_flag,'N') = 'Y' then -- Check is necessary only when allocate_fully_reserve flag is 'N'.
1938: -- Check if this member asset is not fully reserved due to this allocated amount.
1938: -- Check if this member asset is not fully reserved due to this allocated amount.
1939: x_check_amount := l_track_member_in.adjusted_recoverable_cost;
1940:
1941: if (p_log_level_rec.statement_level) then
1942: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1943: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1944: x_allocated_bonus_amount);
1945: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec => p_log_level_rec);
1946: end if;
1939: x_check_amount := l_track_member_in.adjusted_recoverable_cost;
1940:
1941: if (p_log_level_rec.statement_level) then
1942: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1943: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1944: x_allocated_bonus_amount);
1945: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec => p_log_level_rec);
1946: end if;
1947:
1941: if (p_log_level_rec.statement_level) then
1942: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
1943: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1944: x_allocated_bonus_amount);
1945: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec => p_log_level_rec);
1946: end if;
1947:
1948:
1949:
2043: x_allocated_bonus_amount := x_allocated_bonus_amount - nvl(h_bonus_expense,0);
2044: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
2045: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
2046: if (p_log_level_rec.statement_level) then
2047: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
2048: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
2049: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2050: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
2051: end if;
2044: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
2045: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
2046: if (p_log_level_rec.statement_level) then
2047: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
2048: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
2049: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2050: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
2051: end if;
2052: end if;
2046: if (p_log_level_rec.statement_level) then
2047: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
2048: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
2049: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2050: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
2051: end if;
2052: end if;
2053:
2054: -- Calculate Deprn Reserve
2064: h_bonus_ytd_deprn := nvl(x_allocated_bonus_amount,0);
2065: end if;
2066:
2067: if (p_log_level_rec.statement_level) then
2068: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec => p_log_level_rec);
2069: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2070: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2071: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2072: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
2065: end if;
2066:
2067: if (p_log_level_rec.statement_level) then
2068: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec => p_log_level_rec);
2069: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2070: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2071: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2072: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
2073: ':'||h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2067: if (p_log_level_rec.statement_level) then
2068: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec => p_log_level_rec);
2069: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2070: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2071: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2072: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
2073: ':'||h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2074: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2075:
2070: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2071: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2072: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
2073: ':'||h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2074: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2075:
2076: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2077: fa_debug_pkg.add(l_calling_fn, 'l_last_asset_index(ADJUSTMENT mode)', l_last_asset_index);
2078: end if;
2073: ':'||h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2074: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2075:
2076: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2077: fa_debug_pkg.add(l_calling_fn, 'l_last_asset_index(ADJUSTMENT mode)', l_last_asset_index);
2078: end if;
2079: end if;
2080:
2081: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2090: p_track_member_table(l_last_asset_index).bonus_deprn_reserve := h_bonus_deprn_reserve;
2091: p_track_member_table(l_last_asset_index).bonus_ytd_deprn := h_bonus_ytd_deprn;
2092:
2093: if (p_log_level_rec.statement_level) then
2094: fa_debug_pkg.add(l_calling_fn,
2095: 'In final asset rounding, Updated following row into p_track_member_table',
2096: l_last_asset_index, p_log_level_rec => p_log_level_rec);
2097:
2098: if not display_debug_message2(l_last_asset_index, l_calling_fn,
2096: l_last_asset_index, p_log_level_rec => p_log_level_rec);
2097:
2098: if not display_debug_message2(l_last_asset_index, l_calling_fn,
2099: p_log_level_rec) then
2100: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
2101: end if;
2102: end if;
2103: else
2104: -- ENERGY
2102: end if;
2103: else
2104: -- ENERGY
2105: if (p_log_level_rec.statement_level) then
2106: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec => p_log_level_rec);
2107: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2103: else
2104: -- ENERGY
2105: if (p_log_level_rec.statement_level) then
2106: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec => p_log_level_rec);
2107: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2111: end if;
2104: -- ENERGY
2105: if (p_log_level_rec.statement_level) then
2106: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec => p_log_level_rec);
2107: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2111: end if;
2112: -- ENERGY
2105: if (p_log_level_rec.statement_level) then
2106: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec => p_log_level_rec);
2107: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2111: end if;
2112: -- ENERGY
2113:
2106: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec => p_log_level_rec);
2107: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2108: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2109: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2110: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2111: end if;
2112: -- ENERGY
2113:
2114: -- Update FA_TRACK_MEMBERS table
2176: if nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
2177: (P_excess_allocation_option = 'DISTRIBUTE' or nvl(P_group_level_override,'N') <> 'N') then
2178:
2179: if (p_log_level_rec.statement_level) then
2180: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec => p_log_level_rec);
2181: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2182: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec => p_log_level_rec);
2183: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2184: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec => p_log_level_rec);
2177: (P_excess_allocation_option = 'DISTRIBUTE' or nvl(P_group_level_override,'N') <> 'N') then
2178:
2179: if (p_log_level_rec.statement_level) then
2180: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec => p_log_level_rec);
2181: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2182: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec => p_log_level_rec);
2183: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2184: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec => p_log_level_rec);
2185: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
2179: if (p_log_level_rec.statement_level) then
2180: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec => p_log_level_rec);
2181: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2182: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec => p_log_level_rec);
2183: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2184: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec => p_log_level_rec);
2185: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
2186: end if;
2187:
2181: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2182: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec => p_log_level_rec);
2183: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2184: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec => p_log_level_rec);
2185: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
2186: end if;
2187:
2188: -- Logic to reallocate amounts
2189: h_group_deprn_amount := h_deprn_amount;
2278:
2279: end if;
2280:
2281: if (p_log_level_rec.statement_level) then
2282: fa_debug_pkg.add(l_calling_fn, 'h_fixed_deprn:bonus_amount',
2283: h_fixed_deprn_amount||':'||h_fixed_bonus_amount, p_log_level_rec => p_log_level_rec);
2284: end if;
2285:
2286: h_group_deprn_amount := h_deprn_amount - h_fixed_deprn_amount;
2335: l_track_member_in := p_track_member_table(j);
2336: h_member_asset_id := l_track_member_in.member_asset_id;
2337:
2338: if (p_log_level_rec.statement_level) then
2339: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset (Adjustment Mode)',
2340: l_track_member_in.member_asset_id);
2341: end if;
2342:
2343: if h_current_period_number = 1 then
2405:
2406: l_processed_number := j;
2407:
2408: if (p_log_level_rec.statement_level) then
2409: fa_debug_pkg.add(l_calling_fn,
2410: 'In reallocation logic, Updated following row into p_track_member_table',
2411: l_processed_number, p_log_level_rec => p_log_level_rec);
2412:
2413: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2410: 'In reallocation logic, Updated following row into p_track_member_table',
2411: l_processed_number, p_log_level_rec => p_log_level_rec);
2412:
2413: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2414: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
2415: end if;
2416: end if;
2417:
2418: end if;
2431: h_member_asset_id := realloc.member_asset_id;
2432: l_track_member_in.override_flag := nvl(realloc.override_flag,'N');
2433:
2434: if (p_log_level_rec.statement_level) then
2435: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset(Prmary Book)',
2436: l_track_member_in.member_asset_id);
2437: end if;
2438:
2439: if h_current_period_number = 1 then
2450: OPEN c_get_adj(realloc.member_asset_id);
2451: FETCH c_get_adj INTO l_reserve_amount;
2452: CLOSE c_get_adj;
2453: if (p_log_level_rec.statement_level) then
2454: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
2455: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec => p_log_level_rec);
2456: end if;
2457:
2458: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2451: FETCH c_get_adj INTO l_reserve_amount;
2452: CLOSE c_get_adj;
2453: if (p_log_level_rec.statement_level) then
2454: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
2455: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec => p_log_level_rec);
2456: end if;
2457:
2458: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2459: l_track_member_in.reserve_adjustment_amount := l_reserve_amount;
2518: h_member_asset_id := realloc.member_asset_id;
2519: l_track_member_in.override_flag := nvl(realloc.override_flag,'N');
2520:
2521: if (p_log_level_rec.statement_level) then
2522: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset (Reporting Book)',
2523: l_track_member_in.member_asset_id);
2524: end if;
2525:
2526: if h_current_period_number = 1 then
2537: OPEN c_get_mc_adj(realloc.member_asset_id);
2538: FETCH c_get_mc_adj INTO l_reserve_amount;
2539: CLOSE c_get_mc_adj;
2540: if (p_log_level_rec.statement_level) then
2541: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
2542: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec => p_log_level_rec);
2543: end if;
2544:
2545: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2538: FETCH c_get_mc_adj INTO l_reserve_amount;
2539: CLOSE c_get_mc_adj;
2540: if (p_log_level_rec.statement_level) then
2541: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec => p_log_level_rec);
2542: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec => p_log_level_rec);
2543: end if;
2544:
2545: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2546: l_track_member_in.reserve_adjustment_amount := l_reserve_amount;
2600: if nvl(x_calc_done,'N') = 'Y' and
2601: nvl(l_track_member_out.override_flag,'N') <> 'Y' and nvl(h_all_member_fully_reserved,'N') = 'N' then
2602:
2603: if (p_log_level_rec.statement_level) then
2604: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding (Reallocation) Start ++', '+++');
2605: fa_debug_pkg.add(l_calling_fn, 'h_system_deprn:bonus_amount',
2606: h_system_deprn_amount||':'||h_system_bonus_amount, p_log_level_rec => p_log_level_rec);
2607: end if;
2608:
2601: nvl(l_track_member_out.override_flag,'N') <> 'Y' and nvl(h_all_member_fully_reserved,'N') = 'N' then
2602:
2603: if (p_log_level_rec.statement_level) then
2604: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding (Reallocation) Start ++', '+++');
2605: fa_debug_pkg.add(l_calling_fn, 'h_system_deprn:bonus_amount',
2606: h_system_deprn_amount||':'||h_system_bonus_amount, p_log_level_rec => p_log_level_rec);
2607: end if;
2608:
2609: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2643: and nvl(set_of_books_id,-99) = nvl(p_set_of_books_id,-99);
2644: end if;
2645:
2646: if (p_log_level_rec.statement_level) then
2647: fa_debug_pkg.add(l_calling_fn, 'x_sum_of_deprn:bonus_amount(realloc)',
2648: x_sum_of_deprn_amount||':'||x_sum_of_bonus_amount);
2649: end if;
2650:
2651: -- Final Asset Rounding Adjustment
2742: h_bonus_ytd_deprn := nvl(x_allocated_bonus_amount,0);
2743: end if;
2744:
2745: if (p_log_level_rec.statement_level) then
2746: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode);
2747: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2748: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2749: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2750: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2743: end if;
2744:
2745: if (p_log_level_rec.statement_level) then
2746: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode);
2747: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2748: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2749: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2750: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2751: h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2745: if (p_log_level_rec.statement_level) then
2746: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode);
2747: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2748: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2749: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2750: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2751: h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2752: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2753:
2748: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec => p_log_level_rec);
2749: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2750: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2751: h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2752: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2753:
2754: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2755: fa_debug_pkg.add(l_calling_fn, 'l_processed_number', l_processed_number, p_log_level_rec => p_log_level_rec);
2756: end if;
2751: h_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
2752: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
2753:
2754: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2755: fa_debug_pkg.add(l_calling_fn, 'l_processed_number', l_processed_number, p_log_level_rec => p_log_level_rec);
2756: end if;
2757: end if;
2758:
2759: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2768: p_track_member_table(l_processed_number).bonus_ytd_deprn := h_bonus_ytd_deprn;
2769: else
2770: -- ENERGY
2771: if (p_log_level_rec.statement_level) then
2772: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec => p_log_level_rec);
2773: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2774: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2775: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2776: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2769: else
2770: -- ENERGY
2771: if (p_log_level_rec.statement_level) then
2772: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec => p_log_level_rec);
2773: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2774: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2775: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2776: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2777: end if;
2770: -- ENERGY
2771: if (p_log_level_rec.statement_level) then
2772: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec => p_log_level_rec);
2773: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2774: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2775: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2776: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2777: end if;
2778: -- ENERGY
2771: if (p_log_level_rec.statement_level) then
2772: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec => p_log_level_rec);
2773: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2774: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2775: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2776: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2777: end if;
2778: -- ENERGY
2779: -- Update FA_TRACK_MEMBERS table
2772: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec => p_log_level_rec);
2773: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
2774: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
2775: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
2776: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec => p_log_level_rec);
2777: end if;
2778: -- ENERGY
2779: -- Update FA_TRACK_MEMBERS table
2780: update FA_TRACK_MEMBERS
2901: p_track_member_table(j).ytd_deprn := nvl(p_track_member_table(j).ytd_deprn,0) + h_unplanned_expense;
2902: p_track_member_table(j).deprn_reserve := nvl(p_track_member_table(j).deprn_reserve,0) +
2903: h_unplanned_expense;
2904: if (p_log_level_rec.statement_level) then
2905: fa_debug_pkg.add(l_calling_fn,'Added Unplanned Depreciation Expense',
2906: h_unplanned_member_asset||':'||h_unplanned_expense||','||h_period_counter, p_log_level_rec => p_log_level_rec);
2907: end if;
2908: end if;
2909:
2949: p_log_level_rec);
2950:
2951: if (p_log_level_rec.statement_level) then
2952:
2953: fa_debug_pkg.add(l_calling_fn, 'Inserted new row into p_track_member_table', l_processed_number, p_log_level_rec => p_log_level_rec);
2954:
2955: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2956: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
2957: end if;
2952:
2953: fa_debug_pkg.add(l_calling_fn, 'Inserted new row into p_track_member_table', l_processed_number, p_log_level_rec => p_log_level_rec);
2954:
2955: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2956: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec => p_log_level_rec);
2957: end if;
2958: end if;
2959: end if;
2960: end LOOP; -- All PL/SQL table check
3091: nbv_absval := abs(P_adj_rec_cost - (P_current_deprn_reserve + P_year_deprn_exp + P_perd_deprn_exp));
3092:
3093: -- Debug
3094: if (p_log_level_rec.statement_level) then
3095: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec => p_log_level_rec);
3096: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
3097: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp, p_log_level_rec => p_log_level_rec);
3098: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
3099: nbv_absval||':'||P_nbv_threshold||':'||P_nbv_thresh_amount, p_log_level_rec => p_log_level_rec);
3092:
3093: -- Debug
3094: if (p_log_level_rec.statement_level) then
3095: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec => p_log_level_rec);
3096: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
3097: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp, p_log_level_rec => p_log_level_rec);
3098: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
3099: nbv_absval||':'||P_nbv_threshold||':'||P_nbv_thresh_amount, p_log_level_rec => p_log_level_rec);
3100: end if;
3094: if (p_log_level_rec.statement_level) then
3095: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec => p_log_level_rec);
3096: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
3097: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp, p_log_level_rec => p_log_level_rec);
3098: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
3099: nbv_absval||':'||P_nbv_threshold||':'||P_nbv_thresh_amount, p_log_level_rec => p_log_level_rec);
3100: end if;
3101:
3102: -- Get the absolute value of the asset's Adjusted Recoverable Cost, do not use Recoverable Cost
3317: begin
3318: /* Apply MRC related feature */
3319:
3320: if (p_log_level_rec.statement_level) then
3321: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec => p_log_level_rec);
3322: fa_debug_pkg.add(l_calling_fn, 'p_set_of_books_id', p_set_of_books_id, p_log_level_rec => p_log_level_rec);
3323: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3324: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn, p_log_level_rec => p_log_level_rec);
3325: end if;
3318: /* Apply MRC related feature */
3319:
3320: if (p_log_level_rec.statement_level) then
3321: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec => p_log_level_rec);
3322: fa_debug_pkg.add(l_calling_fn, 'p_set_of_books_id', p_set_of_books_id, p_log_level_rec => p_log_level_rec);
3323: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3324: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn, p_log_level_rec => p_log_level_rec);
3325: end if;
3326:
3319:
3320: if (p_log_level_rec.statement_level) then
3321: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec => p_log_level_rec);
3322: fa_debug_pkg.add(l_calling_fn, 'p_set_of_books_id', p_set_of_books_id, p_log_level_rec => p_log_level_rec);
3323: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3324: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn, p_log_level_rec => p_log_level_rec);
3325: end if;
3326:
3327: -- Reset calculation flag
3390:
3391: x_allocated_normal_amount := x_allocated_deprn_amount - x_allocated_bonus_amount;
3392:
3393: if (p_log_level_rec.statement_level) then
3394: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3395: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec => p_log_level_rec);
3397: end if;
3398:
3391: x_allocated_normal_amount := x_allocated_deprn_amount - x_allocated_bonus_amount;
3392:
3393: if (p_log_level_rec.statement_level) then
3394: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3395: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec => p_log_level_rec);
3397: end if;
3398:
3399: -- Set calculation flag
3392:
3393: if (p_log_level_rec.statement_level) then
3394: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3395: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec => p_log_level_rec);
3397: end if;
3398:
3399: -- Set calculation flag
3400: x_calc_done := 'Y';
3416:
3417: savepoint member_override; -- In case this override is not acceptable, need to be rollbacked
3418:
3419: if (p_log_level_rec.statement_level) then
3420: fa_debug_pkg.add(l_calling_fn, 'l_processing_member_table', l_processing_member_table, p_log_level_rec => p_log_level_rec);
3421: end if;
3422:
3423: if nvl(l_processing_member_table,'NO') = 'YES' then -- This is a case to call override_member_amounts
3424:
3422:
3423: if nvl(l_processing_member_table,'NO') = 'YES' then -- This is a case to call override_member_amounts
3424:
3425: if (p_log_level_rec.statement_level) then
3426: fa_debug_pkg.add(l_calling_fn, 'Query overridden amount from override table', '***');
3427: end if;
3428:
3429: if not override_member_amount(p_book_type_code => P_book_type_code,
3430: p_member_asset_id => P_member_asset_id,
3468: end if;
3469: end if;
3470:
3471: if (p_log_level_rec.statement_level) then
3472: fa_debug_pkg.add(l_calling_fn, 'h_deprn_override_flag', h_deprn_override_flag, p_log_level_rec => p_log_level_rec);
3473: end if;
3474:
3475: h_deprn_override := 0;
3476: if h_deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE then
3496: end if; -- override flag check
3497: end if; -- override is enable or not
3498:
3499: if (p_log_level_rec.statement_level) then
3500: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
3501: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec => p_log_level_rec);
3502: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3503: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
3504: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
3497: end if; -- override is enable or not
3498:
3499: if (p_log_level_rec.statement_level) then
3500: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
3501: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec => p_log_level_rec);
3502: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3503: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
3504: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
3505: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3498:
3499: if (p_log_level_rec.statement_level) then
3500: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
3501: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec => p_log_level_rec);
3502: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3503: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
3504: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
3505: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3506: end if;
3500: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec => p_log_level_rec);
3501: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec => p_log_level_rec);
3502: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3503: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
3504: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
3505: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3506: end if;
3507:
3508: -- Check if this member asset is not fully reserved due to this allocated amount.
3501: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec => p_log_level_rec);
3502: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3503: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
3504: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec => p_log_level_rec);
3505: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3506: end if;
3507:
3508: -- Check if this member asset is not fully reserved due to this allocated amount.
3509: if P_check_reserve_flag = 'Y' then
3587: x_allocated_bonus_amount := x_allocated_bonus_amount - nvl(h_bonus_expense,0);
3588: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
3589: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
3590: if (p_log_level_rec.statement_level) then
3591: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
3592: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount', x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3593: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec => p_log_level_rec);
3594: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
3595: end if;
3588: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
3589: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
3590: if (p_log_level_rec.statement_level) then
3591: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
3592: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount', x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3593: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec => p_log_level_rec);
3594: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
3595: end if;
3596: end if;
3589: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
3590: if (p_log_level_rec.statement_level) then
3591: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
3592: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount', x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3593: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec => p_log_level_rec);
3594: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
3595: end if;
3596: end if;
3597:
3590: if (p_log_level_rec.statement_level) then
3591: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***');
3592: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount', x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
3593: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount', x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec => p_log_level_rec);
3594: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec => p_log_level_rec);
3595: end if;
3596: end if;
3597:
3598: if (p_log_level_rec.statement_level) then
3595: end if;
3596: end if;
3597:
3598: if (p_log_level_rec.statement_level) then
3599: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.reserve_adjustment_amount', -- ENERGY
3600: P_track_member_in.reserve_adjustment_amount, p_log_level_rec => p_log_level_rec); -- ENERGY
3601: end if;
3602:
3603: -- Calculate Reserve Amount
3631: h_recoverable_cost := P_track_member_in.recoverable_cost;
3632: h_adjusted_recoverable_cost := P_track_member_in.adjusted_recoverable_cost;
3633:
3634: if (p_log_level_rec.statement_level) then
3635: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode);
3636: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3637: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3632: h_adjusted_recoverable_cost := P_track_member_in.adjusted_recoverable_cost;
3633:
3634: if (p_log_level_rec.statement_level) then
3635: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode);
3636: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3637: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3634: if (p_log_level_rec.statement_level) then
3635: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode);
3636: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3637: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3636: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3637: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3643: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
3644: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis:h_allocation_basis', h_total_allocation_basis||':'||h_allocation_basis, p_log_level_rec => p_log_level_rec);
3637: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3643: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
3644: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis:h_allocation_basis', h_total_allocation_basis||':'||h_allocation_basis, p_log_level_rec => p_log_level_rec);
3645: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
3638: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3639: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec => p_log_level_rec);
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3643: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
3644: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis:h_allocation_basis', h_total_allocation_basis||':'||h_allocation_basis, p_log_level_rec => p_log_level_rec);
3645: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
3646: end if;
3640: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount);
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3643: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
3644: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis:h_allocation_basis', h_total_allocation_basis||':'||h_allocation_basis, p_log_level_rec => p_log_level_rec);
3645: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
3646: end if;
3647:
3648: if nvl(P_mode,'DEPRECIATION') <> 'ADJUSTMENT' then
3641: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount);
3642: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3643: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
3644: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis:h_allocation_basis', h_total_allocation_basis||':'||h_allocation_basis, p_log_level_rec => p_log_level_rec);
3645: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec => p_log_level_rec);
3646: end if;
3647:
3648: if nvl(P_mode,'DEPRECIATION') <> 'ADJUSTMENT' then
3649: -- Check if the row has been inserted
3652: open CHECK_EXISTS;
3653: fetch CHECK_EXISTS into x_dummy;
3654: close CHECK_EXISTS;
3655: if (p_log_level_rec.statement_level) then
3656: fa_debug_pkg.add('allocation_main','insert/update check', x_dummy, p_log_level_rec => p_log_level_rec);
3657: end if;
3658:
3659: --bug6923135
3660: --Placing nvl around variables so that pro*c code can handle the fetched value.
4358:
4359: if p_group_rule_in.tracking_method = 'ALLOCATE' and nvl(l_process_deprn_for_member,'YES') = 'YES' then
4360:
4361: if (p_log_level_rec.statement_level) then
4362: fa_debug_pkg.add(l_calling_fn, '+++ Update Depreciable Basis for member assets +++', '+++', p_log_level_rec => p_log_level_rec);
4363: end if;
4364:
4365: -- Initialization
4366: h_book_type_code := p_group_rule_in.book_type_code;
4383: close GET_EXCLUDE_FULLY_RSV_FLAG_MRC;
4384: end if;
4385:
4386: if (p_log_level_rec.statement_level) then
4387: fa_debug_pkg.add(l_calling_fn, 'h_sob_id:group_asset_id:period_counter:fiscal_year:cur_period_num:mode',
4388: h_set_of_books_id||':'||h_group_asset_id||':'||h_period_counter||':'||h_fiscal_year||':'||h_cur_period_counter||':'||p_mode, p_log_level_rec => p_log_level_rec);
4389: end if;
4390:
4391: -- If this is called during Adjustment and this is oldest period to be calculated,
4394: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
4395:
4396: if not p_track_member_table.exists(1) then
4397: if (p_log_level_rec.statement_level) then
4398: fa_debug_pkg.add(l_calling_fn, '++ populate previous rows call ++', 'ADJUSTMENT MDOE', p_log_level_rec => p_log_level_rec);
4399: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
4400: end if;
4401:
4402: l_transaction_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4395:
4396: if not p_track_member_table.exists(1) then
4397: if (p_log_level_rec.statement_level) then
4398: fa_debug_pkg.add(l_calling_fn, '++ populate previous rows call ++', 'ADJUSTMENT MDOE', p_log_level_rec => p_log_level_rec);
4399: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec => p_log_level_rec);
4400: end if;
4401:
4402: l_transaction_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4403:
4423: p_mrc_sob_type_code => p_group_rule_in.mrc_sob_type_code,
4424: p_set_of_books_id=>h_set_of_books_id,
4425: p_log_level_rec => p_log_level_rec) then
4426: if (p_log_level_rec.statement_level) then
4427: fa_debug_pkg.add(l_calling_fn, '++ populate_member_amounts_table ++', 'Returned FALSE', p_log_level_rec => p_log_level_rec);
4428: end if;
4429: raise upd_deprn_err;
4430: end if;
4431: end if; -- End of preparion for Adjustment mode
4430: end if;
4431: end if; -- End of preparion for Adjustment mode
4432:
4433: if (p_log_level_rec.statement_level) then
4434: fa_debug_pkg.add(l_calling_fn, '++ populate_previous_rows done ++', '+++', p_log_level_rec => p_log_level_rec);
4435: fa_debug_pkg.add(l_calling_fn, 'group_in.adj_transaction_header_id',
4436: p_group_rule_in.adj_transaction_header_id, p_log_level_rec => p_log_level_rec);
4437: end if;
4438:
4431: end if; -- End of preparion for Adjustment mode
4432:
4433: if (p_log_level_rec.statement_level) then
4434: fa_debug_pkg.add(l_calling_fn, '++ populate_previous_rows done ++', '+++', p_log_level_rec => p_log_level_rec);
4435: fa_debug_pkg.add(l_calling_fn, 'group_in.adj_transaction_header_id',
4436: p_group_rule_in.adj_transaction_header_id, p_log_level_rec => p_log_level_rec);
4437: end if;
4438:
4439: -- Before starting to process member deprn basis update,
4446: -- In this period, come transaction has occurred.
4447: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4448:
4449: if (p_log_level_rec.statement_level) then
4450: fa_debug_pkg.add(l_calling_fn, '++ Logic for member header id is not NULL ++', '+++', p_log_level_rec => p_log_level_rec);
4451: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec => p_log_level_rec);
4452: end if;
4453:
4454: select asset_id,transaction_type_code,transaction_key,nvl(amortization_start_date,transaction_date_entered)
4447: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4448:
4449: if (p_log_level_rec.statement_level) then
4450: fa_debug_pkg.add(l_calling_fn, '++ Logic for member header id is not NULL ++', '+++', p_log_level_rec => p_log_level_rec);
4451: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec => p_log_level_rec);
4452: end if;
4453:
4454: select asset_id,transaction_type_code,transaction_key,nvl(amortization_start_date,transaction_date_entered)
4455: into h_asset_id,h_transaction_type_code,h_transaction_key,l_transaction_date_entered
4477:
4478: h_trans_period_counter := h_trans_fiscal_year*h_period_per_fiscal_year+h_trans_period_num;
4479:
4480: if (p_log_level_rec.statement_level) then
4481: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec => p_log_level_rec);
4482: fa_debug_pkg.add(l_calling_fn, 'h_transaction_type_code:h_transaction_key', h_transaction_type_code||':'||h_transaction_key, p_log_level_rec => p_log_level_rec);
4483: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec => p_log_level_rec);
4484: end if;
4485: end if;
4478: h_trans_period_counter := h_trans_fiscal_year*h_period_per_fiscal_year+h_trans_period_num;
4479:
4480: if (p_log_level_rec.statement_level) then
4481: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec => p_log_level_rec);
4482: fa_debug_pkg.add(l_calling_fn, 'h_transaction_type_code:h_transaction_key', h_transaction_type_code||':'||h_transaction_key, p_log_level_rec => p_log_level_rec);
4483: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec => p_log_level_rec);
4484: end if;
4485: end if;
4486:
4479:
4480: if (p_log_level_rec.statement_level) then
4481: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec => p_log_level_rec);
4482: fa_debug_pkg.add(l_calling_fn, 'h_transaction_type_code:h_transaction_key', h_transaction_type_code||':'||h_transaction_key, p_log_level_rec => p_log_level_rec);
4483: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec => p_log_level_rec);
4484: end if;
4485: end if;
4486:
4487: if p_group_rule_in.event_type <> 'AFTER_DEPRN' then
4488:
4489: For i in 1 .. p_track_member_table.count loop
4490:
4491: if (p_log_level_rec.statement_level) then
4492: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1): Loop indicator +++', i);
4493: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count);
4494: end if;
4495:
4496: l_track_member := p_track_member_table(i);
4489: For i in 1 .. p_track_member_table.count loop
4490:
4491: if (p_log_level_rec.statement_level) then
4492: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1): Loop indicator +++', i);
4493: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count);
4494: end if;
4495:
4496: l_track_member := p_track_member_table(i);
4497:
4515:
4516: then
4517:
4518: if (p_log_level_rec.statement_level) then
4519: fa_debug_pkg.add(l_calling_fn, 'member_table('||i||').member_asset_id:retired_flag:reserved_flag:period_counter',
4520: p_track_member_table(i).member_asset_id||':'||p_track_member_table(i).fully_retired_flag||':'||
4521: p_track_member_table(i).fully_reserved_flag||':'||p_track_member_table(i).period_counter);
4522: end if;
4523:
4522: end if;
4523:
4524: h_member_asset_id := l_track_member.member_asset_id;
4525: if (p_log_level_rec.statement_level) then
4526: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) + h_member_asset_id', h_member_asset_id);
4527: end if;
4528:
4529: h_adj_eofy_reserve := 0;
4530:
4607: h_adj_eofy_reserve := 0;
4608: end if;
4609:
4610: if (p_log_level_rec.statement_level) then
4611: fa_debug_pkg.add(l_calling_fn, 'h_adj_eofy_reserve', h_adj_eofy_reserve, p_log_level_rec => p_log_level_rec);
4612: end if;
4613: end if;
4614: else -- This transaction is not for this transaction
4615: h_adj_cost := 0;
4652: h_catchup_expense := nvl(h_catchup_expense,0);
4653: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4654:
4655: if (p_log_level_rec.statement_level) then
4656: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4657: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4658: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4659: end if;
4660:
4653: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4654:
4655: if (p_log_level_rec.statement_level) then
4656: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4657: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4658: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4659: end if;
4660:
4661: h_current_cost := l_track_member.cost;
4654:
4655: if (p_log_level_rec.statement_level) then
4656: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4657: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4658: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4659: end if;
4660:
4661: h_current_cost := l_track_member.cost;
4662: h_current_salvage_value := l_track_member.salvage_value;
4763: if (p_log_level_rec.statement_level) then
4764: if not display_debug_message(fa_rule_in => fa_rule_in,
4765: p_calling_fn => l_calling_fn,
4766: p_log_level_rec => p_log_level_rec) then
4767: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
4768: end if;
4769: end if;
4770:
4771: -- Call Deprn Basis Rule for this transaction or period
4774: raise upd_deprn_err;
4775: end if;
4776:
4777: if (p_log_level_rec.statement_level) then
4778: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4780: fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4781: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
4782: end if;
4775: end if;
4776:
4777: if (p_log_level_rec.statement_level) then
4778: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4780: fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4781: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
4782: end if;
4783:
4777: if (p_log_level_rec.statement_level) then
4778: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4780: fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4781: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
4782: end if;
4783:
4784: -- delete from existing table
4785: delete_track_index(p_track_member_table(i).period_counter, p_track_member_table(i).member_asset_id,
4817: end if;
4818: END LOOP;
4819:
4820: if (p_log_level_rec.statement_level) then
4821: fa_debug_pkg.add(l_calling_fn, '++ Finally updated p_track_member_table ', i, p_log_level_rec => p_log_level_rec);
4822: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec=> p_log_level_rec) then
4823: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
4824: end if;
4825: end if;
4819:
4820: if (p_log_level_rec.statement_level) then
4821: fa_debug_pkg.add(l_calling_fn, '++ Finally updated p_track_member_table ', i, p_log_level_rec => p_log_level_rec);
4822: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec=> p_log_level_rec) then
4823: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
4824: end if;
4825: end if;
4826:
4827: end if; -- allocation type
4829:
4830: else -- In case of AFTER_DEPRN with ADJUSTMENT mode
4831:
4832: if (p_log_level_rec.statement_level) then
4833: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop');
4834: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_period_counter', h_group_asset_id||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
4835: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1));
4836: end if;
4837:
4830: else -- In case of AFTER_DEPRN with ADJUSTMENT mode
4831:
4832: if (p_log_level_rec.statement_level) then
4833: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop');
4834: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_period_counter', h_group_asset_id||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
4835: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1));
4836: end if;
4837:
4838: For i in 1 .. p_track_member_table.count loop
4831:
4832: if (p_log_level_rec.statement_level) then
4833: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop');
4834: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_period_counter', h_group_asset_id||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
4835: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1));
4836: end if;
4837:
4838: For i in 1 .. p_track_member_table.count loop
4839:
4837:
4838: For i in 1 .. p_track_member_table.count loop
4839:
4840: if (p_log_level_rec.statement_level) then
4841: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for AFTER_DEPRN ++ Indicator ++', i);
4842: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count);
4843: end if;
4844:
4845: l_track_member := p_track_member_table(i);
4838: For i in 1 .. p_track_member_table.count loop
4839:
4840: if (p_log_level_rec.statement_level) then
4841: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for AFTER_DEPRN ++ Indicator ++', i);
4842: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count);
4843: end if;
4844:
4845: l_track_member := p_track_member_table(i);
4846: if nvl(l_track_member.group_asset_id, -99) = h_group_asset_id and
4863:
4864: then
4865:
4866: if (p_log_level_rec.statement_level) then
4867: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table('||i||').member_asset_id:retired_flag:reserved_flag:period_counter',
4868: p_track_member_table(i).member_asset_id||':'||p_track_member_table(i).fully_retired_flag||':'||
4869: p_track_member_table(i).fully_reserved_flag||':'||p_track_member_table(i).period_counter);
4870: end if;
4871:
4870: end if;
4871:
4872: h_member_asset_id := l_track_member.member_asset_id;
4873: if (p_log_level_rec.statement_level) then
4874: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4875: end if;
4876:
4877: h_current_cost := l_track_member.cost;
4878: h_current_salvage_value := l_track_member.salvage_value;
4931: h_catchup_expense := nvl(h_catchup_expense,0);
4932: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4933:
4934: if (p_log_level_rec.statement_level) then
4935: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4936: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4937: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4938: end if;
4939:
4932: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4933:
4934: if (p_log_level_rec.statement_level) then
4935: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4936: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4937: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4938: end if;
4939:
4940: fa_rule_in.asset_type := x_asset_type;
4933:
4934: if (p_log_level_rec.statement_level) then
4935: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
4936: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
4937: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
4938: end if;
4939:
4940: fa_rule_in.asset_type := x_asset_type;
4941: fa_rule_in.adjustment_amount := nvl(x_added_cost,0) + nvl(x_retired_cost,0);
4982: if (p_log_level_rec.statement_level) then
4983: if not display_debug_message(fa_rule_in => fa_rule_in,
4984: p_calling_fn => l_calling_fn,
4985: p_log_level_rec => p_log_level_rec) then
4986: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
4987: end if;
4988: end if;
4989:
4990: -- Call Deprn Basis Rule for this transaction or period
4993: raise upd_deprn_err;
4994: end if;
4995:
4996: if (p_log_level_rec.statement_level) then
4997: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4998: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4999: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
5000: end if;
5001:
4994: end if;
4995:
4996: if (p_log_level_rec.statement_level) then
4997: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4998: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4999: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
5000: end if;
5001:
5002: -- Calculate EOFY_RESERVE as prior year reserve amount
4995:
4996: if (p_log_level_rec.statement_level) then
4997: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
4998: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
4999: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec => p_log_level_rec);
5000: end if;
5001:
5002: -- Calculate EOFY_RESERVE as prior year reserve amount
5003: if nvl(fa_rule_in.eofy_flag,'N') = 'Y' then
5006: h_new_eofy_reserve := l_track_member.eofy_reserve;
5007: end if;
5008:
5009: if (p_log_level_rec.statement_level) then
5010: fa_debug_pkg.add(l_calling_fn, 'update_deprn:h_new_eofy_reserve', h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5011: end if;
5012:
5013: p_track_member_table(i).adjusted_cost := fa_rule_out.new_adjusted_cost;
5014: p_track_member_table(i).eofy_reserve := h_new_eofy_reserve;
5013: p_track_member_table(i).adjusted_cost := fa_rule_out.new_adjusted_cost;
5014: p_track_member_table(i).eofy_reserve := h_new_eofy_reserve;
5015:
5016: if (p_log_level_rec.statement_level) then
5017: fa_debug_pkg.add(l_calling_fn, '++ End of updating p_track_member_table after depreciation', i, p_log_level_rec => p_log_level_rec);
5018: if not display_debug_message2(i, l_calling_fn, p_log_level_rec) then
5019: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2','returned error', p_log_level_rec => p_log_level_rec);
5020: end if;
5021: end if;
5015:
5016: if (p_log_level_rec.statement_level) then
5017: fa_debug_pkg.add(l_calling_fn, '++ End of updating p_track_member_table after depreciation', i, p_log_level_rec => p_log_level_rec);
5018: if not display_debug_message2(i, l_calling_fn, p_log_level_rec) then
5019: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2','returned error', p_log_level_rec => p_log_level_rec);
5020: end if;
5021: end if;
5022:
5023: end if; -- allocation type
5031: nvl(p_group_rule_in.eofy_flag,'N') = 'Y' and
5032: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
5033:
5034: if (p_log_level_rec.statement_level) then
5035: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec => p_log_level_rec);
5036: end if;
5037:
5038: For t IN 1.. p_track_member_table.COUNT LOOP
5039: if nvl(p_track_member_table(t).fully_reserved_flag,'N') = 'Y' and
5040: nvl(p_track_member_table(t).set_of_books_id,-99) = nvl(h_set_of_books_id,-99) then
5041: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
5042: - nvl(p_track_member_table(t).deprn_reserve,0);
5043: if (p_log_level_rec.statement_level) then
5044: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5045: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
5046: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter);
5047: end if;
5048: end if;
5041: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
5042: - nvl(p_track_member_table(t).deprn_reserve,0);
5043: if (p_log_level_rec.statement_level) then
5044: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5045: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
5046: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter);
5047: end if;
5048: end if;
5049: End Loop;
5048: end if;
5049: End Loop;
5050:
5051: if (p_log_level_rec.statement_level) then
5052: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Ended++++', p_log_level_rec => p_log_level_rec);
5053: end if;
5054: end if;
5055:
5056: end if; -- event_type check
5063:
5064: h_member_asset_id := member.member_asset_id;
5065:
5066: if (p_log_level_rec.statement_level) then
5067: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Primary/Non-MRC Book +++', '+++');
5068: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5069: end if;
5070:
5071: fa_rule_in := p_group_rule_in;
5064: h_member_asset_id := member.member_asset_id;
5065:
5066: if (p_log_level_rec.statement_level) then
5067: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Primary/Non-MRC Book +++', '+++');
5068: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5069: end if;
5070:
5071: fa_rule_in := p_group_rule_in;
5072:
5077: -- In this period, come transaction has occurred.
5078: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
5079:
5080: if (p_log_level_rec.statement_level) then
5081: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec => p_log_level_rec);
5082: end if;
5083:
5084: if h_adj_member_trans_header_id is not null then
5085: select asset_id,transaction_type_code
5091: end if;
5092: end if;
5093:
5094: if (p_log_level_rec.statement_level) then
5095: fa_debug_pkg.add(l_calling_fn, 'processed member_asset_id', h_asset_id, p_log_level_rec => p_log_level_rec);
5096: end if;
5097:
5098: fa_rule_in.asset_id := member.member_asset_id;
5099: fa_rule_in.group_asset_id := h_group_asset_id;
5153: h_catchup_expense := nvl(h_catchup_expense,0);
5154: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5155:
5156: if (p_log_level_rec.statement_level) then
5157: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5158: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5159: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5160: end if;
5161:
5154: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5155:
5156: if (p_log_level_rec.statement_level) then
5157: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5158: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5159: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5160: end if;
5161:
5162: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5155:
5156: if (p_log_level_rec.statement_level) then
5157: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5158: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5159: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5160: end if;
5161:
5162: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5163: -- Check FA_ADJUSTMENTS table if there is any depreciation expense during this period.
5259: h_prior_eofy_reserve := null;
5260: end if;
5261:
5262: if (p_log_level_rec.statement_level) then
5263: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5264: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5265: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5266: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5267: end if;
5260: end if;
5261:
5262: if (p_log_level_rec.statement_level) then
5263: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5264: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5265: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5266: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5267: end if;
5268:
5261:
5262: if (p_log_level_rec.statement_level) then
5263: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5264: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5265: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5266: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5267: end if;
5268:
5269: update fa_books
5285:
5286: h_member_asset_id := member.member_asset_id;
5287:
5288: if (p_log_level_rec.statement_level) then
5289: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Reporting Book +++', '+++');
5290: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5291: end if;
5292:
5293: fa_rule_in := p_group_rule_in;
5286: h_member_asset_id := member.member_asset_id;
5287:
5288: if (p_log_level_rec.statement_level) then
5289: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Reporting Book +++', '+++');
5290: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
5291: end if;
5292:
5293: fa_rule_in := p_group_rule_in;
5294:
5299: -- In this period, come transaction has occurred.
5300: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
5301:
5302: if (p_log_level_rec.statement_level) then
5303: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id',h_adj_member_trans_header_id, p_log_level_rec => p_log_level_rec);
5304: end if;
5305:
5306: if h_adj_member_trans_header_id is not null then
5307: select asset_id,transaction_type_code
5313: end if;
5314: end if;
5315:
5316: if (p_log_level_rec.statement_level) then
5317: fa_debug_pkg.add(l_calling_fn, 'processed member_asset_id', h_asset_id, p_log_level_rec => p_log_level_rec);
5318: end if;
5319:
5320: fa_rule_in.asset_id := member.member_asset_id;
5321: fa_rule_in.group_asset_id := h_group_asset_id;
5360: h_catchup_expense := nvl(h_catchup_expense,0);
5361: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5362:
5363: if (p_log_level_rec.statement_level) then
5364: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5365: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5366: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5367: end if;
5368:
5361: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5362:
5363: if (p_log_level_rec.statement_level) then
5364: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5365: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5366: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5367: end if;
5368:
5369: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5362:
5363: if (p_log_level_rec.statement_level) then
5364: fa_debug_pkg.add(l_calling_fn, 'h_catchup_expense:h_bonus_catchup_expense', h_catchup_expense||':'||h_bonus_catchup_expense, p_log_level_rec => p_log_level_rec);
5365: fa_debug_pkg.add(l_calling_fn, 'h_rsv_adjustment:h_bonus_rsv_adjustment', h_rsv_adjustment||':'||h_bonus_rsv_adjustment, p_log_level_rec => p_log_level_rec);
5366: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec => p_log_level_rec);
5367: end if;
5368:
5369: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5370: -- Check if there is catchup expense in this period.
5465: h_prior_eofy_reserve := null;
5466: end if;
5467:
5468: if (p_log_level_rec.statement_level) then
5469: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5470: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5471: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5472: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5473: end if;
5466: end if;
5467:
5468: if (p_log_level_rec.statement_level) then
5469: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5470: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5471: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5472: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5473: end if;
5474:
5467:
5468: if (p_log_level_rec.statement_level) then
5469: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec => p_log_level_rec);
5470: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
5471: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5472: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec => p_log_level_rec);
5473: end if;
5474:
5475: update fa_mc_books
5566:
5567: /* Apply MRC related feature */
5568:
5569: if (p_log_level_rec.statement_level) then
5570: fa_debug_pkg.add(l_calling_fn, '+++ INS_DD_ADJ start +++', '+++', p_log_level_rec => p_log_level_rec);
5571: fa_debug_pkg.add(l_calling_fn, 'p_set_of_books_id', p_set_of_books_id, p_log_level_rec => p_log_level_rec);
5572: end if;
5573:
5574: -- Currently this function will be called only after Unplanned Depreciation for Group Level.
5567: /* Apply MRC related feature */
5568:
5569: if (p_log_level_rec.statement_level) then
5570: fa_debug_pkg.add(l_calling_fn, '+++ INS_DD_ADJ start +++', '+++', p_log_level_rec => p_log_level_rec);
5571: fa_debug_pkg.add(l_calling_fn, 'p_set_of_books_id', p_set_of_books_id, p_log_level_rec => p_log_level_rec);
5572: end if;
5573:
5574: -- Currently this function will be called only after Unplanned Depreciation for Group Level.
5575:
5850:
5851: else -- period of addition
5852:
5853: if (p_log_level_rec.statement_level) then
5854: fa_debug_pkg.add(l_calling_fn, 'period of addition', 'processed', p_log_level_rec => p_log_level_rec);
5855: end if;
5856:
5857: -- get any current deprn adjustment amount balance (not available in query bal)
5858: if (p_mrc_sob_type_code = 'R') then
5874:
5875: end if;
5876:
5877: if (p_log_level_rec.statement_level) then
5878: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec => p_log_level_rec);
5879: end if;
5880:
5881: -- calculate new value using unplanned amount as delta
5882: -- get current balance
5893:
5894: l_deprn_adjustment_amount := member.allocated_deprn_amount + nvl(l_deprn_adjustment_amount, 0);
5895:
5896: if (p_log_level_rec.statement_level) then
5897: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
5898: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5899: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
5900: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec => p_log_level_rec);
5901: end if;
5894: l_deprn_adjustment_amount := member.allocated_deprn_amount + nvl(l_deprn_adjustment_amount, 0);
5895:
5896: if (p_log_level_rec.statement_level) then
5897: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
5898: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5899: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
5900: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec => p_log_level_rec);
5901: end if;
5902:
5896: if (p_log_level_rec.statement_level) then
5897: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec => p_log_level_rec);
5898: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5899: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec => p_log_level_rec);
5900: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec => p_log_level_rec);
5901: end if;
5902:
5903: FA_DEPRN_SUMMARY_PKG.Update_Row
5904: (X_Book_Type_Code => p_asset_hdr_rec.book_type_code,
6460:
6461: begin
6462:
6463: if (p_log_level_rec.statement_level) then
6464: fa_debug_pkg.add(l_calling_fn, '+++ populate_previous_rows: Just Started +++', 'Parameters', p_log_level_rec => p_log_level_rec);
6465: fa_debug_pkg.add(l_calling_fn, 'p_book:group:period_ctr:fiscal_yr:trans_hdr_id:mrc_type',
6466: p_book_type_code||':'||p_group_asset_id||':'||p_period_counter||':'||p_fiscal_year||':'||p_transaction_header_id||':'||p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
6467: end if;
6468:
6461: begin
6462:
6463: if (p_log_level_rec.statement_level) then
6464: fa_debug_pkg.add(l_calling_fn, '+++ populate_previous_rows: Just Started +++', 'Parameters', p_log_level_rec => p_log_level_rec);
6465: fa_debug_pkg.add(l_calling_fn, 'p_book:group:period_ctr:fiscal_yr:trans_hdr_id:mrc_type',
6466: p_book_type_code||':'||p_group_asset_id||':'||p_period_counter||':'||p_fiscal_year||':'||p_transaction_header_id||':'||p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
6467: end if;
6468:
6469:
6471: open c_get_member_asset_id;
6472: fetch c_get_member_asset_id into l_member_asset_id;
6473: close c_get_member_asset_id;
6474: if (p_log_level_rec.statement_level) then
6475: fa_debug_pkg.add(l_calling_fn, 'l_member_asset_id', l_member_asset_id, p_log_level_rec => p_log_level_rec);
6476: end if;
6477: end if;
6478:
6479:
6503: h_loop_period_counter := h_period_counter;
6504: end if;
6505:
6506: if (p_log_level_rec.statement_level) then
6507: fa_debug_pkg.add(l_calling_fn, 'h_loop_period_counter', h_loop_period_counter, p_log_level_rec => p_log_level_rec);
6508: end if;
6509:
6510: if nvl(p_calling_fn,'OTHER') = 'TRACK_ASSETS' then -- Get group level info
6511: select deprn_method_code,life_in_months
6551: and DP.start_date >= FY.start_date
6552: and DP.end_date <= FY.end_date;
6553:
6554: if (p_log_level_rec.statement_level) then
6555: fa_debug_pkg.add(l_calling_fn, 'h_transaction_date from table', h_transaction_date, p_log_level_rec => p_log_level_rec);
6556: end if;
6557: -- h_transaction_date := sysdate;
6558: end if;
6559:
6559:
6560: For pop_mem in ALL_MEMBERS(h_transaction_date) loop
6561:
6562: if (p_log_level_rec.statement_level) then
6563: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (transaction_date)', h_transaction_date);
6564: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec => p_log_level_rec);
6565: end if;
6566:
6567: h_member_asset_id := pop_mem.asset_id;
6560: For pop_mem in ALL_MEMBERS(h_transaction_date) loop
6561:
6562: if (p_log_level_rec.statement_level) then
6563: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (transaction_date)', h_transaction_date);
6564: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec => p_log_level_rec);
6565: end if;
6566:
6567: h_member_asset_id := pop_mem.asset_id;
6568:
6606: h_last_trans_id := p_transaction_header_id;
6607: end if;
6608:
6609: if (p_log_level_rec.statement_level) then
6610: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment, p_log_level_rec => p_log_level_rec);
6611: fa_debug_pkg.add(l_calling_fn, 'h_last_trans_id', h_last_trans_id, p_log_level_rec => p_log_level_rec);
6612: end if;
6613:
6614: open ALL_MEMBER_FOR_ADJ_MODE(h_member_asset_id);
6607: end if;
6608:
6609: if (p_log_level_rec.statement_level) then
6610: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment, p_log_level_rec => p_log_level_rec);
6611: fa_debug_pkg.add(l_calling_fn, 'h_last_trans_id', h_last_trans_id, p_log_level_rec => p_log_level_rec);
6612: end if;
6613:
6614: open ALL_MEMBER_FOR_ADJ_MODE(h_member_asset_id);
6615: fetch ALL_MEMBER_FOR_ADJ_MODE into h_cost, h_adjusted_cost, h_recoverable_cost,
6630: h_deprn_reserve, h_ytd_deprn,
6631: h_bonus_deprn_reserve, h_bonus_ytd_deprn, h_eop_fiscal_year;
6632: if ALL_MEMBER_FOR_ADDITION%NOTFOUND then
6633: if (p_log_level_rec.statement_level) then
6634: fa_debug_pkg.add(l_calling_fn, 'No rows in FA_BOOKS of member asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
6635: end if;
6636: else
6637: i := i + 1;
6638: p_track_member_table(i).group_asset_id := h_group_asset_id;
6658: /* Populate index table */
6659: put_track_index(h_period_counter, h_member_asset_id,h_group_asset_id,p_set_of_books_id,i,p_log_level_rec);
6660:
6661: if (p_log_level_rec.statement_level) then
6662: fa_debug_pkg.add(l_calling_fn, '++ Stored values for added member asset indicator', i, p_log_level_rec => p_log_level_rec);
6663: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6664: p_log_level_rec => p_log_level_rec) then
6665: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6666: end if;
6661: if (p_log_level_rec.statement_level) then
6662: fa_debug_pkg.add(l_calling_fn, '++ Stored values for added member asset indicator', i, p_log_level_rec => p_log_level_rec);
6663: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6664: p_log_level_rec => p_log_level_rec) then
6665: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6666: end if;
6667: end if;
6668: end if;
6669: close ALL_MEMBER_FOR_ADDITION;
6680: (nvl(p_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(p_allocate_to_fully_rsv_flag,'N') = 'Y'))
6681:
6682: then
6683: if (p_log_level_rec.statement_level) then
6684: fa_debug_pkg.add('fa_track_member_pvt', '++ In case when member asset is queried ++ ', i, p_log_level_rec => p_log_level_rec);
6685: end if;
6686: if h_eop_fiscal_year = h_fiscal_year then
6687: h_eofy_reserve := nvl(h_eofy_reserve,0) + nvl(h_eofy_reserve_adjustment,0) + nvl(h_adj_reserve,0);
6688: end if;
6696: p_track_member_eofy_table(j).member_asset_id = h_member_asset_id and
6697: nvl(p_track_member_eofy_table(j).set_of_books_id,-99) = nvl(p_set_of_books_id, -99) then
6698: -- p_track_member_eofy_table(j).fiscal_year = h_fiscal_year then
6699: if (p_log_level_rec.statement_level) then
6700: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table('||j||').cost:salvage:rec_cost:adj_cost:eofy_reserve',
6701: p_track_member_eofy_table(j).cost||':'||p_track_member_eofy_table(j).salvage_value||':'||
6702: p_track_member_eofy_table(j).recoverable_cost||':'||p_track_member_eofy_table(j).adjusted_cost||':'||
6703: p_track_member_eofy_table(j).eofy_reserve);
6704: end if;
6755:
6756: end if; -- This is an asset to be processed
6757: close ALL_MEMBER_FOR_ADJ_MODE;
6758: if (p_log_level_rec.statement_level) then
6759: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec => p_log_level_rec);
6760: if i > 0 then
6761: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6762: p_log_level_rec => p_log_level_rec) then
6763: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6759: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec => p_log_level_rec);
6760: if i > 0 then
6761: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6762: p_log_level_rec => p_log_level_rec) then
6763: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6764: end if;
6765: end if;
6766: end if;
6767: <
6829: and DP.start_date >= FY.start_date
6830: and DP.end_date <= FY.end_date;
6831:
6832: if (p_log_level_rec.statement_level) then
6833: fa_debug_pkg.add(l_calling_fn, 'h_transaction_date from table', h_transaction_date, p_log_level_rec => p_log_level_rec);
6834: end if;
6835: -- h_transaction_date := sysdate;
6836: end if;
6837:
6839:
6840: h_member_asset_id := pop_mem.asset_id;
6841:
6842: if (p_log_level_rec.statement_level) then
6843: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (Reporting Book/transaction_date)',
6844: h_transaction_date);
6845: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec => p_log_level_rec);
6846: end if;
6847:
6841:
6842: if (p_log_level_rec.statement_level) then
6843: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (Reporting Book/transaction_date)',
6844: h_transaction_date);
6845: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec => p_log_level_rec);
6846: end if;
6847:
6848: -- Check if selected member asset is the asset to be processed or not.
6849: -- Support backdated addition with reserve case.
6875: close FA_ADJ_RESERVE_MRC;
6876:
6877: h_eofy_reserve_adjustment := nvl(h_eofy_reserve_adjustment,0);
6878: if (p_log_level_rec.statement_level) then
6879: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment, p_log_level_rec => p_log_level_rec);
6880: end if;
6881:
6882:
6883:
6900: h_deprn_reserve, h_ytd_deprn,
6901: h_bonus_deprn_reserve, h_bonus_ytd_deprn, h_eop_fiscal_year;
6902: if ALL_MEMBER_FOR_ADDITION_MRC%NOTFOUND then
6903: if (p_log_level_rec.statement_level) then
6904: fa_debug_pkg.add(l_calling_fn, 'No rows in FA_BOOKS(Reporting Book) of member asset', h_member_asset_id);
6905: end if;
6906: i := i + 1;
6907: p_track_member_table(i).group_asset_id := h_group_asset_id;
6908: p_track_member_table(i).member_asset_id := h_member_asset_id;
6927: /* Populate index table */
6928: put_track_index(h_period_counter, h_member_asset_id,h_group_asset_id,p_set_of_books_id,i, p_log_level_rec);
6929:
6930: if (p_log_level_rec.statement_level) then
6931: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec => p_log_level_rec);
6932: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6933: p_log_level_rec=> p_log_level_rec) then
6934: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6935: end if;
6930: if (p_log_level_rec.statement_level) then
6931: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec => p_log_level_rec);
6932: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6933: p_log_level_rec=> p_log_level_rec) then
6934: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
6935: end if;
6936: end if;
6937: end if;
6938: close ALL_MEMBER_FOR_ADDITION_MRC;
6950: (nvl(p_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(p_allocate_to_fully_rsv_flag,'N') = 'Y'))
6951:
6952: then
6953: if (p_log_level_rec.statement_level) then
6954: fa_debug_pkg.add('fa_track_member_pvt', '++ In case when member asset is queried ++ ', i, p_log_level_rec => p_log_level_rec);
6955: end if;
6956: if h_eop_fiscal_year = h_fiscal_year then
6957: h_eofy_reserve := nvl(h_eofy_reserve,0) + nvl(h_eofy_reserve_adjustment,0) + nvl(h_adj_reserve,0);
6958: end if;
6966: p_track_member_eofy_table(j).member_asset_id = h_member_asset_id and
6967: nvl(p_track_member_eofy_table(j).set_of_books_id, -99) = nvl(p_set_of_books_id, -99) then
6968: -- p_track_member_eofy_table(j).fiscal_year = h_fiscal_year then
6969: if (p_log_level_rec.statement_level) then
6970: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table('||j||').cost:salvage:rec_cost:adj_cost:eofy_reserve',
6971: p_track_member_eofy_table(j).cost||':'||p_track_member_eofy_table(j).salvage_value||':'||
6972: p_track_member_eofy_table(j).recoverable_cost||':'||p_track_member_eofy_table(j).adjusted_cost||':'||
6973: p_track_member_eofy_table(j).eofy_reserve);
6974: end if;
7026:
7027: end if; -- This is an asset to be processed
7028: close ALL_MEMBER_FOR_ADJ_MODE_MRC;
7029: if (p_log_level_rec.statement_level) then
7030: fa_debug_pkg.add(l_calling_fn, '+++ Stored values (For MRC book) indicator ', i);
7031: if i > 0 then
7032: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec=> p_log_level_rec) then
7033: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7034: end if;
7029: if (p_log_level_rec.statement_level) then
7030: fa_debug_pkg.add(l_calling_fn, '+++ Stored values (For MRC book) indicator ', i);
7031: if i > 0 then
7032: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec=> p_log_level_rec) then
7033: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7034: end if;
7035: end if;
7036: end if;
7037: <
7291:
7292: begin
7293:
7294: if (p_log_level_rec.statement_level) then
7295: fa_debug_pkg.add(l_calling_fn, '+++ Get Member at Start ++ started', 'Parameters', p_log_level_rec => p_log_level_rec);
7296: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id:mem_thid',
7297: p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id||':'||p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
7298: end if;
7299:
7292: begin
7293:
7294: if (p_log_level_rec.statement_level) then
7295: fa_debug_pkg.add(l_calling_fn, '+++ Get Member at Start ++ started', 'Parameters', p_log_level_rec => p_log_level_rec);
7296: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id:mem_thid',
7297: p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id||':'||p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
7298: end if;
7299:
7300: p_track_member_table.delete;
7324: from fa_book_controls
7325: where book_type_code = h_book_type_code;
7326:
7327: if (p_log_level_rec.statement_level) then
7328: fa_debug_pkg.add(l_calling_fn, 'h_fiscal_year_name:h_calendar_type', h_fiscal_year_name||':'||h_calendar_type, p_log_level_rec => p_log_level_rec);
7329: end if;
7330:
7331:
7332: --* Need to call deprn basis rule to get correct adjusted cost at the loop start period.
7331:
7332: --* Need to call deprn basis rule to get correct adjusted cost at the loop start period.
7333: -- Followings are preparation to call faxcdb
7334: if (p_log_level_rec.statement_level) then
7335: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec => p_log_level_rec);
7336: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7337: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec => p_log_level_rec);
7338: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***');
7339: end if;
7332: --* Need to call deprn basis rule to get correct adjusted cost at the loop start period.
7333: -- Followings are preparation to call faxcdb
7334: if (p_log_level_rec.statement_level) then
7335: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec => p_log_level_rec);
7336: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7337: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec => p_log_level_rec);
7338: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***');
7339: end if;
7340:
7334: if (p_log_level_rec.statement_level) then
7335: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec => p_log_level_rec);
7336: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7337: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec => p_log_level_rec);
7338: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***');
7339: end if;
7340:
7341: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
7342: X_life => h_life_in_months, p_log_level_rec => p_log_level_rec) then
7340:
7341: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
7342: X_life => h_life_in_months, p_log_level_rec => p_log_level_rec) then
7343: if (p_log_level_rec.statement_level) then
7344: fa_debug_pkg.add(l_calling_fn, '++ fa_cache_pkg.fazccmt is errored out ++', '+++', p_log_level_rec => p_log_level_rec);
7345: end if;
7346: raise get_member_at_start_err;
7347: end if;
7348:
7403: i := i + 1; -- Count up for subscript
7404: h_member_asset_id := get_member.member_asset_id;
7405:
7406: if (p_log_level_rec.statement_level) then
7407: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id);
7408: fa_debug_pkg.add(l_calling_fn, 'h_mem_trans_thid', h_mem_trans_thid, p_log_level_rec => p_log_level_rec);
7409: end if;
7410:
7411: --* Check if this transaction is reclass and this member asset is now reclassed or not
7404: h_member_asset_id := get_member.member_asset_id;
7405:
7406: if (p_log_level_rec.statement_level) then
7407: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id);
7408: fa_debug_pkg.add(l_calling_fn, 'h_mem_trans_thid', h_mem_trans_thid, p_log_level_rec => p_log_level_rec);
7409: end if;
7410:
7411: --* Check if this transaction is reclass and this member asset is now reclassed or not
7412: if h_mem_trans_thid <> -99 then
7418: elsif h_new_group_asset_id is null then
7419: -- Now this asset becomes single asset. Don't need to include the calculation
7420: close RECLASS_TRANS_CHECK;
7421: if (p_log_level_rec.statement_level) then
7422: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec => p_log_level_rec);
7423: end if;
7424: goto skip_processing;
7425: elsif h_new_group_asset_id <> h_group_asset_id then -- This is a case of reclass and this asset is now going to other group
7426: close RECLASS_TRANS_CHECK;
7424: goto skip_processing;
7425: elsif h_new_group_asset_id <> h_group_asset_id then -- This is a case of reclass and this asset is now going to other group
7426: close RECLASS_TRANS_CHECK;
7427: if (p_log_level_rec.statement_level) then
7428: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec => p_log_level_rec);
7429: end if;
7430: goto skip_processing;
7431: end if;
7432: close RECLASS_TRANS_CHECK;
7465: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
7466: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7467:
7468: if (p_log_level_rec.statement_level) then
7469: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
7470: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_recoverable_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7471: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7472: end if;
7473: End loop;
7466: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7467:
7468: if (p_log_level_rec.statement_level) then
7469: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
7470: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_recoverable_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7471: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7472: end if;
7473: End loop;
7474:
7467:
7468: if (p_log_level_rec.statement_level) then
7469: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
7470: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_recoverable_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7471: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7472: end if;
7473: End loop;
7474:
7475: if (p_log_level_rec.statement_level) then
7472: end if;
7473: End loop;
7474:
7475: if (p_log_level_rec.statement_level) then
7476: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR ALL_TRANS_IN_PERIOD ****', '****');
7477: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7478: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
7479: end if;
7480:
7473: End loop;
7474:
7475: if (p_log_level_rec.statement_level) then
7476: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR ALL_TRANS_IN_PERIOD ****', '****');
7477: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7478: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
7479: end if;
7480:
7481: --* Set old amounts as zero since this process will be made for just start period
7495: if GET_RESERVE_AT_ADDITION%NOTFOUND then
7496:
7497: -- Set zero initial reserve
7498: if (p_log_level_rec.statement_level) then
7499: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
7500: h_member_asset_id, p_log_level_rec => p_log_level_rec);
7501: end if;
7502:
7503: h_ytd_deprn := 0;
7506: elsif h_deprn_source_code <> 'BOOK' then
7507: -- Set zero initial reserve
7508:
7509: if (p_log_level_rec.statement_level) then
7510: fa_debug_pkg.add(l_calling_fn, 'This Member asset record', h_deprn_source_code, p_log_level_rec => p_log_level_rec);
7511: end if;
7512:
7513: h_ytd_deprn := 0;
7514: h_deprn_reserve := 0;
7516: end if;
7517: close GET_RESERVE_AT_ADDITION;
7518:
7519: if (p_log_level_rec.statement_level) then
7520: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec => p_log_level_rec);
7521: end if;
7522: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
7523: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
7524: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
7560: h_new_adjusted_rec_cost := h_new_deprn_limit_amount;
7561: end if;
7562:
7563: if (p_log_level_rec.statement_level) then
7564: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7565: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
7566: end if;
7567:
7568: -- Get Asset type
7595: if (p_log_level_rec.statement_level) then
7596: if not display_debug_message(fa_rule_in => fa_rule_in,
7597: p_calling_fn => l_calling_fn,
7598: p_log_level_rec => p_log_level_rec) then
7599: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7600: end if;
7601: end if;
7602:
7603: -- Call Deprn Basis Rule for this transaction or period
7603: -- Call Deprn Basis Rule for this transaction or period
7604: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
7605: rule_out => fa_rule_out, p_log_level_rec => p_log_level_rec)) then
7606: if (p_log_level_rec.statement_level) then
7607: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec => p_log_level_rec);
7608: end if;
7609: raise get_member_at_start_err;
7610: end if;
7611:
7613: p_track_member_table(l_new_ind).fully_reserved_flag := NULL;
7614: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7615:
7616: if (p_log_level_rec.statement_level) then
7617: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
7618: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
7619: end if;
7620:
7621: --* Set calculated adjusted cost into p_track_member_table
7614: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7615:
7616: if (p_log_level_rec.statement_level) then
7617: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
7618: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
7619: end if;
7620:
7621: --* Set calculated adjusted cost into p_track_member_table
7622: p_track_member_table(l_new_ind).cost := h_new_cost;
7625: p_track_member_table(l_new_ind).adjusted_cost := fa_rule_out.new_adjusted_cost;
7626: p_track_member_table(l_new_ind).adjusted_recoverable_cost := h_new_adjusted_rec_cost;
7627:
7628: if (p_log_level_rec.statement_level) then
7629: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i);
7630: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
7631: p_log_level_rec => p_log_level_rec) then
7632: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7633: end if;
7628: if (p_log_level_rec.statement_level) then
7629: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i);
7630: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
7631: p_log_level_rec => p_log_level_rec) then
7632: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7633: end if;
7634: end if;
7635:
7636: <
7634: end if;
7635:
7636: <
7637: if (p_log_level_rec.statement_level) then
7638: fa_debug_pkg.add(l_calling_fn, '++ End of Loop ++', i, p_log_level_rec => p_log_level_rec);
7639: end if;
7640:
7641: end loop;
7642:
7647: i := i + 1; -- Count up for subscript
7648: h_member_asset_id := get_member.member_asset_id;
7649:
7650: if (p_log_level_rec.statement_level) then
7651: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id);
7652: end if;
7653:
7654: --* Check if this transaction is reclass and this member asset is now reclassed or not
7655: if h_mem_trans_thid <> -99 then
7660: elsif h_new_group_asset_id is null then
7661: -- Now this asset becomes single asset. Don't need to include the calculation
7662: close RECLASS_TRANS_CHECK;
7663: if (p_log_level_rec.statement_level) then
7664: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec => p_log_level_rec);
7665: end if;
7666: goto skip_processing;
7667: elsif h_new_group_asset_id <> h_group_asset_id then -- This is a case of reclass and this asset is now going to other group
7668: close RECLASS_TRANS_CHECK;
7666: goto skip_processing;
7667: elsif h_new_group_asset_id <> h_group_asset_id then -- This is a case of reclass and this asset is now going to other group
7668: close RECLASS_TRANS_CHECK;
7669: if (p_log_level_rec.statement_level) then
7670: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec => p_log_level_rec);
7671: end if;
7672: goto skip_processing;
7673: end if;
7674: close RECLASS_TRANS_CHECK;
7707: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
7708: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7709:
7710: if (p_log_level_rec.statement_level) then
7711: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id);
7712: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7713: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7714: end if;
7715: End loop;
7708: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7709:
7710: if (p_log_level_rec.statement_level) then
7711: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id);
7712: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7713: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7714: end if;
7715: End loop;
7716:
7709:
7710: if (p_log_level_rec.statement_level) then
7711: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id);
7712: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
7713: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage_value', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
7714: end if;
7715: End loop;
7716:
7717: if (p_log_level_rec.statement_level) then
7714: end if;
7715: End loop;
7716:
7717: if (p_log_level_rec.statement_level) then
7718: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****');
7719: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7720: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
7721: end if;
7722:
7715: End loop;
7716:
7717: if (p_log_level_rec.statement_level) then
7718: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****');
7719: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7720: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
7721: end if;
7722:
7723: --* Set old amounts as zero since this process will be made for just start period
7737: if GET_RESERVE_AT_ADDITION_MRC%NOTFOUND then
7738: -- Set zero initial reserve
7739:
7740: if (p_log_level_rec.statement_level) then
7741: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
7742: h_member_asset_id, p_log_level_rec => p_log_level_rec);
7743: end if;
7744:
7745: h_ytd_deprn := 0;
7748: elsif h_deprn_source_code <> 'BOOK' then
7749: -- Set zero initial reserve
7750:
7751: if (p_log_level_rec.statement_level) then
7752: fa_debug_pkg.add(l_calling_fn, 'This Member asset record', h_deprn_source_code, p_log_level_rec => p_log_level_rec);
7753: end if;
7754:
7755: h_ytd_deprn := 0;
7756: h_deprn_reserve := 0;
7758: end if;
7759: close GET_RESERVE_AT_ADDITION_MRC;
7760:
7761: if (p_log_level_rec.statement_level) then
7762: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec => p_log_level_rec);
7763: end if;
7764: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
7765: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
7766: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
7802: h_new_adjusted_rec_cost := h_new_deprn_limit_amount;
7803: end if;
7804:
7805: if (p_log_level_rec.statement_level) then
7806: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
7807: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7808: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
7809: end if;
7810:
7803: end if;
7804:
7805: if (p_log_level_rec.statement_level) then
7806: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
7807: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7808: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
7809: end if;
7810:
7811: -- Get Asset type
7838: if (p_log_level_rec.statement_level) then
7839: if not display_debug_message(fa_rule_in => fa_rule_in,
7840: p_calling_fn => l_calling_fn,
7841: p_log_level_rec => p_log_level_rec) then
7842: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7843: end if;
7844: end if;
7845:
7846: -- Call Deprn Basis Rule for this transaction or period
7846: -- Call Deprn Basis Rule for this transaction or period
7847: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
7848: rule_out => fa_rule_out, p_log_level_rec => p_log_level_rec)) then
7849: if (p_log_level_rec.statement_level) then
7850: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec => p_log_level_rec);
7851: end if;
7852: raise get_member_at_start_err;
7853: end if;
7854:
7856: p_track_member_table(l_new_ind).fully_reserved_flag := NULL;
7857: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7858:
7859: if (p_log_level_rec.statement_level) then
7860: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
7861: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
7862: end if;
7863:
7864: --* Set calculated adjusted cost into p_track_member_table
7857: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7858:
7859: if (p_log_level_rec.statement_level) then
7860: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
7861: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
7862: end if;
7863:
7864: --* Set calculated adjusted cost into p_track_member_table
7865: p_track_member_table(l_new_ind).cost := h_new_cost;
7868: p_track_member_table(l_new_ind).adjusted_cost := fa_rule_out.new_adjusted_cost;
7869: p_track_member_table(l_new_ind).adjusted_recoverable_cost := h_new_adjusted_rec_cost;
7870:
7871: if (p_log_level_rec.statement_level) then
7872: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i);
7873: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
7874: p_log_level_rec=> p_log_level_rec) then
7875: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7876: end if;
7871: if (p_log_level_rec.statement_level) then
7872: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i);
7873: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
7874: p_log_level_rec=> p_log_level_rec) then
7875: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
7876: end if;
7877: end if;
7878:
7879: <
7877: end if;
7878:
7879: <
7880: if (p_log_level_rec.statement_level) then
7881: fa_debug_pkg.add(l_calling_fn, '++ End of Loop ++', i, p_log_level_rec => p_log_level_rec);
7882: end if;
7883:
7884: end loop;
7885:
7980:
7981: begin
7982:
7983: if (p_log_level_rec.statement_level) then
7984: fa_debug_pkg.add('fa_track_member_pvt', '*** update_member_books Started', '***');
7985: fa_debug_pkg.add('fa_track_member_pvt', 'book_type_code:group_asset_id', p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
7986: end if;
7987:
7988: h_book_type_code := p_asset_hdr_rec.book_type_code;
7981: begin
7982:
7983: if (p_log_level_rec.statement_level) then
7984: fa_debug_pkg.add('fa_track_member_pvt', '*** update_member_books Started', '***');
7985: fa_debug_pkg.add('fa_track_member_pvt', 'book_type_code:group_asset_id', p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
7986: end if;
7987:
7988: h_book_type_code := p_asset_hdr_rec.book_type_code;
7989: h_group_asset_id := p_asset_hdr_rec.asset_id;
7995: open c_get_member_asset_id;
7996: fetch c_get_member_asset_id into l_member_asset_id;
7997: close c_get_member_asset_id;
7998: if (p_log_level_rec.statement_level) then
7999: fa_debug_pkg.add(l_calling_fn, 'l_member_asset_id', l_member_asset_id, p_log_level_rec => p_log_level_rec);
8000: end if;
8001: end if;
8002:
8003:
8001: end if;
8002:
8003:
8004: if (p_log_level_rec.statement_level) then
8005: fa_debug_pkg.add(l_calling_fn, 'fiscal_year:period_num', h_fiscal_year||':'||h_period_num, p_log_level_rec => p_log_level_rec);
8006: end if;
8007:
8008: /* Apply MRC related feature */
8009: if p_mrc_sob_type_code <> 'R' then
8020:
8021: h_period_counter := h_period_counter + 1;
8022:
8023: if (p_log_level_rec.statement_level) then
8024: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id:period_counter', h_set_of_books_id||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
8025: end if;
8026:
8027: -- Query member assets from FA_BOOKS with current date
8028: if p_mrc_sob_type_code <> 'R' then
8062: h_adjusted_cost := nvl(p_track_member_table(i).adjusted_cost,0);
8063: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8064:
8065: if (p_log_level_rec.statement_level) then
8066: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8067: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8068: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8069: end if;
8070:
8063: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8064:
8065: if (p_log_level_rec.statement_level) then
8066: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8067: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8068: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8069: end if;
8070:
8071: -- Update FA_BOOKS table
8064:
8065: if (p_log_level_rec.statement_level) then
8066: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8067: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8068: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8069: end if;
8070:
8071: -- Update FA_BOOKS table
8072: Update FA_BOOKS set adjusted_cost = h_adjusted_cost,
8142: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
8143: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8144:
8145: if (p_log_level_rec.statement_level) then
8146: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8147: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8148: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8149: end if;
8150:
8143: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8144:
8145: if (p_log_level_rec.statement_level) then
8146: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8147: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8148: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8149: end if;
8150:
8151: -- Update FA_BOOKS table
8144:
8145: if (p_log_level_rec.statement_level) then
8146: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec => p_log_level_rec);
8147: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec => p_log_level_rec);
8148: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8149: end if;
8150:
8151: -- Update FA_BOOKS table
8152: Update FA_MC_BOOKS set adjusted_cost = h_adjusted_cost,
8259:
8260: begin
8261:
8262: if (p_log_level_rec.statement_level) then
8263: fa_debug_pkg.add(l_calling_fn, '++++ member_eofy_rsv:Just Started ++++', '++++++', p_log_level_rec => p_log_level_rec);
8264: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id', p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
8265: end if;
8266:
8267: h_book_type_code := p_asset_hdr_rec.book_type_code;
8260: begin
8261:
8262: if (p_log_level_rec.statement_level) then
8263: fa_debug_pkg.add(l_calling_fn, '++++ member_eofy_rsv:Just Started ++++', '++++++', p_log_level_rec => p_log_level_rec);
8264: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id', p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id, p_log_level_rec => p_log_level_rec);
8265: end if;
8266:
8267: h_book_type_code := p_asset_hdr_rec.book_type_code;
8268: h_group_asset_id := p_asset_hdr_rec.asset_id;
8269: h_fiscal_year := p_dpr_in.y_end;
8270: h_period_num := p_dpr_in.p_cl_end;
8271:
8272: if (p_log_level_rec.statement_level) then
8273: fa_debug_pkg.add(l_calling_fn, 'fiscal_year:period_num', h_fiscal_year||':'||h_period_num, p_log_level_rec => p_log_level_rec);
8274: end if;
8275:
8276: /* Apply MRC related feature */
8277: if p_mrc_sob_type_code <> 'R' then
8287:
8288: h_period_counter := h_period_counter + 1;
8289:
8290: if (p_log_level_rec.statement_level) then
8291: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id:period_counter', h_set_of_books_id||':'||h_period_counter, p_log_level_rec => p_log_level_rec);
8292: end if;
8293:
8294: if nvl(p_track_member_eofy_table.count,0) > 0 then
8295: p_track_member_eofy_table.delete;
8293:
8294: if nvl(p_track_member_eofy_table.count,0) > 0 then
8295: p_track_member_eofy_table.delete;
8296: if (p_log_level_rec.statement_level) then
8297: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table is deleted', 1, p_log_level_rec => p_log_level_rec);
8298: end if;
8299: end if;
8300:
8301: j := 0;
8313: h_recoverable_cost := p_track_member_table(i).recoverable_cost;
8314: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
8315: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8316: if (p_log_level_rec.statement_level) then
8317: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec => p_log_level_rec);
8318: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id:group_asset_id:member_asset_id', h_set_of_books_id||':'||h_group_asset_id||':'||h_member_asset_id, p_log_level_rec => p_log_level_rec);
8319: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec => p_log_level_rec);
8320: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8321: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8314: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
8315: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8316: if (p_log_level_rec.statement_level) then
8317: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec => p_log_level_rec);
8318: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id:group_asset_id:member_asset_id', h_set_of_books_id||':'||h_group_asset_id||':'||h_member_asset_id, p_log_level_rec => p_log_level_rec);
8319: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec => p_log_level_rec);
8320: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8321: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8322: end if;
8315: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8316: if (p_log_level_rec.statement_level) then
8317: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec => p_log_level_rec);
8318: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id:group_asset_id:member_asset_id', h_set_of_books_id||':'||h_group_asset_id||':'||h_member_asset_id, p_log_level_rec => p_log_level_rec);
8319: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec => p_log_level_rec);
8320: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8321: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8322: end if;
8323:
8316: if (p_log_level_rec.statement_level) then
8317: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec => p_log_level_rec);
8318: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id:group_asset_id:member_asset_id', h_set_of_books_id||':'||h_group_asset_id||':'||h_member_asset_id, p_log_level_rec => p_log_level_rec);
8319: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec => p_log_level_rec);
8320: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8321: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec => p_log_level_rec);
8322: end if;
8323:
8324: p_track_member_eofy_table(j).group_asset_id := h_group_asset_id;
9083: where mth.transaction_header_id = p_trans_rec.member_transaction_header_id;
9084:
9085: BEGIN
9086: if (p_log_level_rec.statement_level) then
9087: fa_debug_pkg.add(l_calling_fn, '+++ Populate Member Assets Table ++ is Started ++', '+++', p_log_level_rec => p_log_level_rec);
9088: fa_debug_pkg.add(l_calling_fn, 'p_populate_for_recalc_period', p_populate_for_recalc_period, p_log_level_rec => p_log_level_rec);
9089: end if;
9090:
9091: -- Get basic information from input parameters
9084:
9085: BEGIN
9086: if (p_log_level_rec.statement_level) then
9087: fa_debug_pkg.add(l_calling_fn, '+++ Populate Member Assets Table ++ is Started ++', '+++', p_log_level_rec => p_log_level_rec);
9088: fa_debug_pkg.add(l_calling_fn, 'p_populate_for_recalc_period', p_populate_for_recalc_period, p_log_level_rec => p_log_level_rec);
9089: end if;
9090:
9091: -- Get basic information from input parameters
9092: h_book_type_code := p_asset_hdr_rec.book_type_code;
9100: open c_get_member_asset_id;
9101: fetch c_get_member_asset_id into l_member_asset_id;
9102: close c_get_member_asset_id;
9103: if (p_log_level_rec.statement_level) then
9104: fa_debug_pkg.add(l_calling_fn, 'l_member_asset_id', l_member_asset_id, p_log_level_rec => p_log_level_rec);
9105: end if;
9106: end if;
9107:
9108: -- Query Group Asset DPIS' period counter and amort date's period counter from FA_BOOKS
9111: from fa_book_controls
9112: where book_type_code = h_book_type_code;
9113:
9114: if (p_log_level_rec.statement_level) then
9115: fa_debug_pkg.add(l_calling_fn, 'h_deprn_calendar:h_fiscal_year_name',
9116: h_deprn_calendar||':'||h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
9117: end if;
9118:
9119: if not fa_cache_pkg.fazcct(h_deprn_calendar, p_log_level_rec => p_log_level_rec) then
9117: end if;
9118:
9119: if not fa_cache_pkg.fazcct(h_deprn_calendar, p_log_level_rec => p_log_level_rec) then
9120: if (p_log_level_rec.statement_level) then
9121: fa_debug_pkg.add(l_calling_fn, 'Calendar Cache call is failed', '+++', p_log_level_rec => p_log_level_rec);
9122: end if;
9123: raise pop_mem_table_err;
9124: end if;
9125:
9131: if GET_FY_PERDNUM%NOTFOUND then
9132: close GET_FY_PERDNUM;
9133:
9134: if (p_log_level_rec.statement_level) then
9135: fa_debug_pkg.add(l_calling_fn, '++ No record is found for the date (1)', p_amort_start_date);
9136: end if;
9137:
9138: raise pop_mem_table_err;
9139:
9155: if GET_FY_PERDNUM%NOTFOUND then
9156: close GET_FY_PERDNUM;
9157:
9158: if (p_log_level_rec.statement_level) then
9159: fa_debug_pkg.add(l_calling_fn, '++ No record is found for the date (2)', h_group_dpis);
9160: end if;
9161: raise pop_mem_table_err;
9162: end if;
9163:
9219: -- can allocate new amounts correctly.
9220: h_length_of_loop := h_recalc_period_counter - h_group_dpis_period_counter + 1;
9221:
9222: if (p_log_level_rec.statement_level) then
9223: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec => p_log_level_rec);
9224: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec => p_log_level_rec);
9225: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec => p_log_level_rec);
9226: end if;
9227:
9220: h_length_of_loop := h_recalc_period_counter - h_group_dpis_period_counter + 1;
9221:
9222: if (p_log_level_rec.statement_level) then
9223: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec => p_log_level_rec);
9224: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec => p_log_level_rec);
9225: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec => p_log_level_rec);
9226: end if;
9227:
9228: -- Now loop between h_group_dpis_period_counter and h_prv_period_counter to populate
9221:
9222: if (p_log_level_rec.statement_level) then
9223: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec => p_log_level_rec);
9224: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec => p_log_level_rec);
9225: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec => p_log_level_rec);
9226: end if;
9227:
9228: -- Now loop between h_group_dpis_period_counter and h_prv_period_counter to populate
9229: -- member assets amounts
9238: h_processing_fiscal_year := h_processing_fiscal_year + 1;
9239: end if;
9240:
9241: if (p_log_level_rec.statement_level) then
9242: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter:fiscal_year:period_num',
9243: h_processing_period_counter||':'||h_processing_fiscal_year||':'||
9244: h_processing_period_num, p_log_level_rec => p_log_level_rec);
9245: end if;
9246:
9302: end if; -- (if processing period counter >= amort period counter)
9303:
9304: if (p_log_level_rec.statement_level) then
9305: if (h_find_flag_1) then
9306: fa_debug_pkg.add(l_calling_fn, 'Memory Table has data for this asset', '+++', p_log_level_rec => p_log_level_rec);
9307: else
9308: fa_debug_pkg.add(l_calling_fn, 'Need to query fa_books_summary table due to no data in'||
9309: ' memory table','+++', p_log_level_rec => p_log_level_rec);
9310: end if;
9304: if (p_log_level_rec.statement_level) then
9305: if (h_find_flag_1) then
9306: fa_debug_pkg.add(l_calling_fn, 'Memory Table has data for this asset', '+++', p_log_level_rec => p_log_level_rec);
9307: else
9308: fa_debug_pkg.add(l_calling_fn, 'Need to query fa_books_summary table due to no data in'||
9309: ' memory table','+++', p_log_level_rec => p_log_level_rec);
9310: end if;
9311: end if;
9312:
9312:
9313: if not (h_find_flag_1) then -- there is no record for this group asset/period in global variables.
9314:
9315: if (p_log_level_rec.statement_level) then
9316: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter', h_processing_period_counter, p_log_level_rec => p_log_level_rec);
9317: fa_debug_pkg.add(l_calling_fn, 'p_mrc_sob_type_code', p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
9318: end if;
9319:
9320: if p_mrc_sob_type_code <> 'R' then
9313: if not (h_find_flag_1) then -- there is no record for this group asset/period in global variables.
9314:
9315: if (p_log_level_rec.statement_level) then
9316: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter', h_processing_period_counter, p_log_level_rec => p_log_level_rec);
9317: fa_debug_pkg.add(l_calling_fn, 'p_mrc_sob_type_code', p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
9318: end if;
9319:
9320: if p_mrc_sob_type_code <> 'R' then
9321: --* Query Group Asset information for this processing period
9390: end if;
9391: end if;
9392:
9393: if (p_log_level_rec.statement_level) then
9394: fa_debug_pkg.add(l_calling_fn, 'h_deprn_method_code:h_life_in_months',
9395: h_deprn_method_code||':'||h_life_in_months, p_log_level_rec => p_log_level_rec);
9396: end if;
9397:
9398: --* Prepare Cache for Method information
9400: h_old_deprn_method_code <> h_deprn_method_code and
9401: nvl(h_old_life_in_months,-99) <> nvl(h_life_in_months,-99) then
9402:
9403: if (p_log_level_rec.statement_level) then
9404: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***');
9405: end if;
9406:
9407: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
9408: X_life => h_life_in_months, p_log_level_rec => p_log_level_rec) then
9406:
9407: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
9408: X_life => h_life_in_months, p_log_level_rec => p_log_level_rec) then
9409: if (p_log_level_rec.statement_level) then
9410: fa_debug_pkg.add(l_calling_fn, '++ fa_cache_pkg.fazccmt is errored out ++', '+++', p_log_level_rec => p_log_level_rec);
9411: end if;
9412:
9413: raise pop_mem_table_err;
9414: end if;
9423: --* Get system deprn amount if subtraction flag is 'Y'
9424: if nvl(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') = 'Y' then
9425:
9426: if (p_log_level_rec.statement_level) then
9427: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (1)' , '+++');
9428: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year', h_processing_fiscal_year, p_log_level_rec => p_log_level_rec);
9429: end if;
9430:
9431: h_first_period_counter := NULL;
9424: if nvl(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') = 'Y' then
9425:
9426: if (p_log_level_rec.statement_level) then
9427: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (1)' , '+++');
9428: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year', h_processing_fiscal_year, p_log_level_rec => p_log_level_rec);
9429: end if;
9430:
9431: h_first_period_counter := NULL;
9432: h_temp_system_deprn_amount := 0;
9442: h_first_period_counter := fa_amort_pvt.t_period_counter(m);
9443: end if;
9444:
9445: if (p_log_level_rec.statement_level) then
9446: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++');
9447: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m));
9448: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m));
9449: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9450: fa_amort_pvt.t_system_bonus_deprn_amount(m));
9443: end if;
9444:
9445: if (p_log_level_rec.statement_level) then
9446: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++');
9447: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m));
9448: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m));
9449: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9450: fa_amort_pvt.t_system_bonus_deprn_amount(m));
9451: end if;
9444:
9445: if (p_log_level_rec.statement_level) then
9446: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++');
9447: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m));
9448: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m));
9449: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9450: fa_amort_pvt.t_system_bonus_deprn_amount(m));
9451: end if;
9452:
9445: if (p_log_level_rec.statement_level) then
9446: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++');
9447: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m));
9448: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m));
9449: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9450: fa_amort_pvt.t_system_bonus_deprn_amount(m));
9451: end if;
9452:
9453: h_temp_system_deprn_amount := nvl(h_temp_system_deprn_amount,0) + nvl(fa_amort_pvt.t_system_deprn_amount(m),0);
9453: h_temp_system_deprn_amount := nvl(h_temp_system_deprn_amount,0) + nvl(fa_amort_pvt.t_system_deprn_amount(m),0);
9454: h_temp_system_bonus_deprn := nvl(h_temp_system_bonus_deprn,0) + nvl(fa_amort_pvt.t_system_bonus_deprn_amount(m),0);
9455:
9456: if (p_log_level_rec.statement_level) then
9457: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++');
9458: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec => p_log_level_rec);
9459: fa_debug_pkg.add(l_calling_fn, 'h_temp_system_deprn:bonus_amount', h_temp_system_deprn_amount||':'||h_temp_system_bonus_deprn, p_log_level_rec => p_log_level_rec);
9460: end if;
9461: end if;
9454: h_temp_system_bonus_deprn := nvl(h_temp_system_bonus_deprn,0) + nvl(fa_amort_pvt.t_system_bonus_deprn_amount(m),0);
9455:
9456: if (p_log_level_rec.statement_level) then
9457: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++');
9458: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec => p_log_level_rec);
9459: fa_debug_pkg.add(l_calling_fn, 'h_temp_system_deprn:bonus_amount', h_temp_system_deprn_amount||':'||h_temp_system_bonus_deprn, p_log_level_rec => p_log_level_rec);
9460: end if;
9461: end if;
9462: End Loop;
9455:
9456: if (p_log_level_rec.statement_level) then
9457: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++');
9458: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec => p_log_level_rec);
9459: fa_debug_pkg.add(l_calling_fn, 'h_temp_system_deprn:bonus_amount', h_temp_system_deprn_amount||':'||h_temp_system_bonus_deprn, p_log_level_rec => p_log_level_rec);
9460: end if;
9461: end if;
9462: End Loop;
9463:
9486:
9487: end if;
9488:
9489: if (p_log_level_rec.statement_level) then
9490: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (3)' , '+++');
9491: fa_debug_pkg.add(l_calling_fn, 'h_group_system_deprn:bonus_amount', h_group_system_deprn_amount||':'||h_group_system_bonus_deprn, p_log_level_rec => p_log_level_rec);
9492: end if;
9493:
9494: end if; -- Subtraction
9487: end if;
9488:
9489: if (p_log_level_rec.statement_level) then
9490: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (3)' , '+++');
9491: fa_debug_pkg.add(l_calling_fn, 'h_group_system_deprn:bonus_amount', h_group_system_deprn_amount||':'||h_group_system_bonus_deprn, p_log_level_rec => p_log_level_rec);
9492: end if;
9493:
9494: end if; -- Subtraction
9495:
9549: h_max_thid_in_this_group := all_member.max_trx_id_in_this_group ;
9550: h_max_thid_in_other_group := all_member.max_trx_id_in_other_group;
9551:
9552: if (p_log_level_rec.statement_level) then
9553: fa_debug_pkg.add(l_calling_fn, '*** Check member has been reclassified out or not ***',
9554: h_member_asset_id||':'||h_processing_fiscal_year||':'||h_processing_period_num);
9555: end if;
9556:
9557: --* First of all, check if this selected member is actually reclassed out or not
9556:
9557: --* First of all, check if this selected member is actually reclassed out or not
9558: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9559: if (p_log_level_rec.statement_level) then
9560: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***');
9561: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9562: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec => p_log_level_rec);
9563: end if;
9564: goto skip_asset;
9557: --* First of all, check if this selected member is actually reclassed out or not
9558: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9559: if (p_log_level_rec.statement_level) then
9560: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***');
9561: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9562: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec => p_log_level_rec);
9563: end if;
9564: goto skip_asset;
9565: end if;
9572: if nvl(h_allocate_to_fully_ret_flag,'N') = 'N' and
9573: nvl(h_perd_ctr_fully_retired,h_processing_period_counter+1) < h_processing_period_counter then
9574:
9575: if (p_log_level_rec.statement_level) then
9576: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully retired', h_member_asset_id, p_log_level_rec => p_log_level_rec);
9577: end if;
9578: goto skip_asset;
9579: end if;
9580:
9581: if nvl(h_allocate_to_fully_rsv_flag,'N') = 'N' and
9582: nvl(h_perd_ctr_fully_reserved,h_processing_period_counter+1) < h_processing_period_counter then
9583:
9584: if (p_log_level_rec.statement_level) then
9585: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully reserved', h_member_asset_id, p_log_level_rec => p_log_level_rec);
9586: end if;
9587: goto skip_asset;
9588: end if;
9589:
9587: goto skip_asset;
9588: end if;
9589:
9590: if (p_log_level_rec.statement_level) then
9591: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '***');
9592: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
9593: end if;
9594:
9595: --* Process get delta of cost, rec cost, salvage value etc...
9588: end if;
9589:
9590: if (p_log_level_rec.statement_level) then
9591: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '***');
9592: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
9593: end if;
9594:
9595: --* Process get delta of cost, rec cost, salvage value etc...
9596: --* Query transaction header id of this member assetin this period
9637: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
9638: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9639:
9640: if (p_log_level_rec.statement_level) then
9641: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
9642: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
9643: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
9644: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
9645: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9638: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9639:
9640: if (p_log_level_rec.statement_level) then
9641: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
9642: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
9643: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
9644: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
9645: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9646: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec => p_log_level_rec);
9639:
9640: if (p_log_level_rec.statement_level) then
9641: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
9642: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
9643: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
9644: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
9645: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9646: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec => p_log_level_rec);
9647: end if;
9640: if (p_log_level_rec.statement_level) then
9641: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
9642: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
9643: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
9644: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
9645: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9646: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec => p_log_level_rec);
9647: end if;
9648:
9641: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
9642: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
9643: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
9644: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
9645: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9646: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec => p_log_level_rec);
9647: end if;
9648:
9649: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
9662: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9663: end if;
9664:
9665: if (p_log_level_rec.statement_level) then
9666: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id);
9667: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired',
9668: h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
9669: end if;
9670: elsif (nvl(h_transaction_type_code,'NULL') = 'REINSTATEMENT') and
9663: end if;
9664:
9665: if (p_log_level_rec.statement_level) then
9666: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id);
9667: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired',
9668: h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
9669: end if;
9670: elsif (nvl(h_transaction_type_code,'NULL') = 'REINSTATEMENT') and
9671: (nvl(fa_cache_pkg.fazcdrd_record.rule_name, 'NONE') = 'ENERGY PERIOD END BALANCE') then
9674: fetch GET_REINSTATEMENT into h_recognize_gain_loss, h_adj_eofy_reserve, h_adj_reserve_retired;
9675: close GET_REINSTATEMENT;
9676:
9677: if (p_log_level_rec.statement_level) then
9678: fa_debug_pkg.add(l_calling_fn, 'h_adj_reserve_retired', h_adj_reserve_retired, p_log_level_rec => p_log_level_rec);
9679: fa_debug_pkg.add(l_calling_fn, 'h_new_reserve_retired', h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
9680: end if;
9681:
9682: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9675: close GET_REINSTATEMENT;
9676:
9677: if (p_log_level_rec.statement_level) then
9678: fa_debug_pkg.add(l_calling_fn, 'h_adj_reserve_retired', h_adj_reserve_retired, p_log_level_rec => p_log_level_rec);
9679: fa_debug_pkg.add(l_calling_fn, 'h_new_reserve_retired', h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
9680: end if;
9681:
9682: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9683: end if; -- Retirement treatment
9686: if (h_transaction_key = 'RA') then
9687: h_delta_adjusted_cost := h_delta_adjusted_cost + h_new_delta_adjusted_cost;
9688: end if;
9689: if (p_log_level_rec.statement_level) then
9690: fa_debug_pkg.add(l_calling_fn, 'h_new_delta_adjusted_cost', h_new_delta_adjusted_cost, p_log_level_rec);
9691: fa_debug_pkg.add(l_calling_fn, 'h_delta_adjusted_cost', h_delta_adjusted_cost, p_log_level_rec);
9692: end if;
9693:
9694: else -- if GET_DELTA_FOR_MEMBER%NOTFOUND then
9687: h_delta_adjusted_cost := h_delta_adjusted_cost + h_new_delta_adjusted_cost;
9688: end if;
9689: if (p_log_level_rec.statement_level) then
9690: fa_debug_pkg.add(l_calling_fn, 'h_new_delta_adjusted_cost', h_new_delta_adjusted_cost, p_log_level_rec);
9691: fa_debug_pkg.add(l_calling_fn, 'h_delta_adjusted_cost', h_delta_adjusted_cost, p_log_level_rec);
9692: end if;
9693:
9694: else -- if GET_DELTA_FOR_MEMBER%NOTFOUND then
9695: close GET_DELTA_FOR_MEMBER;
9698: open GET_NEW_GROUP(h_member_asset_id, h_transaction_header_id);
9699: fetch GET_NEW_GROUP into h_new_group_asset_id;
9700: if GET_NEW_GROUP%FOUND then
9701: if (p_log_level_rec.statement_level) then
9702: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id);
9703: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_new_group_asset_id', h_group_asset_id||':'||h_new_group_asset_id, p_log_level_rec => p_log_level_rec);
9704: end if;
9705: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9706: close GET_NEW_GROUP;
9699: fetch GET_NEW_GROUP into h_new_group_asset_id;
9700: if GET_NEW_GROUP%FOUND then
9701: if (p_log_level_rec.statement_level) then
9702: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id);
9703: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_new_group_asset_id', h_group_asset_id||':'||h_new_group_asset_id, p_log_level_rec => p_log_level_rec);
9704: end if;
9705: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9706: close GET_NEW_GROUP;
9707: goto skip_thid;
9709: end if;
9710: close GET_NEW_GROUP;
9711:
9712: if (p_log_level_rec.statement_level) then
9713: fa_debug_pkg.add(l_calling_fn, '++++ Just set null to all ****', h_transaction_header_id);
9714: end if;
9715: end if;
9716: <
9717: if (p_log_level_rec.statement_level) then
9714: end if;
9715: end if;
9716: <
9717: if (p_log_level_rec.statement_level) then
9718: fa_debug_pkg.add(l_calling_fn, '*** This is the end of loop ***', h_transaction_header_id);
9719: end if;
9720:
9721: End loop;
9722:
9720:
9721: End loop;
9722:
9723: if (p_log_level_rec.statement_level) then
9724: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****');
9725: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9726: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
9727: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
9728: end if;
9721: End loop;
9722:
9723: if (p_log_level_rec.statement_level) then
9724: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****');
9725: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9726: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
9727: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
9728: end if;
9729:
9723: if (p_log_level_rec.statement_level) then
9724: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****');
9725: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9726: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
9727: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
9728: end if;
9729:
9730: h_find_flag_3 := FALSE;
9731:
9743: h_bonus_ytd_deprn,
9744: h_eofy_reserve;
9745: if GET_PRV_ROW_BS%NOTFOUND then
9746: if (p_log_level_rec.statement_level) then
9747: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***');
9748: end if;
9749: else
9750: if (p_log_level_rec.statement_level) then
9751: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec => p_log_level_rec);
9747: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***');
9748: end if;
9749: else
9750: if (p_log_level_rec.statement_level) then
9751: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec => p_log_level_rec);
9752: end if;
9753: if h_processing_period_num = 1 then
9754: h_ytd_deprn := 0;
9755: h_bonus_ytd_deprn := 0;
9768:
9769: --* Check if this asset exists in p_track_member table
9770: k := 0;
9771: if (p_log_level_rec.statement_level) then
9772: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table.count', p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
9773: end if;
9774: /* Bug 7231274, added for bug - start */
9775: k := search_index_table(h_processing_period_counter,h_member_asset_id,
9776: h_group_asset_id, h_set_of_books_id,p_log_level_rec);
9802:
9803: put_track_index(h_processing_period_counter, h_member_asset_id,h_new_group_asset_id,h_set_of_books_id,k,p_log_level_rec);
9804:
9805: if (p_log_level_rec.statement_level) then
9806: fa_debug_pkg.add(l_calling_fn, 'This member does not belong to this group anymore', '+++', p_log_level_rec => p_log_level_rec);
9807: end if;
9808: end if;
9809: end if;
9810: /* Bug 7231274, added for bug - end */
9829: if GET_RESERVE_AT_ADDITION%NOTFOUND then
9830: -- Set zero initial reserve
9831:
9832: if (p_log_level_rec.statement_level) then
9833: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
9834: h_member_asset_id, p_log_level_rec => p_log_level_rec);
9835: end if;
9836:
9837: h_ytd_deprn := 0;
9839: elsif h_deprn_source_code <> 'BOOKS' then
9840: -- Set zero initial reserve
9841:
9842: if (p_log_level_rec.statement_level) then
9843: fa_debug_pkg.add(l_calling_fn, 'This Member assets record', h_deprn_source_code, p_log_level_rec => p_log_level_rec);
9844: end if;
9845: h_ytd_deprn := 0;
9846: h_deprn_reserve := 0;
9847: end if;
9855: -- Then enter this asset to extended memory table at this moment
9856: l_new_ind := nvl(p_track_member_table.COUNT,0) + 1;
9857: l_processing_ind := l_new_ind;
9858: if (p_log_level_rec.statement_level) then
9859: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec => p_log_level_rec);
9860: end if;
9861: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
9862: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
9863: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
9905: h_new_adjusted_rec_cost := h_new_cost - h_new_deprn_limit_amount;
9906: end if;
9907:
9908: if (p_log_level_rec.statement_level) then
9909: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
9910: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
9911: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
9912: end if;
9913:
9906: end if;
9907:
9908: if (p_log_level_rec.statement_level) then
9909: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
9910: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
9911: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
9912: end if;
9913:
9914: -- Get Asset type
9955: if (p_log_level_rec.statement_level) then
9956: if not display_debug_message(fa_rule_in => fa_rule_in,
9957: p_calling_fn => l_calling_fn,
9958: p_log_level_rec=> p_log_level_rec) then
9959: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
9960: end if;
9961: end if;
9962:
9963: -- Call Deprn Basis Rule for this transaction or period
9963: -- Call Deprn Basis Rule for this transaction or period
9964: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
9965: rule_out => fa_rule_out, p_log_level_rec => p_log_level_rec)) then
9966: if (p_log_level_rec.statement_level) then
9967: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec => p_log_level_rec);
9968: end if;
9969: raise pop_mem_table_err;
9970: end if;
9971:
9969: raise pop_mem_table_err;
9970: end if;
9971:
9972: if (p_log_level_rec.statement_level) then
9973: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
9974: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
9975: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
9976: end if;
9977:
9970: end if;
9971:
9972: if (p_log_level_rec.statement_level) then
9973: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
9974: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
9975: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
9976: end if;
9977:
9978: --* Set calculated adjusted cost into p_track_member_table
9971:
9972: if (p_log_level_rec.statement_level) then
9973: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
9974: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
9975: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
9976: end if;
9977:
9978: --* Set calculated adjusted cost into p_track_member_table
9979:
9997: end if;
9998: end if;
9999:
10000: if (p_log_level_rec.statement_level) then
10001: fa_debug_pkg.add(l_calling_fn, 'New p_track_member_table is as follows: Indicator', l_processing_ind, p_log_level_rec => p_log_level_rec);
10002: if not display_debug_message2(l_processing_ind, l_calling_fn,
10003: p_log_level_rec) then
10004: null;
10005: end if;
10006: end if;
10007:
10008: <
10009: if (p_log_level_rec.statement_level) then
10010: fa_debug_pkg.add(l_calling_fn, '+++ End of Loop +++', '++++', p_log_level_rec => p_log_level_rec);
10011: end if;
10012:
10013: End Loop; -- (For ALL_MMEBER)
10014:
10021: h_max_thid_in_this_group := all_member.max_trx_id_in_this_group ;
10022: h_max_thid_in_other_group := all_member.max_trx_id_in_other_group;
10023:
10024: if (p_log_level_rec.statement_level) then
10025: fa_debug_pkg.add(l_calling_fn, '*** Check member has been reclassified out or not ***',
10026: h_member_asset_id||':'||h_processing_fiscal_year||':'||h_processing_period_num);
10027: end if;
10028:
10029: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
10027: end if;
10028:
10029: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
10030: if (p_log_level_rec.statement_level) then
10031: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***');
10032: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
10033: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec => p_log_level_rec);
10034: end if;
10035: goto skip_asset;
10028:
10029: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
10030: if (p_log_level_rec.statement_level) then
10031: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***');
10032: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
10033: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec => p_log_level_rec);
10034: end if;
10035: goto skip_asset;
10036: end if;
10043: if nvl(h_allocate_to_fully_ret_flag,'N') = 'N' and
10044: nvl(h_perd_ctr_fully_retired,h_processing_period_counter+1) < h_processing_period_counter then
10045:
10046: if (p_log_level_rec.statement_level) then
10047: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully retired',
10048: h_member_asset_id, p_log_level_rec => p_log_level_rec);
10049: end if;
10050: goto skip_asset;
10051: end if;
10053: if nvl(h_allocate_to_fully_rsv_flag,'N') = 'N' and
10054: nvl(h_perd_ctr_fully_reserved,h_processing_period_counter+1) < h_processing_period_counter then
10055:
10056: if (p_log_level_rec.statement_level) then
10057: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully reserved',
10058: h_member_asset_id, p_log_level_rec => p_log_level_rec);
10059: end if;
10060:
10061: goto skip_asset;
10061: goto skip_asset;
10062: end if;
10063:
10064: if (p_log_level_rec.statement_level) then
10065: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '*Reporting Book*');
10066: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
10067: end if;
10068:
10069: --* Process get delta of cost, rec cost, salvage value etc...
10062: end if;
10063:
10064: if (p_log_level_rec.statement_level) then
10065: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '*Reporting Book*');
10066: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec => p_log_level_rec);
10067: end if;
10068:
10069: --* Process get delta of cost, rec cost, salvage value etc...
10070: --* Query transaction header id of this member assetin this period
10108: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
10109: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
10110:
10111: if (p_log_level_rec.statement_level) then
10112: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
10113: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
10114: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
10115: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
10116: end if;
10109: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
10110:
10111: if (p_log_level_rec.statement_level) then
10112: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
10113: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
10114: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
10115: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
10116: end if;
10117:
10110:
10111: if (p_log_level_rec.statement_level) then
10112: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
10113: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
10114: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
10115: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
10116: end if;
10117:
10118: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
10111: if (p_log_level_rec.statement_level) then
10112: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id);
10113: fa_debug_pkg.add(l_calling_fn, 'h_delta_cost:h_delta_rec_cost', h_delta_cost||':'||h_delta_recoverable_cost, p_log_level_rec => p_log_level_rec);
10114: fa_debug_pkg.add(l_calling_fn, 'h_adj_cost:h_adj_rec_cost:h_adj_salvage', h_adj_cost||':'||h_adj_rec_cost||':'||h_adj_salvage_value, p_log_level_rec => p_log_level_rec);
10115: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec => p_log_level_rec);
10116: end if;
10117:
10118: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
10119: open GET_RETIREMENTS_MRC(h_transaction_header_id);
10127: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
10128: end if;
10129:
10130: if (p_log_level_rec.statement_level) then
10131: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id);
10132: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired', h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
10133: end if;
10134: end if; -- Retirement treatment
10135:
10128: end if;
10129:
10130: if (p_log_level_rec.statement_level) then
10131: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id);
10132: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired', h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec => p_log_level_rec);
10133: end if;
10134: end if; -- Retirement treatment
10135:
10136: -- Added for bug 8484007
10137: if (h_transaction_key = 'RA') then
10138: h_delta_adjusted_cost := h_delta_adjusted_cost + h_new_delta_adjusted_cost;
10139: end if;
10140: if (p_log_level_rec.statement_level) then
10141: fa_debug_pkg.add(l_calling_fn, 'h_new_delta_adjusted_cost', h_new_delta_adjusted_cost, p_log_level_rec);
10142: fa_debug_pkg.add(l_calling_fn, 'h_delta_adjusted_cost', h_delta_adjusted_cost, p_log_level_rec);
10143: end if;
10144:
10145: else -- if GET_DELTA_FOR_MEMBER%NOTFOUND then
10138: h_delta_adjusted_cost := h_delta_adjusted_cost + h_new_delta_adjusted_cost;
10139: end if;
10140: if (p_log_level_rec.statement_level) then
10141: fa_debug_pkg.add(l_calling_fn, 'h_new_delta_adjusted_cost', h_new_delta_adjusted_cost, p_log_level_rec);
10142: fa_debug_pkg.add(l_calling_fn, 'h_delta_adjusted_cost', h_delta_adjusted_cost, p_log_level_rec);
10143: end if;
10144:
10145: else -- if GET_DELTA_FOR_MEMBER%NOTFOUND then
10146: close GET_DELTA_FOR_MEMBER_MRC;
10149: open GET_NEW_GROUP_MRC(h_member_asset_id, h_transaction_header_id);
10150: fetch GET_NEW_GROUP_MRC into h_new_group_asset_id;
10151: if GET_NEW_GROUP_MRC%FOUND then
10152: if (p_log_level_rec.statement_level) then
10153: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id);
10154: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_new_group_asset_id', h_group_asset_id||':'||h_new_group_asset_id, p_log_level_rec => p_log_level_rec);
10155: end if;
10156: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
10157: close GET_NEW_GROUP_MRC;
10150: fetch GET_NEW_GROUP_MRC into h_new_group_asset_id;
10151: if GET_NEW_GROUP_MRC%FOUND then
10152: if (p_log_level_rec.statement_level) then
10153: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id);
10154: fa_debug_pkg.add(l_calling_fn, 'h_group_asset_id:h_new_group_asset_id', h_group_asset_id||':'||h_new_group_asset_id, p_log_level_rec => p_log_level_rec);
10155: end if;
10156: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
10157: close GET_NEW_GROUP_MRC;
10158: goto skip_thid;
10160: end if;
10161: close GET_NEW_GROUP_MRC;
10162:
10163: if (p_log_level_rec.statement_level) then
10164: fa_debug_pkg.add(l_calling_fn, '++++ Just set null to all ****', h_transaction_header_id);
10165: end if;
10166: end if;
10167: <
10168: if (p_log_level_rec.statement_level) then
10165: end if;
10166: end if;
10167: <
10168: if (p_log_level_rec.statement_level) then
10169: fa_debug_pkg.add(l_calling_fn, '*** This is the end of loop ***', h_transaction_header_id);
10170: end if;
10171:
10172: End loop;
10173:
10171:
10172: End loop;
10173:
10174: if (p_log_level_rec.statement_level) then
10175: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****');
10176: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:limit:limit_amount', h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
10177: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
10178: end if;
10179:
10172: End loop;
10173:
10174: if (p_log_level_rec.statement_level) then
10175: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****');
10176: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:limit:limit_amount', h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
10177: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
10178: end if;
10179:
10180: h_find_flag_3 := FALSE;
10173:
10174: if (p_log_level_rec.statement_level) then
10175: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****');
10176: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:limit:limit_amount', h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec => p_log_level_rec);
10177: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec => p_log_level_rec);
10178: end if;
10179:
10180: h_find_flag_3 := FALSE;
10181:
10193: h_bonus_ytd_deprn,
10194: h_eofy_reserve;
10195: if GET_PRV_ROW_BS_MRC%NOTFOUND then
10196: if (p_log_level_rec.statement_level) then
10197: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***');
10198: end if;
10199: else
10200: if (p_log_level_rec.statement_level) then
10201: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec => p_log_level_rec);
10197: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***');
10198: end if;
10199: else
10200: if (p_log_level_rec.statement_level) then
10201: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec => p_log_level_rec);
10202: end if;
10203: if h_processing_period_num = 1 then
10204: h_ytd_deprn := 0;
10205: h_bonus_ytd_deprn := 0;
10250:
10251: put_track_index(h_processing_period_counter, h_member_asset_id,h_new_group_asset_id,h_set_of_books_id,k,p_log_level_rec);
10252:
10253: if (p_log_level_rec.statement_level) then
10254: fa_debug_pkg.add(l_calling_fn, 'This member does not belong to this group anymore', '+++', p_log_level_rec => p_log_level_rec);
10255: end if;
10256: end if;
10257: end if;
10258: /* Bug 7231274, added for bug - end */
10278: if GET_RESERVE_AT_ADDITION_MRC%NOTFOUND then
10279: -- Set zero initial reserve
10280:
10281: if (p_log_level_rec.statement_level) then
10282: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
10283: h_member_asset_id, p_log_level_rec => p_log_level_rec);
10284: end if;
10285:
10286: h_ytd_deprn := 0;
10288: elsif h_deprn_source_code <> 'BOOKS' then
10289: -- Set zero initial reserve
10290:
10291: if (p_log_level_rec.statement_level) then
10292: fa_debug_pkg.add(l_calling_fn, 'This Member assets record', h_deprn_source_code, p_log_level_rec => p_log_level_rec);
10293: end if;
10294:
10295: h_ytd_deprn := 0;
10296: h_deprn_reserve := 0;
10304: -- Then enter this asset to extended memory table at this moment
10305: l_new_ind := p_track_member_table.COUNT + 1;
10306: l_processing_ind := l_new_ind;
10307: if (p_log_level_rec.statement_level) then
10308: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec => p_log_level_rec);
10309: end if;
10310: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
10311: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
10312: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
10355: h_new_adjusted_rec_cost := h_new_cost - h_new_deprn_limit_amount;
10356: end if;
10357:
10358: if (p_log_level_rec.statement_level) then
10359: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
10360: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
10361: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
10362: end if;
10363:
10356: end if;
10357:
10358: if (p_log_level_rec.statement_level) then
10359: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****');
10360: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
10361: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec => p_log_level_rec);
10362: end if;
10363:
10364: -- Get Asset type
10410: if (p_log_level_rec.statement_level) then
10411: if not display_debug_message(fa_rule_in => fa_rule_in,
10412: p_calling_fn => l_calling_fn,
10413: p_log_level_rec => p_log_level_rec) then
10414: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec => p_log_level_rec);
10415: end if;
10416: end if;
10417:
10418: -- Call Deprn Basis Rule for this transaction or period
10421: raise pop_mem_table_err;
10422: end if;
10423:
10424: if (p_log_level_rec.statement_level) then
10425: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
10426: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
10427: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
10428: end if;
10429:
10422: end if;
10423:
10424: if (p_log_level_rec.statement_level) then
10425: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
10426: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
10427: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
10428: end if;
10429:
10430: --* Set calculated adjusted cost into p_track_member_table
10423:
10424: if (p_log_level_rec.statement_level) then
10425: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
10426: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec => p_log_level_rec);
10427: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec => p_log_level_rec);
10428: end if;
10429:
10430: --* Set calculated adjusted cost into p_track_member_table
10431:
10450: end if;
10451:
10452: <
10453: if (p_log_level_rec.statement_level) then
10454: fa_debug_pkg.add(l_calling_fn, '+++ End of Loop +++', '++++', p_log_level_rec => p_log_level_rec);
10455: end if;
10456:
10457: End Loop; -- (For ALL_MMEBER)
10458: end if; -- Primary or Reporting?
10458: end if; -- Primary or Reporting?
10459:
10460: --* From this point, Start to process allocate logic
10461: if (p_log_level_rec.statement_level) then
10462: fa_debug_pkg.add(l_calling_fn, '*** Ended all member assets treatment ***', '***');
10463: fa_debug_pkg.add(l_calling_fn, '*** Start process to allocate group level amount ***', '***');
10464: end if;
10465:
10466: if p_mrc_sob_type_code <> 'R' then
10459:
10460: --* From this point, Start to process allocate logic
10461: if (p_log_level_rec.statement_level) then
10462: fa_debug_pkg.add(l_calling_fn, '*** Ended all member assets treatment ***', '***');
10463: fa_debug_pkg.add(l_calling_fn, '*** Start process to allocate group level amount ***', '***');
10464: end if;
10465:
10466: if p_mrc_sob_type_code <> 'R' then
10467:
10539:
10540: else
10541:
10542: if (p_log_level_rec.statement_level) then
10543: fa_debug_pkg.add(l_calling_fn, '**** This processing period is last period of loop ****',
10544: '****');
10545: end if;
10546:
10547: end if;
10546:
10547: end if;
10548:
10549: if (p_log_level_rec.statement_level) then
10550: fa_debug_pkg.add(l_calling_fn, '*** End of Period Loop ** Period Counter processed',
10551: h_processing_period_counter);
10552: end if;
10553:
10554: End Loop; -- (For i IN 1.. h_length_of_loop)
10559: if nvl(h_exclude_fully_rsv_flag,'N') = 'Y' and
10560: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
10561:
10562: if (p_log_level_rec.statement_level) then
10563: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec => p_log_level_rec);
10564: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year lopped out', h_processing_fiscal_year, p_log_level_rec => p_log_level_rec);
10565: end if;
10566:
10567: -- If the fully reserved period is in the different fiscal year than
10560: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
10561:
10562: if (p_log_level_rec.statement_level) then
10563: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec => p_log_level_rec);
10564: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year lopped out', h_processing_fiscal_year, p_log_level_rec => p_log_level_rec);
10565: end if;
10566:
10567: -- If the fully reserved period is in the different fiscal year than
10568: -- the fiscal year when the process is done.
10572: nvl(p_track_member_table(t).set_of_books_id,-99) = nvl(h_set_of_books_id,-99) then
10573: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
10574: - nvl(p_track_member_table(t).deprn_reserve,0);
10575: if (p_log_level_rec.statement_level) then
10576: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset',
10577: p_track_member_table(t).member_asset_id);
10578: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
10579: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter);
10580: end if;
10574: - nvl(p_track_member_table(t).deprn_reserve,0);
10575: if (p_log_level_rec.statement_level) then
10576: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset',
10577: p_track_member_table(t).member_asset_id);
10578: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
10579: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter);
10580: end if;
10581: end if;
10582: End Loop;
10581: end if;
10582: End Loop;
10583:
10584: if (p_log_level_rec.statement_level) then
10585: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Ended++++', p_log_level_rec => p_log_level_rec);
10586: end if;
10587:
10588: end if;
10589:
10804:
10805: BEGIN
10806:
10807: if (p_log_level_rec.statement_level) then
10808: fa_debug_pkg.add(l_calling_fn, '+++ populate member reserve starts +++ ',p_trans_rec.amortization_start_date , p_log_level_rec => p_log_level_rec);
10809: end if;
10810:
10811: -- Populate Member Asset id processed in this transaction
10812: open FETCH_MEMBER_ASSET;
10814:
10815: if FETCH_MEMBER_ASSET%NOTFOUND then
10816:
10817: if (p_log_level_rec.statement_level) then
10818: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this group THID',
10819: p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this member THID',
10821: p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
10822: end if;
10816:
10817: if (p_log_level_rec.statement_level) then
10818: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this group THID',
10819: p_trans_rec.transaction_header_id, p_log_level_rec => p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this member THID',
10821: p_trans_rec.member_transaction_header_id, p_log_level_rec => p_log_level_rec);
10822: end if;
10823: close FETCH_MEMBER_ASSET;
10824:
10900:
10901: end if;
10902:
10903: if (p_log_level_rec.statement_level) then
10904: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec => p_log_level_rec);
10905: fa_debug_pkg.add(l_calling_fn,'h_period_counter:cur_fiscal_year:cur_period_num',h_period_counter||':'||h_cur_fiscal_year||':'||h_cur_period_num, p_log_level_rec => p_log_level_rec);
10906: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec => p_log_level_rec);
10907: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
10908: fa_debug_pkg.add(l_calling_fn,'h_adj_eofy_reserve:h_adj_reserve',h_adj_eofy_reserve||':'||h_adj_reserve, p_log_level_rec => p_log_level_rec);
10901: end if;
10902:
10903: if (p_log_level_rec.statement_level) then
10904: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec => p_log_level_rec);
10905: fa_debug_pkg.add(l_calling_fn,'h_period_counter:cur_fiscal_year:cur_period_num',h_period_counter||':'||h_cur_fiscal_year||':'||h_cur_period_num, p_log_level_rec => p_log_level_rec);
10906: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec => p_log_level_rec);
10907: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
10908: fa_debug_pkg.add(l_calling_fn,'h_adj_eofy_reserve:h_adj_reserve',h_adj_eofy_reserve||':'||h_adj_reserve, p_log_level_rec => p_log_level_rec);
10909: end if;
10902:
10903: if (p_log_level_rec.statement_level) then
10904: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec => p_log_level_rec);
10905: fa_debug_pkg.add(l_calling_fn,'h_period_counter:cur_fiscal_year:cur_period_num',h_period_counter||':'||h_cur_fiscal_year||':'||h_cur_period_num, p_log_level_rec => p_log_level_rec);
10906: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec => p_log_level_rec);
10907: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
10908: fa_debug_pkg.add(l_calling_fn,'h_adj_eofy_reserve:h_adj_reserve',h_adj_eofy_reserve||':'||h_adj_reserve, p_log_level_rec => p_log_level_rec);
10909: end if;
10910:
10903: if (p_log_level_rec.statement_level) then
10904: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec => p_log_level_rec);
10905: fa_debug_pkg.add(l_calling_fn,'h_period_counter:cur_fiscal_year:cur_period_num',h_period_counter||':'||h_cur_fiscal_year||':'||h_cur_period_num, p_log_level_rec => p_log_level_rec);
10906: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec => p_log_level_rec);
10907: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
10908: fa_debug_pkg.add(l_calling_fn,'h_adj_eofy_reserve:h_adj_reserve',h_adj_eofy_reserve||':'||h_adj_reserve, p_log_level_rec => p_log_level_rec);
10909: end if;
10910:
10911: if nvl(h_eofy_reserve,0) = 0 then
10904: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec => p_log_level_rec);
10905: fa_debug_pkg.add(l_calling_fn,'h_period_counter:cur_fiscal_year:cur_period_num',h_period_counter||':'||h_cur_fiscal_year||':'||h_cur_period_num, p_log_level_rec => p_log_level_rec);
10906: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec => p_log_level_rec);
10907: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec => p_log_level_rec);
10908: fa_debug_pkg.add(l_calling_fn,'h_adj_eofy_reserve:h_adj_reserve',h_adj_eofy_reserve||':'||h_adj_reserve, p_log_level_rec => p_log_level_rec);
10909: end if;
10910:
10911: if nvl(h_eofy_reserve,0) = 0 then
10912: if h_cur_fiscal_year = h_ds_fiscal_year then
10916: end if;
10917: end if;
10918:
10919: if (p_log_level_rec.statement_level) then
10920: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve:x_eofy_reserve', h_reserve_dpis_current||':'||h_eofy_reserve, p_log_level_rec => p_log_level_rec);
10921: end if;
10922:
10923: -- Set return value
10924: x_deprn_reserve := h_reserve_dpis_current;
10985:
10986: begin
10987:
10988: if (p_log_level_rec.statement_level) then
10989: fa_debug_pkg.add(l_calling_fn, '+++ Start to check 50% rule application ++ ', '+++');
10990: end if;
10991:
10992: if p_rule_name in ('YEAR END BALANCE WITH POSITIVE REDUCTION',
10993: 'YEAR END BALANCE WITH HALF YEAR RULE') then
10998: h_half_year_rule_flag := 'N';
10999: end if;
11000:
11001: if (p_log_level_rec.statement_level) then
11002: fa_debug_pkg.add(l_calling_fn, 'Just before calling CALC_REDUCTION_AMOUNT', '***');
11003: end if;
11004:
11005: if not FA_CALC_DEPRN_BASIS1_PKG.CALC_REDUCTION_AMOUNT
11006: (p_asset_id => p_group_asset_id,
11101: begin
11102:
11103: l_calling_fn := p_calling_fn;
11104:
11105: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11102:
11103: l_calling_fn := p_calling_fn;
11104:
11105: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11103: l_calling_fn := p_calling_fn;
11104:
11105: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11104:
11105: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11105: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11107: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11108: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11109: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11110: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11111: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11112: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11113: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11114: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11115: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11116: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11117: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11125: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.mrc_sob_type_code', fa_rule_in.mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11118: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec => p_log_level_rec);
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11125: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.mrc_sob_type_code', fa_rule_in.mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11126:
11119: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec => p_log_level_rec);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11125: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.mrc_sob_type_code', fa_rule_in.mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11126:
11127: return(true);
11120: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec => p_log_level_rec);
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11125: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.mrc_sob_type_code', fa_rule_in.mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11126:
11127: return(true);
11128:
11121: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec => p_log_level_rec);
11122: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec => p_log_level_rec);
11123: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec => p_log_level_rec);
11124: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec => p_log_level_rec);
11125: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.mrc_sob_type_code', fa_rule_in.mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11126:
11127: return(true);
11128:
11129: end display_debug_message;
11145: begin
11146:
11147: l_calling_fn := p_calling_fn;
11148:
11149: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec => p_log_level_rec);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11146:
11147: l_calling_fn := p_calling_fn;
11148:
11149: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec => p_log_level_rec);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11147: l_calling_fn := p_calling_fn;
11148:
11149: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec => p_log_level_rec);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11148:
11149: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec => p_log_level_rec);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11149: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec => p_log_level_rec);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11150: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11151: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11152: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11153: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11154: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11155: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11156: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11157: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11158: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11159: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11160: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11161: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11169: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag);
11162: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount);
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11169: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag);
11170:
11163: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve);
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11169: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag);
11170:
11171: return true;
11164: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn);
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11169: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag);
11170:
11171: return true;
11172:
11165: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve);
11166: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost);
11167: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value);
11168: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag);
11169: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag);
11170:
11171: return true;
11172:
11173: end display_debug_message2;
11194: begin
11195:
11196: if p_backup_restore = 'BACKUP' then
11197: if (p_log_level_rec.statement_level) then
11198: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec => p_log_level_rec);
11199: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
11200: fa_debug_pkg.add(l_calling_fn, 'Last processed fiscal year:period_num', p_current_fiscal_year||':'||p_current_period_num, p_log_level_rec => p_log_level_rec);
11201: end if;
11202:
11195:
11196: if p_backup_restore = 'BACKUP' then
11197: if (p_log_level_rec.statement_level) then
11198: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec => p_log_level_rec);
11199: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
11200: fa_debug_pkg.add(l_calling_fn, 'Last processed fiscal year:period_num', p_current_fiscal_year||':'||p_current_period_num, p_log_level_rec => p_log_level_rec);
11201: end if;
11202:
11203: if p_current_fiscal_year is not null and p_current_period_num is not null then
11196: if p_backup_restore = 'BACKUP' then
11197: if (p_log_level_rec.statement_level) then
11198: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec => p_log_level_rec);
11199: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec => p_log_level_rec);
11200: fa_debug_pkg.add(l_calling_fn, 'Last processed fiscal year:period_num', p_current_fiscal_year||':'||p_current_period_num, p_log_level_rec => p_log_level_rec);
11201: end if;
11202:
11203: if p_current_fiscal_year is not null and p_current_period_num is not null then
11204: h_number_per_fy := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;
11246: End Loop;
11247:
11248: else
11249: if (p_log_level_rec.statement_level) then
11250: fa_debug_pkg.add(l_calling_fn, '++++ Restore p_track_member_table starts ++++', '++++', p_log_level_rec => p_log_level_rec);
11251: fa_debug_pkg.add(l_calling_fn, 'Restored p_track_member_table rows', p_track_member_table_for_deprn.COUNT, p_log_level_rec => p_log_level_rec);
11252: end if;
11253:
11254: p_track_member_table.delete;
11247:
11248: else
11249: if (p_log_level_rec.statement_level) then
11250: fa_debug_pkg.add(l_calling_fn, '++++ Restore p_track_member_table starts ++++', '++++', p_log_level_rec => p_log_level_rec);
11251: fa_debug_pkg.add(l_calling_fn, 'Restored p_track_member_table rows', p_track_member_table_for_deprn.COUNT, p_log_level_rec => p_log_level_rec);
11252: end if;
11253:
11254: p_track_member_table.delete;
11255: p_track_mem_index_table.delete;
11292:
11293: --p_track_member_table(l_ind).member_index := p_track_member_table_for_deprn(l_ind).member_index;
11294:
11295: if (p_log_level_rec.statement_level) then
11296: fa_debug_pkg.add('#### HH Test ###', 'Period Counter, member_asset_id restored',
11297: p_track_member_table(l_ind).period_counter||','||
11298: p_track_member_table(l_ind).member_asset_id);
11299: end if;
11300:
11302:
11303: end if;
11304:
11305: if (p_log_level_rec.statement_level) then
11306: fa_debug_pkg.add(l_calling_fn, p_backup_restore||' has been done ++++', '++++', p_log_level_rec => p_log_level_rec);
11307: end if;
11308:
11309: return(true);
11310:
11623:
11624: begin
11625:
11626: if (p_log_level_rec.statement_level) then
11627: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***');
11628: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11629: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11630: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec => p_log_level_rec);
11631: end if;
11624: begin
11625:
11626: if (p_log_level_rec.statement_level) then
11627: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***');
11628: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11629: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11630: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec => p_log_level_rec);
11631: end if;
11632:
11626: if (p_log_level_rec.statement_level) then
11627: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***');
11628: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11629: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec => p_log_level_rec);
11630: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec => p_log_level_rec);
11631: end if;
11632:
11633: if nvl(p_calling_fn,'NULL') = 'POPULATE_MEMBER_ASSETS_TABLE' then
11634: -- This funcation can work only during processing populate_member_assets_table
11639: h_reporting_flag := 'P';
11640: END IF;
11641:
11642: if (p_log_level_rec.statement_level) then
11643: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id:h_reporting_flag', h_set_of_books_id||':'||h_reporting_flag, p_log_level_rec => p_log_level_rec);
11644: end if;
11645: /* select the corresponding period_counter for the current period: fyctr, perd_ctr */
11646: h_calendar_type:= fa_cache_pkg.fazcbc_record.deprn_calendar;
11647: h_fy_name:= fa_cache_pkg.fazcbc_record.fiscal_year_name;
11657: fy.fiscal_year_name = h_fy_name and
11658: fy.fiscal_year = p_fiscal_year;
11659:
11660: if (p_log_level_rec.statement_level) then
11661: fa_debug_pkg.add(l_calling_fn, 'h_period_name', h_period_name, p_log_level_rec => p_log_level_rec);
11662: end if;
11663: /* Query override table */
11664: open GET_OVERRIDE_AMOUNT;
11665: fetch GET_OVERRIDE_AMOUNT INTO x_override_deprn_amount, x_override_bonus_amount, h_subtract_ytd_flag, h_deprn_override_id;
11665: fetch GET_OVERRIDE_AMOUNT INTO x_override_deprn_amount, x_override_bonus_amount, h_subtract_ytd_flag, h_deprn_override_id;
11666: close GET_OVERRIDE_AMOUNT;
11667:
11668: if (p_log_level_rec.statement_level) then
11669: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec => p_log_level_rec);
11670: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
11671: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec => p_log_level_rec);
11672: end if;
11673:
11666: close GET_OVERRIDE_AMOUNT;
11667:
11668: if (p_log_level_rec.statement_level) then
11669: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec => p_log_level_rec);
11670: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
11671: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec => p_log_level_rec);
11672: end if;
11673:
11674: l_avg_rate := 1;
11667:
11668: if (p_log_level_rec.statement_level) then
11669: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec => p_log_level_rec);
11670: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec => p_log_level_rec);
11671: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec => p_log_level_rec);
11672: end if;
11673:
11674: l_avg_rate := 1;
11675:
11679: report_cost:= p_recoverable_cost + p_salvage_value;
11680: end if;
11681:
11682: if (p_log_level_rec.statement_level) then
11683: fa_debug_pkg.add(l_calling_fn, 'primary_cost:report_cost', primary_cost||':'||report_cost, p_log_level_rec => p_log_level_rec);
11684: end if;
11685:
11686: -- ratio = Reporting Books Cost / Primary books Cost for adjustment.
11687: -- the above calculation can be used once the depreciaion
11719: x_override_bonus_amount := x_override_bonus_amount - p_bonus_ytd_deprn;
11720: END IF;
11721:
11722: if (p_log_level_rec.statement_level) then
11723: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount:override_flag',
11724: x_override_deprn_amount||':'||x_override_bonus_amount||':'||x_deprn_override_flag, p_log_level_rec => p_log_level_rec);
11725: end if;
11726:
11727: end if;