94: and set_of_books_id = h_set_of_books_id;
95:
96: begin <
97: if (p_log_level_rec.statement_level) then
98: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec);
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
95:
96: begin <
97: if (p_log_level_rec.statement_level) then
98: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec);
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
103: 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);
96: begin <
97: if (p_log_level_rec.statement_level) then
98: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec);
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
103: 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);
104: 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);
97: if (p_log_level_rec.statement_level) then
98: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec);
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
103: 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);
104: 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);
105: end if;
98: fa_debug_pkg.add(l_calling_fn,'== TRACK_ASSET is Started ==','Parameters', p_log_level_rec);
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
103: 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);
104: 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);
105: end if;
106:
99: fa_debug_pkg.add(l_calling_fn,'P_group_asset_id',P_group_asset_id, p_log_level_rec);
100: 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);
101: 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);
102: 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);
103: 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);
104: 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);
105: end if;
106:
107: -- Check if Cache Package has been called:
100: 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);
101: 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);
102: 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);
103: 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);
104: 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);
105: end if;
106:
107: -- Check if Cache Package has been called:
108: if FA_CACHE_PKG.fazcbc_record.set_of_books_id is null then
181:
182: else -- Calculation Type
183: -- Debug
184: if (p_log_level_rec.statement_level) then
185: fa_debug_pkg.add(l_calling_fn,'P_depreciation_option:P_member_rollup_flag',
186: P_depreciation_option||':'||P_member_rollup_flag, p_log_level_rec);
187: end if;
188: /* for now, Calculate Method is handled in Depreciation Engine. in this case, this part will be just skipped. */
189: end if;
842:
843: BEGIN <
844:
845: if (p_log_level_rec.statement_level) then
846: fa_debug_pkg.add(l_calling_fn,'++ ALLOCATE Started ++','+++', p_log_level_rec);
847: end if;
848:
849: -- Set parameters into internal variables
850: h_group_asset_id := P_group_asset_id;
880:
881: h_perds_per_yr := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;
882:
883: if (p_log_level_rec.statement_level) then
884: fa_debug_pkg.add(l_calling_fn, 'h_sob_id:book:period_ctr:cur_period_num:perds_per_fy'
885: , h_set_of_books_id||':'||h_book_type_code||':'||
886: h_period_counter||':'||h_current_period_number||':'||h_perds_per_yr, p_log_level_rec);
887: end if;
888:
894:
895: if (l_group_dbr_name = 'ENERGY PERIOD END BALANCE') then
896:
897: if (p_log_level_rec.statement_level) then
898: fa_debug_pkg.add(l_calling_fn, 'Call',
899: 'fa_query_balances_pkg.query_balances', p_log_level_rec);
900: end if;
901:
902: fa_query_balances_pkg.query_balances(
927: X_bonus_deprn_amount => l_temp_num,
928: p_log_level_rec => p_log_level_rec);
929:
930: if (p_log_level_rec.statement_level) then
931: fa_debug_pkg.add(l_calling_fn, 'l_group_reserve',
932: l_group_reserve, p_log_level_rec);
933: end if;
934:
935: end if; -- (l_group_dbr_name = 'ENERGY PERIOD END BALANCE')
948: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
949:
950: if not p_track_member_table.exists(1) then
951: if (p_log_level_rec.statement_level) then
952: fa_debug_pkg.add(l_calling_fn, 'populate previous rows', 'call here', p_log_level_rec);
953: end if;
954:
955: if not populate_previous_rows(p_book_type_code => h_book_type_code,
956: p_group_asset_id => h_group_asset_id,
966: end if; -- End of preparion for Adjustment mode
967: end if;
968:
969: if (p_log_level_rec.statement_level) then
970: fa_debug_pkg.add(l_calling_fn, 'Before start to loop for total amounts:p_track_member_table.COUNT',
971: p_track_member_table.count, p_log_level_rec);
972: end if;
973:
974: -- Get the Allocation Basis
1142: end if;
1143: end if; -- Total allocation basis logic end
1144:
1145: if (p_log_level_rec.statement_level) then
1146: fa_debug_pkg.add(l_calling_fn,'h_total_cost:h_total_adj_cost:h_total_rec_cost',
1147: h_total_cost||':'||h_total_adjusted_cost||':'||h_total_recoverable_cost, p_log_level_rec);
1148: end if;
1149:
1150: --* Calculate allocated amounts for all member assets
1161: h_total_allocation_basis := h_total_adjusted_cost;
1162: end if;
1163:
1164: if (p_log_level_rec.statement_level) then
1165: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec);
1166: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec);
1167: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec);
1168: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec);
1169: end if;
1162: end if;
1163:
1164: if (p_log_level_rec.statement_level) then
1165: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec);
1166: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec);
1167: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec);
1168: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec);
1169: end if;
1170:
1163:
1164: if (p_log_level_rec.statement_level) then
1165: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec);
1166: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec);
1167: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec);
1168: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec);
1169: end if;
1170:
1171: --bug6923135
1164: if (p_log_level_rec.statement_level) then
1165: fa_debug_pkg.add(l_calling_fn, 'P_mode', P_mode, p_log_level_rec);
1166: fa_debug_pkg.add(l_calling_fn, 'l_group_dbr_name', l_group_dbr_name, p_log_level_rec);
1167: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_basis', P_group_deprn_basis, p_log_level_rec);
1168: fa_debug_pkg.add(l_calling_fn, 'h_total_allocation_basis', h_total_allocation_basis, p_log_level_rec);
1169: end if;
1170:
1171: --bug6923135
1172: -- bypassing following check if the mode is DEPRECIATION so that even allocation basis is zero,
1177: and nvl(P_mode,'DEPRECIATION') <> 'DEPRECIATION' --bug6923135
1178: then -- Since system cannot calculate the allocation
1179:
1180: if (p_log_level_rec.statement_level) then
1181: fa_debug_pkg.add(l_calling_fn,'Since total allocation basis is ZERO','Skip out this function',
1182: p_log_level_rec);
1183: end if;
1184:
1185: goto skip_allocate;
1205:
1206: For i in 1 .. p_track_member_table.COUNT loop
1207:
1208: if (p_log_level_rec.statement_level) then
1209: fa_debug_pkg.add(l_calling_fn,'adjustment-loop started: indicator of this loop', i, p_log_level_rec);
1210: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1211: end if;
1212:
1213: if p_track_member_table(i).group_asset_id = h_group_asset_id and
1206: For i in 1 .. p_track_member_table.COUNT loop
1207:
1208: if (p_log_level_rec.statement_level) then
1209: fa_debug_pkg.add(l_calling_fn,'adjustment-loop started: indicator of this loop', i, p_log_level_rec);
1210: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1211: end if;
1212:
1213: if p_track_member_table(i).group_asset_id = h_group_asset_id and
1214: p_track_member_table(i).period_counter = h_period_counter and
1226: or
1227: (nvl(P_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'Y') then
1228:
1229: if (p_log_level_rec.statement_level) then
1230: fa_debug_pkg.add(l_calling_fn,
1231: 'table('||i||').group_asset_id:period_counter,sob_id,reserved_flag:retired_flag ',
1232: p_track_member_table(i).group_Asset_id||':'||
1233: p_track_member_table(i).period_counter||
1234: ':'|| p_track_member_table(i).set_of_books_id||':'||
1249: h_bonus_ytd_deprn := p_track_member_table(i).bonus_ytd_deprn;
1250: end if;
1251:
1252: if (p_log_level_rec.statement_level) then
1253: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i, p_log_level_rec);
1254: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1255: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec);
1256: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec);
1257: end if;
1250: end if;
1251:
1252: if (p_log_level_rec.statement_level) then
1253: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i, p_log_level_rec);
1254: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1255: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec);
1256: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec);
1257: end if;
1258:
1252: if (p_log_level_rec.statement_level) then
1253: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Loop indicator ', i, p_log_level_rec);
1254: fa_debug_pkg.add(l_calling_fn, 'member_in.member_asset_id:deprn_reserve',
1255: l_track_member_in.member_asset_id||':'||l_track_member_in.deprn_reserve, p_log_level_rec);
1256: fa_debug_pkg.add(l_calling_fn, 'h_period_num:h_ytd_deprn', h_perd_ctr||':'||h_ytd_deprn, p_log_level_rec);
1257: end if;
1258:
1259: -- Set Allocation Basis
1260: -- ENERGY
1275: h_bonus_amount := nvl(P_group_bonus_amount,0);
1276: x_calc_done := 'N';
1277:
1278: if (p_log_level_rec.statement_level) then
1279: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++', p_log_level_rec);
1280: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1281: h_allocation_basis||':'||h_total_allocation_basis||':'|| x_check_reserve_flag, p_log_level_rec);
1282: end if;
1283:
1276: x_calc_done := 'N';
1277:
1278: if (p_log_level_rec.statement_level) then
1279: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++', p_log_level_rec);
1280: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1281: h_allocation_basis||':'||h_total_allocation_basis||':'|| x_check_reserve_flag, p_log_level_rec);
1282: end if;
1283:
1284: -- Call Allocation_main to allocate the group amount to member assets
1349:
1350: l_last_asset_index := i;
1351:
1352: if (p_log_level_rec.statement_level) then
1353: fa_debug_pkg.add(l_calling_fn,
1354: 'Updated current period row into p_track_member_table', '***', p_log_level_rec);
1355:
1356: if not display_debug_message2(i, l_calling_fn, p_log_level_rec) then
1357: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
1353: fa_debug_pkg.add(l_calling_fn,
1354: 'Updated current period row into p_track_member_table', '***', p_log_level_rec);
1355:
1356: if not display_debug_message2(i, l_calling_fn, p_log_level_rec) then
1357: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
1358: end if;
1359:
1360: end if;
1361: end if;
1375: -- passed group amount doesn't include current period catchup expense,
1376: -- so add up the catchup expense at this place
1377: if nvl(P_subtraction_flag,'N') = 'Y' then
1378: if (p_log_level_rec.statement_level) then
1379: fa_debug_pkg.add(l_calling_fn,'++ Start to add current period expense catch up ++','+++', p_log_level_rec);
1380: end if;
1381:
1382: if p_mrc_sob_type_code <> 'R' then
1383: -- Get group level adjustment
1391: close FA_ADJ_EXPENSE_MRC;
1392: end if;
1393:
1394: if (p_log_level_rec.statement_level) then
1395: fa_debug_pkg.add(l_calling_fn, 'h_deprn_expense:h_bonus_expense',
1396: h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
1397: end if;
1398:
1399: -- h_deprn_amount := h_deprn_amount + nvl(h_deprn_expense,0);
1406: if p_mrc_sob_type_code <> 'R' then
1407:
1408: For mem in ALL_MEMBERS loop
1409: if (p_log_level_rec.statement_level) then
1410: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id);
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1407:
1408: For mem in ALL_MEMBERS loop
1409: if (p_log_level_rec.statement_level) then
1410: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id);
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1408: For mem in ALL_MEMBERS loop
1409: if (p_log_level_rec.statement_level) then
1410: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id);
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1409: if (p_log_level_rec.statement_level) then
1410: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id);
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1417: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1410: fa_debug_pkg.add(l_calling_fn, 'asset_id', mem.asset_id);
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1417: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1418: end if;
1411: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_ret_flag', P_allocate_to_fully_ret_flag);
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1417: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1418: end if;
1419:
1412: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag', P_allocate_to_fully_rsv_flag);
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1417: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1418: end if;
1419:
1420: if (nvl(P_allocate_to_fully_ret_flag,'N') = 'N' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
1413: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_reserved', mem.period_counter_fully_reserved);
1414: fa_debug_pkg.add(l_calling_fn, 'mem.period_counter_fully_retired', mem.period_counter_fully_retired);
1415: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter);
1416: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Primary/Non-MRC Book', p_log_level_rec);
1417: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1418: end if;
1419:
1420: if (nvl(P_allocate_to_fully_ret_flag,'N') = 'N' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
1421: mem.period_counter_fully_reserved is NULL and (mem.period_counter_fully_retired is NULL or -- ENERGY
1438: FETCH c_get_adj INTO l_reserve_amount; -- ENERGY
1439: CLOSE c_get_adj; -- ENERGY
1440:
1441: if (p_log_level_rec.statement_level) then
1442: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
1443: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec);
1444: end if;
1445:
1446: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1439: CLOSE c_get_adj; -- ENERGY
1440:
1441: if (p_log_level_rec.statement_level) then
1442: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
1443: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec);
1444: end if;
1445:
1446: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1447: l_track_member_in.reserve_adjustment_amount := l_reserve_amount; -- ENERGY
1449: h_deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1450: h_member_asset_id := mem.asset_id;
1451:
1452: if (p_log_level_rec.statement_level) then
1453: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Member Asset to be processed ',
1454: h_member_asset_id, p_log_level_rec);
1455: end if;
1456:
1457: -- Check fiscal year of populated deprn summary
1503:
1504: x_calc_done := 'N';
1505:
1506: if (p_log_level_rec.statement_level) then
1507: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++', p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1509: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec);
1510: end if;
1511:
1504: x_calc_done := 'N';
1505:
1506: if (p_log_level_rec.statement_level) then
1507: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main', '+++', p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1509: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec);
1510: end if;
1511:
1512: -- Call Allocation_main to allocate the group amount to member assets
1566:
1567: For mem in ALL_MEMBERS_MRC loop
1568:
1569: if (p_log_level_rec.statement_level) then
1570: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Reporting Book', p_log_level_rec);
1571: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1572: end if;
1573:
1574: if (nvl(P_allocate_to_fully_ret_flag,'N') = 'N' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
1567: For mem in ALL_MEMBERS_MRC loop
1568:
1569: if (p_log_level_rec.statement_level) then
1570: fa_debug_pkg.add(l_calling_fn,'regular-loop started: ', '(1)++Reporting Book', p_log_level_rec);
1571: fa_debug_pkg.add(l_calling_fn,'+++ In Loop (1) +++','+++', p_log_level_rec);
1572: end if;
1573:
1574: if (nvl(P_allocate_to_fully_ret_flag,'N') = 'N' and nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
1575: mem.period_counter_fully_reserved is NULL and (mem.period_counter_fully_retired is NULL or -- ENERGY
1590: OPEN c_get_mc_adj(mem.asset_id); -- ENERGY
1591: FETCH c_get_mc_adj INTO l_reserve_amount; -- ENERGY
1592: CLOSE c_get_mc_adj; -- ENERGY
1593: if (p_log_level_rec.statement_level) then
1594: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
1595: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec);
1596: end if;
1597:
1598: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1591: FETCH c_get_mc_adj INTO l_reserve_amount; -- ENERGY
1592: CLOSE c_get_mc_adj; -- ENERGY
1593: if (p_log_level_rec.statement_level) then
1594: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
1595: fa_debug_pkg.add(l_calling_fn,'mem.deprn_reserve', mem.deprn_reserve, p_log_level_rec);
1596: end if;
1597:
1598: l_track_member_in.deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1599: l_track_member_in.reserve_adjustment_amount := l_reserve_amount; -- ENERGY
1599: l_track_member_in.reserve_adjustment_amount := l_reserve_amount; -- ENERGY
1600: h_deprn_reserve := mem.deprn_reserve + l_reserve_amount; -- ENERGY
1601:
1602: if (p_log_level_rec.statement_level) then
1603: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (2) ++ Member Asset to be processed ',
1604: h_member_asset_id, p_log_level_rec);
1605: end if;
1606:
1607: -- Check fiscal year of populated deprn summary
1650: h_rec_cost_for_odda := mem.recoverable_cost;
1651: h_sv_for_odda := mem.salvage_value;
1652:
1653: if (p_log_level_rec.statement_level) then
1654: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main',
1655: '+++', p_log_level_rec);
1656: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1657: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec);
1658: end if;
1652:
1653: if (p_log_level_rec.statement_level) then
1654: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (3) ++ Before call allocation_main',
1655: '+++', p_log_level_rec);
1656: fa_debug_pkg.add(l_calling_fn, 'h_allocation_basis:total_allocation_basis:check_reserve_flag',
1657: h_allocation_basis||':'||h_total_allocation_basis||':'||x_check_reserve_flag, p_log_level_rec);
1658: end if;
1659:
1660: -- Call Allocation_main to allocate the group amount to member assets
1718: if nvl(x_calc_done,'N') = 'Y' and nvl(l_track_member_out.override_flag,'N') <> 'Y' then
1719:
1720: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1721: if (p_log_level_rec.statement_level) then
1722: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding Logic', 'for ADJUSTMENT', p_log_level_rec);
1723: end if;
1724:
1725: x_sum_of_deprn_amount := 0;
1726: x_sum_of_bonus_amount := 0;
1737: end if;
1738: END LOOP;
1739: else
1740: if (p_log_level_rec.statement_level) then
1741: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding Logic', 'for DEPRECIATION', p_log_level_rec);
1742: end if;
1743:
1744: select nvl(sum(system_deprn_amount),0),
1745: nvl(sum(system_bonus_amount),0)
1768: end;
1769: end if;
1770:
1771: if (p_log_level_rec.statement_level) then
1772: fa_debug_pkg.add(l_calling_fn, 'x_sum_of_deprn:bonus_amount',
1773: x_sum_of_deprn_amount||':'||x_sum_of_bonus_amount, p_log_level_rec);
1774: end if;
1775:
1776: -- Final Asset Rounding Adjustment
1787: x_allocated_bonus_amount := x_allocated_bonus_amount - h_bonus_ytd_deprn;
1788: end if;
1789:
1790: if (p_log_level_rec.statement_level) then
1791: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||
1792: x_allocated_bonus_amount, p_log_level_rec);
1793: fa_debug_pkg.add(l_calling_fn, 'x_check_reserve_flag', x_check_reserve_flag, p_log_level_rec);
1794: end if;
1795:
1789:
1790: if (p_log_level_rec.statement_level) then
1791: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)', x_allocated_deprn_amount||':'||
1792: x_allocated_bonus_amount, p_log_level_rec);
1793: fa_debug_pkg.add(l_calling_fn, 'x_check_reserve_flag', x_check_reserve_flag, p_log_level_rec);
1794: end if;
1795:
1796: if nvl(x_check_reserve_flag,'N') = 'Y' then -- Check is necessary only when allocate_fully_reserve flag is 'N'.
1797: -- Check if this member asset is not fully reserved due to this allocated amount.
1797: -- Check if this member asset is not fully reserved due to this allocated amount.
1798: x_check_amount := l_track_member_in.adjusted_recoverable_cost;
1799:
1800: if (p_log_level_rec.statement_level) then
1801: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec);
1802: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1803: x_allocated_bonus_amount, p_log_level_rec);
1804: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec);
1805: end if;
1798: x_check_amount := l_track_member_in.adjusted_recoverable_cost;
1799:
1800: if (p_log_level_rec.statement_level) then
1801: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec);
1802: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1803: x_allocated_bonus_amount, p_log_level_rec);
1804: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec);
1805: end if;
1806:
1800: if (p_log_level_rec.statement_level) then
1801: fa_debug_pkg.add(l_calling_fn, 'member_in.deprn_reserve', l_track_member_in.deprn_reserve, p_log_level_rec);
1802: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||
1803: x_allocated_bonus_amount, p_log_level_rec);
1804: fa_debug_pkg.add(l_calling_fn, 'x_check_amount', x_check_amount, p_log_level_rec);
1805: end if;
1806:
1807: -- Bug6987667:Old way did not handle when cost is -ve and rsv is +ve.
1808: -- So modified to multiply -1 if cost is -ve.
1899: x_allocated_bonus_amount := x_allocated_bonus_amount - nvl(h_bonus_expense,0);
1900: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
1901: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
1902: if (p_log_level_rec.statement_level) then
1903: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
1904: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
1905: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
1906: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
1907: end if;
1900: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
1901: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
1902: if (p_log_level_rec.statement_level) then
1903: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
1904: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
1905: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
1906: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
1907: end if;
1908: end if;
1902: if (p_log_level_rec.statement_level) then
1903: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
1904: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
1905: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
1906: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
1907: end if;
1908: end if;
1909:
1910: -- Calculate Deprn Reserve
1920: h_bonus_ytd_deprn := nvl(x_allocated_bonus_amount,0);
1921: end if;
1922:
1923: if (p_log_level_rec.statement_level) then
1924: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec);
1925: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
1926: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
1927: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
1928: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
1921: end if;
1922:
1923: if (p_log_level_rec.statement_level) then
1924: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec);
1925: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
1926: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
1927: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
1928: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
1929: ':'||h_bonus_ytd_deprn, p_log_level_rec);
1923: if (p_log_level_rec.statement_level) then
1924: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table +++', P_mode, p_log_level_rec);
1925: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
1926: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
1927: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
1928: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
1929: ':'||h_bonus_ytd_deprn, p_log_level_rec);
1930: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
1931:
1926: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
1927: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
1928: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||
1929: ':'||h_bonus_ytd_deprn, p_log_level_rec);
1930: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
1931:
1932: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1933: fa_debug_pkg.add(l_calling_fn, 'l_last_asset_index(ADJUSTMENT mode)', l_last_asset_index, p_log_level_rec);
1934: end if;
1929: ':'||h_bonus_ytd_deprn, p_log_level_rec);
1930: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
1931:
1932: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1933: fa_debug_pkg.add(l_calling_fn, 'l_last_asset_index(ADJUSTMENT mode)', l_last_asset_index, p_log_level_rec);
1934: end if;
1935: end if;
1936:
1937: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
1946: p_track_member_table(l_last_asset_index).bonus_deprn_reserve := h_bonus_deprn_reserve;
1947: p_track_member_table(l_last_asset_index).bonus_ytd_deprn := h_bonus_ytd_deprn;
1948:
1949: if (p_log_level_rec.statement_level) then
1950: fa_debug_pkg.add(l_calling_fn,
1951: 'In final asset rounding, Updated following row into p_track_member_table',
1952: l_last_asset_index, p_log_level_rec);
1953:
1954: if not display_debug_message2(l_last_asset_index, l_calling_fn, p_log_level_rec) then
1951: 'In final asset rounding, Updated following row into p_track_member_table',
1952: l_last_asset_index, p_log_level_rec);
1953:
1954: if not display_debug_message2(l_last_asset_index, l_calling_fn, p_log_level_rec) then
1955: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
1956: end if;
1957: end if;
1958: else
1959: -- ENERGY
1957: end if;
1958: else
1959: -- ENERGY
1960: if (p_log_level_rec.statement_level) then
1961: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec);
1962: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
1963: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
1964: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
1965: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
1958: else
1959: -- ENERGY
1960: if (p_log_level_rec.statement_level) then
1961: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec);
1962: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
1963: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
1964: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
1965: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
1966: end if;
1959: -- ENERGY
1960: if (p_log_level_rec.statement_level) then
1961: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec);
1962: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
1963: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
1964: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
1965: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
1966: end if;
1967: -- ENERGY
1960: if (p_log_level_rec.statement_level) then
1961: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec);
1962: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
1963: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
1964: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
1965: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
1966: end if;
1967: -- ENERGY
1968:
1961: fa_debug_pkg.add(l_calling_fn, 'before update ', '1', p_log_level_rec);
1962: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
1963: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
1964: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
1965: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
1966: end if;
1967: -- ENERGY
1968:
1969: -- Update FA_TRACK_MEMBERS table
2031: if nvl(P_allocate_to_fully_rsv_flag,'N') = 'N' and
2032: (P_excess_allocation_option = 'DISTRIBUTE' or nvl(P_group_level_override,'N') <> 'N') then
2033:
2034: if (p_log_level_rec.statement_level) then
2035: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec);
2036: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2037: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec);
2038: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2039: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec);
2032: (P_excess_allocation_option = 'DISTRIBUTE' or nvl(P_group_level_override,'N') <> 'N') then
2033:
2034: if (p_log_level_rec.statement_level) then
2035: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec);
2036: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2037: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec);
2038: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2039: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec);
2040: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec);
2034: if (p_log_level_rec.statement_level) then
2035: fa_debug_pkg.add(l_calling_fn, '+++ Reallocation Logic Start +++', '+++', p_log_level_rec);
2036: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2037: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec);
2038: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2039: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec);
2040: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec);
2041: end if;
2042:
2036: fa_debug_pkg.add(l_calling_fn, 'h_difference_deprn:bonus_amount',
2037: h_difference_deprn_amount||':'||h_difference_bonus_amount, p_log_level_rec);
2038: fa_debug_pkg.add(l_calling_fn, 'P_allocate_to_fully_rsv_flag:P_excess_allocation_option',
2039: P_allocate_to_fully_rsv_flag||':'||P_excess_allocation_option, p_log_level_rec);
2040: fa_debug_pkg.add(l_calling_fn, 'P_group_level_override', P_group_level_override, p_log_level_rec);
2041: end if;
2042:
2043: -- Logic to reallocate amounts
2044: h_group_deprn_amount := h_deprn_amount;
2133:
2134: end if;
2135:
2136: if (p_log_level_rec.statement_level) then
2137: fa_debug_pkg.add(l_calling_fn, 'h_fixed_deprn:bonus_amount',
2138: h_fixed_deprn_amount||':'||h_fixed_bonus_amount);
2139: end if;
2140:
2141: h_group_deprn_amount := h_deprn_amount - h_fixed_deprn_amount;
2190: l_track_member_in := p_track_member_table(j);
2191: h_member_asset_id := l_track_member_in.member_asset_id;
2192:
2193: if (p_log_level_rec.statement_level) then
2194: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset (Adjustment Mode)',
2195: l_track_member_in.member_asset_id, p_log_level_rec);
2196: end if;
2197:
2198: if h_current_period_number = 1 then
2259:
2260: l_processed_number := j;
2261:
2262: if (p_log_level_rec.statement_level) then
2263: fa_debug_pkg.add(l_calling_fn,
2264: 'In reallocation logic, Updated following row into p_track_member_table',
2265: l_processed_number, p_log_level_rec);
2266:
2267: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2264: 'In reallocation logic, Updated following row into p_track_member_table',
2265: l_processed_number, p_log_level_rec);
2266:
2267: if not display_debug_message2(l_processed_number, l_calling_fn, p_log_level_rec) then
2268: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
2269: end if;
2270: end if;
2271:
2272: end if;
2285: l_track_member_in.deprn_reserve := realloc.deprn_reserve;
2286: l_track_member_in.override_flag := nvl(realloc.override_flag,'N');
2287:
2288: if (p_log_level_rec.statement_level) then
2289: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset(Prmary Book)',
2290: l_track_member_in.member_asset_id, p_log_level_rec);
2291: end if;
2292:
2293: if h_current_period_number = 1 then
2304: OPEN c_get_adj(realloc.member_asset_id);
2305: FETCH c_get_adj INTO l_reserve_amount;
2306: CLOSE c_get_adj;
2307: if (p_log_level_rec.statement_level) then
2308: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
2309: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec);
2310: end if;
2311:
2312: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2305: FETCH c_get_adj INTO l_reserve_amount;
2306: CLOSE c_get_adj;
2307: if (p_log_level_rec.statement_level) then
2308: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
2309: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec);
2310: end if;
2311:
2312: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2313: l_track_member_in.reserve_adjustment_amount := l_reserve_amount;
2369: l_track_member_in.deprn_reserve := realloc.deprn_reserve;
2370: l_track_member_in.override_flag := nvl(realloc.override_flag,'N');
2371:
2372: if (p_log_level_rec.statement_level) then
2373: fa_debug_pkg.add(l_calling_fn, 'Reallocate to member asset (Reporting Book)',
2374: l_track_member_in.member_asset_id, p_log_level_rec);
2375: end if;
2376:
2377: if h_current_period_number = 1 then
2388: OPEN c_get_mc_adj(realloc.member_asset_id);
2389: FETCH c_get_mc_adj INTO l_reserve_amount;
2390: CLOSE c_get_mc_adj;
2391: if (p_log_level_rec.statement_level) then
2392: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
2393: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec);
2394: end if;
2395:
2396: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2389: FETCH c_get_mc_adj INTO l_reserve_amount;
2390: CLOSE c_get_mc_adj;
2391: if (p_log_level_rec.statement_level) then
2392: fa_debug_pkg.add(l_calling_fn,'l_reserve_amount', l_reserve_amount, p_log_level_rec);
2393: fa_debug_pkg.add(l_calling_fn,'realloc.deprn_reserve', realloc.deprn_reserve, p_log_level_rec);
2394: end if;
2395:
2396: l_track_member_in.deprn_reserve := realloc.deprn_reserve + l_reserve_amount;
2397: l_track_member_in.reserve_adjustment_amount := l_reserve_amount;
2452: if nvl(x_calc_done,'N') = 'Y' and
2453: nvl(l_track_member_out.override_flag,'N') <> 'Y' and nvl(h_all_member_fully_reserved,'N') = 'N' then
2454:
2455: if (p_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding (Reallocation) Start ++', '+++', p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'h_system_deprn:bonus_amount',
2458: h_system_deprn_amount||':'||h_system_bonus_amount, p_log_level_rec);
2459: end if;
2460:
2453: nvl(l_track_member_out.override_flag,'N') <> 'Y' and nvl(h_all_member_fully_reserved,'N') = 'N' then
2454:
2455: if (p_log_level_rec.statement_level) then
2456: fa_debug_pkg.add(l_calling_fn, '+++ Final Asset Rounding (Reallocation) Start ++', '+++', p_log_level_rec);
2457: fa_debug_pkg.add(l_calling_fn, 'h_system_deprn:bonus_amount',
2458: h_system_deprn_amount||':'||h_system_bonus_amount, p_log_level_rec);
2459: end if;
2460:
2461: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2495: and nvl(set_of_books_id,-99) = nvl(h_set_of_books_id,-99);
2496: end if;
2497:
2498: if (p_log_level_rec.statement_level) then
2499: fa_debug_pkg.add(l_calling_fn, 'x_sum_of_deprn:bonus_amount(realloc)',
2500: x_sum_of_deprn_amount||':'||x_sum_of_bonus_amount, p_log_level_rec);
2501: end if;
2502:
2503: -- Final Asset Rounding Adjustment
2595: h_bonus_ytd_deprn := nvl(x_allocated_bonus_amount,0);
2596: end if;
2597:
2598: if (p_log_level_rec.statement_level) then
2599: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode, p_log_level_rec);
2600: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2601: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
2602: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2603: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2596: end if;
2597:
2598: if (p_log_level_rec.statement_level) then
2599: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode, p_log_level_rec);
2600: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2601: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
2602: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2603: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2604: h_bonus_ytd_deprn, p_log_level_rec);
2598: if (p_log_level_rec.statement_level) then
2599: fa_debug_pkg.add(l_calling_fn,'+++ Just before update table or PL/SQL table (Realloc) +++', P_mode, p_log_level_rec);
2600: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount',
2601: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
2602: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2603: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2604: h_bonus_ytd_deprn, p_log_level_rec);
2605: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
2606:
2601: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
2602: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn:h_deprn_reserve:h_bonus_ytd_deprn:h_bonus_deprn_reserve',
2603: h_ytd_deprn||':'||h_deprn_reserve||':'||h_bonus_deprn_reserve||':'||
2604: h_bonus_ytd_deprn, p_log_level_rec);
2605: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
2606:
2607: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2608: fa_debug_pkg.add(l_calling_fn, 'l_processed_number', l_processed_number, p_log_level_rec);
2609: end if;
2604: h_bonus_ytd_deprn, p_log_level_rec);
2605: fa_debug_pkg.add(l_calling_fn, 'x_fully_reserved_flag', x_fully_reserved_flag, p_log_level_rec);
2606:
2607: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2608: fa_debug_pkg.add(l_calling_fn, 'l_processed_number', l_processed_number, p_log_level_rec);
2609: end if;
2610: end if;
2611:
2612: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
2621: p_track_member_table(l_processed_number).bonus_ytd_deprn := h_bonus_ytd_deprn;
2622: else
2623: -- ENERGY
2624: if (p_log_level_rec.statement_level) then
2625: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec);
2626: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
2627: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
2628: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
2629: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
2622: else
2623: -- ENERGY
2624: if (p_log_level_rec.statement_level) then
2625: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec);
2626: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
2627: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
2628: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
2629: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
2630: end if;
2623: -- ENERGY
2624: if (p_log_level_rec.statement_level) then
2625: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec);
2626: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
2627: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
2628: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
2629: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
2630: end if;
2631: -- ENERGY
2624: if (p_log_level_rec.statement_level) then
2625: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec);
2626: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
2627: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
2628: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
2629: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
2630: end if;
2631: -- ENERGY
2632: -- Update FA_TRACK_MEMBERS table
2625: fa_debug_pkg.add(l_calling_fn, 'before update ', '2', p_log_level_rec);
2626: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
2627: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount', x_allocated_deprn_amount, p_log_level_rec);
2628: fa_debug_pkg.add(l_calling_fn, 'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
2629: fa_debug_pkg.add(l_calling_fn, 'h_deprn_reserve', h_deprn_reserve, p_log_level_rec);
2630: end if;
2631: -- ENERGY
2632: -- Update FA_TRACK_MEMBERS table
2633: update FA_TRACK_MEMBERS
2764: p_track_member_table(j).ytd_deprn := nvl(p_track_member_table(j).ytd_deprn,0) + h_unplanned_expense;
2765: p_track_member_table(j).deprn_reserve := nvl(p_track_member_table(j).deprn_reserve,0) +
2766: h_unplanned_expense;
2767: if (p_log_level_rec.statement_level) then
2768: fa_debug_pkg.add(l_calling_fn,'Added Unplanned Depreciation Expense',
2769: h_unplanned_member_asset||':'||h_unplanned_expense||','||h_period_counter);
2770: end if;
2771: end if;
2772:
2805: end if;
2806:
2807: if (p_log_level_rec.statement_level) then
2808:
2809: fa_debug_pkg.add(l_calling_fn, 'Inserted new row into p_track_member_table',
2810: l_processed_number, p_log_level_rec);
2811:
2812: if not display_debug_message2(l_processed_number, l_calling_fn) then
2813: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
2809: fa_debug_pkg.add(l_calling_fn, 'Inserted new row into p_track_member_table',
2810: l_processed_number, p_log_level_rec);
2811:
2812: if not display_debug_message2(l_processed_number, l_calling_fn) then
2813: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2', 'error returned', p_log_level_rec);
2814: end if;
2815: end if;
2816: end if;
2817: end LOOP; -- All PL/SQL table check
2936: nbv_absval := abs(P_adj_rec_cost - (P_current_deprn_reserve + P_year_deprn_exp + P_perd_deprn_exp));
2937:
2938: -- Debug
2939: if (p_log_level_rec.statement_level) then
2940: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec);
2941: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
2942: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp
2943: , p_log_level_rec);
2944: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
2937:
2938: -- Debug
2939: if (p_log_level_rec.statement_level) then
2940: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec);
2941: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
2942: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp
2943: , p_log_level_rec);
2944: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
2945: nbv_absval||':'||P_nbv_threshold||':'||P_nbv_thresh_amount, p_log_level_rec);
2940: fa_debug_pkg.add(l_calling_fn,'++ CHECK_GROUP_AMOUNT ++++', 'Parameters', p_log_level_rec);
2941: fa_debug_pkg.add(l_calling_fn,'P_adj_rec_cost:P_cur_deprn_rsv:P_year_deprn_exp:P_perd_deprn_exp',
2942: P_adj_rec_cost||':'||P_current_deprn_reserve||':'||P_year_deprn_exp||':'||P_perd_deprn_exp
2943: , p_log_level_rec);
2944: fa_debug_pkg.add(l_calling_fn,'nbv_absval:P_nbv_threshold:P_nbv_threshold_amount',
2945: nbv_absval||':'||P_nbv_threshold||':'||P_nbv_thresh_amount, p_log_level_rec);
2946: end if;
2947:
2948: -- Get the absolute value of the asset's Adjusted Recoverable Cost, do not use Recoverable Cost
3165: FA_CACHE_PKG.fazcbc_record.set_of_books_id);
3166: end if;
3167:
3168: if (p_log_level_rec.statement_level) then
3169: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec);
3170: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id', h_set_of_books_id, p_log_level_rec);
3171: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3172: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn
3173: , p_log_level_rec);
3166: end if;
3167:
3168: if (p_log_level_rec.statement_level) then
3169: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec);
3170: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id', h_set_of_books_id, p_log_level_rec);
3171: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3172: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn
3173: , p_log_level_rec);
3174: end if;
3167:
3168: if (p_log_level_rec.statement_level) then
3169: fa_debug_pkg.add(l_calling_fn, '+++ ALLOCATION_MAIN start +++', '+++', p_log_level_rec);
3170: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id', h_set_of_books_id, p_log_level_rec);
3171: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_amount:P_allocation_basis:P_total_allocation_basis:P_ytd_deprn',
3172: P_group_deprn_amount||':'||P_allocation_basis||':'||P_total_allocation_basis||':'||P_ytd_deprn
3173: , p_log_level_rec);
3174: end if;
3175:
3236:
3237: x_allocated_normal_amount := x_allocated_deprn_amount - x_allocated_bonus_amount;
3238:
3239: if (p_log_level_rec.statement_level) then
3240: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)',
3241: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3242: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3243: x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3244: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec);
3238:
3239: if (p_log_level_rec.statement_level) then
3240: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)',
3241: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3242: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3243: x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3244: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec);
3245: end if;
3246:
3240: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount(1)',
3241: x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3242: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3243: x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3244: fa_debug_pkg.add(l_calling_fn, 'x_allocated_normal_amount', x_allocated_normal_amount, p_log_level_rec);
3245: end if;
3246:
3247: -- Set calculation flag
3248: x_calc_done := 'Y';
3262:
3263: savepoint member_override; -- In case this override is not acceptable, need to be rollbacked
3264:
3265: if (p_log_level_rec.statement_level) then
3266: fa_debug_pkg.add(l_calling_fn, 'l_processing_member_table', l_processing_member_table);
3267: end if;
3268:
3269: if nvl(l_processing_member_table,'NO') = 'YES' then -- This is a case to call override_member_amounts
3270:
3268:
3269: if nvl(l_processing_member_table,'NO') = 'YES' then -- This is a case to call override_member_amounts
3270:
3271: if (p_log_level_rec.statement_level) then
3272: fa_debug_pkg.add(l_calling_fn, 'Query overridden amount from override table', '***', p_log_level_rec);
3273: end if;
3274:
3275: if not override_member_amount(p_book_type_code => P_book_type_code,
3276: p_member_asset_id => P_member_asset_id,
3314: end if;
3315: end if;
3316:
3317: if (p_log_level_rec.statement_level) then
3318: fa_debug_pkg.add(l_calling_fn, 'h_deprn_override_flag', h_deprn_override_flag, p_log_level_rec);
3319: end if;
3320:
3321: h_deprn_override := 0;
3322: if h_deprn_override_flag <> fa_std_types.FA_NO_OVERRIDE then
3342: end if; -- override flag check
3343: end if; -- override is enable or not
3344:
3345: if (p_log_level_rec.statement_level) then
3346: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec);
3347: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec);
3348: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3349: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec);
3350: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec);
3343: end if; -- override is enable or not
3344:
3345: if (p_log_level_rec.statement_level) then
3346: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec);
3347: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec);
3348: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3349: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec);
3350: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec);
3351: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec);
3344:
3345: if (p_log_level_rec.statement_level) then
3346: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec);
3347: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec);
3348: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3349: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec);
3350: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec);
3351: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec);
3352: end if;
3346: fa_debug_pkg.add(l_calling_fn, 'P_group_deprn_override', P_group_level_override, p_log_level_rec);
3347: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec);
3348: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3349: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec);
3350: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec);
3351: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec);
3352: end if;
3353:
3354: -- Check if this member asset is not fully reserved due to this allocated amount.
3347: fa_debug_pkg.add(l_calling_fn, 'P_check_reserve_flag', P_check_reserve_flag, p_log_level_rec);
3348: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.adjusted_recoverable_cost:recoverable_cost',
3349: P_track_member_in.adjusted_recoverable_cost||':'||P_track_member_in.recoverable_cost, p_log_level_rec);
3350: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.deprn_reserve',P_track_member_in.deprn_reserve, p_log_level_rec);
3351: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn_amount',x_allocated_deprn_amount, p_log_level_rec);
3352: end if;
3353:
3354: -- Check if this member asset is not fully reserved due to this allocated amount.
3355: if P_check_reserve_flag = 'Y' then
3432: x_allocated_bonus_amount := x_allocated_bonus_amount - nvl(h_bonus_expense,0);
3433: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
3434: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
3435: if (p_log_level_rec.statement_level) then
3436: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
3437: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
3438: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
3439: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3440: x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec);
3433: -- X_system_deprn_amount := x_system_deprn_amount - nvl(h_deprn_expense,0);
3434: -- X_system_bonus_amount := x_system_bonus_amount - nvl(h_bonus_expense,0);
3435: if (p_log_level_rec.statement_level) then
3436: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
3437: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
3438: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
3439: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3440: x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec);
3441: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
3435: if (p_log_level_rec.statement_level) then
3436: fa_debug_pkg.add(l_calling_fn, '** after Subtraction Case **', '***', p_log_level_rec);
3437: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
3438: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
3439: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3440: x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec);
3441: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
3442: end if;
3443: end if;
3437: fa_debug_pkg.add(l_calling_fn, 'x_allocated_deprn:bonus_amount',
3438: x_allocated_deprn_amount||':'||x_allocated_deprn_amount, p_log_level_rec);
3439: fa_debug_pkg.add(l_calling_fn, 'x_system_deprn:bonus_amount',
3440: x_system_deprn_amount||':'||x_system_deprn_amount, p_log_level_rec);
3441: fa_debug_pkg.add(l_calling_fn, 'h_deprn:bonus_expense', h_deprn_expense||':'||h_bonus_expense, p_log_level_rec);
3442: end if;
3443: end if;
3444:
3445: if (p_log_level_rec.statement_level) then
3442: end if;
3443: end if;
3444:
3445: if (p_log_level_rec.statement_level) then
3446: fa_debug_pkg.add(l_calling_fn, 'P_track_member_in.reserve_adjustment_amount', -- ENERGY
3447: P_track_member_in.reserve_adjustment_amount, p_log_level_rec); -- ENERGY
3448: end if;
3449:
3450: -- Calculate Reserve Amount
3478: h_recoverable_cost := P_track_member_in.recoverable_cost;
3479: h_adjusted_recoverable_cost := P_track_member_in.adjusted_recoverable_cost;
3480:
3481: if (p_log_level_rec.statement_level) then
3482: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode, p_log_level_rec);
3483: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3484: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3479: h_adjusted_recoverable_cost := P_track_member_in.adjusted_recoverable_cost;
3480:
3481: if (p_log_level_rec.statement_level) then
3482: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode, p_log_level_rec);
3483: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3484: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3481: if (p_log_level_rec.statement_level) then
3482: fa_debug_pkg.add(l_calling_fn,'+++ Just before storing calculated amounts (mode=)', P_mode, p_log_level_rec);
3483: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3484: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3483: fa_debug_pkg.add(l_calling_fn,'h_group_asset:h_member_asset:h_period_counter:h_fiscal_year',
3484: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3490: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec);
3491: 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);
3484: h_group_asset_id||':'||h_member_asset_id||':'||h_period_counter||':'||h_fiscal_year, p_log_level_rec);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3490: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec);
3491: 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);
3492: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag);
3485: fa_debug_pkg.add(l_calling_fn, 'h_cost:h_adjusted_cost:h_salvage_value:h_recoverable_cost:h_adj_rec_cost',
3486: h_cost||':'||h_adjusted_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_recoverable_cost, p_log_level_rec);
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3490: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec);
3491: 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);
3492: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag);
3493: end if;
3487: fa_debug_pkg.add(l_calling_fn,'x_allocated_deprn:bonus_amount(2)', x_allocated_deprn_amount||':'||x_allocated_bonus_amount, p_log_level_rec);
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3490: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec);
3491: 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);
3492: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag);
3493: end if;
3494:
3495: if nvl(P_mode,'DEPRECIATION') <> 'ADJUSTMENT' then
3488: fa_debug_pkg.add(l_calling_fn,'x_system_deprn:bonus_amount(2)', x_system_deprn_amount||':'||x_system_bonus_amount, p_log_level_rec);
3489: fa_debug_pkg.add(l_calling_fn, 'x_ytd_deprn:x_deprn_reserve:x_bonus_ytd_deprn:x_bonus_deprn_reserve',
3490: x_ytd_deprn||':'||x_deprn_reserve||':'||x_bonus_deprn_reserve||':'||x_bonus_ytd_deprn, p_log_level_rec);
3491: 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);
3492: fa_debug_pkg.add(l_calling_fn, 'h_fully_reserved_flag', x_fully_reserved_flag);
3493: end if;
3494:
3495: if nvl(P_mode,'DEPRECIATION') <> 'ADJUSTMENT' then
3496: -- Check if the row has been inserted
3499: open CHECK_EXISTS;
3500: fetch CHECK_EXISTS into x_dummy;
3501: close CHECK_EXISTS;
3502: if (p_log_level_rec.statement_level) then
3503: fa_debug_pkg.add('allocation_main','insert/update check', x_dummy, p_log_level_rec);
3504: end if;
3505:
3506: --bug6923135
3507: --Placing nvl around variables so that pro*c code can handle the fetched value.
4203:
4204: if p_group_rule_in.tracking_method = 'ALLOCATE' and nvl(l_process_deprn_for_member,'YES') = 'YES' then
4205:
4206: if (p_log_level_rec.statement_level) then
4207: fa_debug_pkg.add(l_calling_fn, '+++ Update Depreciable Basis for member assets +++', '+++', p_log_level_rec);
4208: end if;
4209: -- Initialization
4210: h_book_type_code := p_group_rule_in.book_type_code;
4211: h_group_asset_id := p_group_rule_in.asset_id;
4229: close GET_EXCLUDE_FULLY_RSV_FLAG_MRC;
4230: end if;
4231:
4232: if (p_log_level_rec.statement_level) then
4233: fa_debug_pkg.add(l_calling_fn, 'h_sob_id:group_asset_id:period_counter:fiscal_year:cur_period_num:mode',
4234: 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);
4235: end if;
4236:
4237: -- If this is called during Adjustment and this is oldest period to be calculated,
4240: if nvl(P_mode,'DEPRECIATION') = 'ADJUSTMENT' then
4241:
4242: if not p_track_member_table.exists(1) then
4243: if (p_log_level_rec.statement_level) then
4244: fa_debug_pkg.add(l_calling_fn, '++ populate previous rows call ++', 'ADJUSTMENT MDOE', p_log_level_rec);
4245: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
4246: end if;
4247:
4248: l_transaction_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4241:
4242: if not p_track_member_table.exists(1) then
4243: if (p_log_level_rec.statement_level) then
4244: fa_debug_pkg.add(l_calling_fn, '++ populate previous rows call ++', 'ADJUSTMENT MDOE', p_log_level_rec);
4245: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
4246: end if;
4247:
4248: l_transaction_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4249:
4267: p_allocate_to_fully_ret_flag => p_group_rule_in.allocate_to_fully_ret_flag,
4268: p_allocate_to_fully_rsv_flag => p_group_rule_in.allocate_to_fully_rsv_flag,
4269: p_mrc_sob_type_code => p_group_rule_in.mrc_sob_type_code) then
4270: if (p_log_level_rec.statement_level) then
4271: fa_debug_pkg.add(l_calling_fn, '++ populate_member_amounts_table ++', 'Returned FALSE', p_log_level_rec);
4272: end if;
4273: raise upd_deprn_err;
4274: end if;
4275: end if; -- End of preparion for Adjustment mode
4274: end if;
4275: end if; -- End of preparion for Adjustment mode
4276:
4277: if (p_log_level_rec.statement_level) then
4278: fa_debug_pkg.add(l_calling_fn, '++ populate_previous_rows done ++', '+++', p_log_level_rec);
4279: fa_debug_pkg.add(l_calling_fn, 'group_in.adj_transaction_header_id',
4280: p_group_rule_in.adj_transaction_header_id, p_log_level_rec);
4281: end if;
4282:
4275: end if; -- End of preparion for Adjustment mode
4276:
4277: if (p_log_level_rec.statement_level) then
4278: fa_debug_pkg.add(l_calling_fn, '++ populate_previous_rows done ++', '+++', p_log_level_rec);
4279: fa_debug_pkg.add(l_calling_fn, 'group_in.adj_transaction_header_id',
4280: p_group_rule_in.adj_transaction_header_id, p_log_level_rec);
4281: end if;
4282:
4283: -- Before starting to process member deprn basis update,
4290: -- In this period, come transaction has occurred.
4291: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4292:
4293: if (p_log_level_rec.statement_level) then
4294: fa_debug_pkg.add(l_calling_fn, '++ Logic for member header id is not NULL ++', '+++', p_log_level_rec);
4295: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec);
4296: end if;
4297:
4298: select asset_id,transaction_type_code,transaction_key,nvl(amortization_start_date,transaction_date_entered)
4291: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4292:
4293: if (p_log_level_rec.statement_level) then
4294: fa_debug_pkg.add(l_calling_fn, '++ Logic for member header id is not NULL ++', '+++', p_log_level_rec);
4295: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec);
4296: end if;
4297:
4298: select asset_id,transaction_type_code,transaction_key,nvl(amortization_start_date,transaction_date_entered)
4299: into h_asset_id,h_transaction_type_code,h_transaction_key,l_transaction_date_entered
4321:
4322: h_trans_period_counter := h_trans_fiscal_year*h_period_per_fiscal_year+h_trans_period_num;
4323:
4324: if (p_log_level_rec.statement_level) then
4325: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec);
4326: 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);
4327: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec);
4328: end if;
4329: end if;
4322: h_trans_period_counter := h_trans_fiscal_year*h_period_per_fiscal_year+h_trans_period_num;
4323:
4324: if (p_log_level_rec.statement_level) then
4325: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec);
4326: 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);
4327: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec);
4328: end if;
4329: end if;
4330:
4323:
4324: if (p_log_level_rec.statement_level) then
4325: fa_debug_pkg.add(l_calling_fn, 'h_asset_id', h_asset_id, p_log_level_rec);
4326: 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);
4327: fa_debug_pkg.add(l_calling_fn, 'h_trans_period_counter', h_trans_period_counter, p_log_level_rec);
4328: end if;
4329: end if;
4330:
4331: if p_group_rule_in.event_type <> 'AFTER_DEPRN' then
4332:
4333: For i in 1 .. p_track_member_table.count loop
4334:
4335: if (p_log_level_rec.statement_level) then
4336: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1): Loop indicator +++', i, p_log_level_rec);
4337: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count, p_log_level_rec);
4338: end if;
4339:
4340: l_track_member := p_track_member_table(i);
4333: For i in 1 .. p_track_member_table.count loop
4334:
4335: if (p_log_level_rec.statement_level) then
4336: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1): Loop indicator +++', i, p_log_level_rec);
4337: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count, p_log_level_rec);
4338: end if;
4339:
4340: l_track_member := p_track_member_table(i);
4341:
4359:
4360: then
4361:
4362: if (p_log_level_rec.statement_level) then
4363: fa_debug_pkg.add(l_calling_fn, 'member_table('||i||').member_asset_id:retired_flag:reserved_flag:period_counter',
4364: p_track_member_table(i).member_asset_id||':'||p_track_member_table(i).fully_retired_flag||':'||
4365: p_track_member_table(i).fully_reserved_flag||':'||p_track_member_table(i).period_counter, p_log_level_rec);
4366: end if;
4367:
4366: end if;
4367:
4368: h_member_asset_id := l_track_member.member_asset_id;
4369: if (p_log_level_rec.statement_level) then
4370: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) + h_member_asset_id', h_member_asset_id, p_log_level_rec);
4371: end if;
4372:
4373: h_adj_eofy_reserve := 0;
4374:
4451: h_adj_eofy_reserve := 0;
4452: end if;
4453:
4454: if (p_log_level_rec.statement_level) then
4455: fa_debug_pkg.add(l_calling_fn, 'h_adj_eofy_reserve', h_adj_eofy_reserve, p_log_level_rec);
4456: end if;
4457: end if;
4458: else -- This transaction is not for this transaction
4459: h_adj_cost := 0;
4496: h_catchup_expense := nvl(h_catchup_expense,0);
4497: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4498:
4499: if (p_log_level_rec.statement_level) then
4500: 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);
4501: 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);
4502: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4503: end if;
4504:
4497: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4498:
4499: if (p_log_level_rec.statement_level) then
4500: 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);
4501: 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);
4502: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4503: end if;
4504:
4505: h_current_cost := l_track_member.cost;
4498:
4499: if (p_log_level_rec.statement_level) then
4500: 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);
4501: 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);
4502: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4503: end if;
4504:
4505: h_current_cost := l_track_member.cost;
4506: h_current_salvage_value := l_track_member.salvage_value;
4607: if (p_log_level_rec.statement_level) then
4608: if not display_debug_message(fa_rule_in => fa_rule_in,
4609: p_calling_fn => l_calling_fn,
4610: p_log_level_rec => p_log_level_rec) then
4611: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
4612: end if;
4613: end if;
4614:
4615: -- Call Deprn Basis Rule for this transaction or period
4619: raise upd_deprn_err;
4620: end if;
4621:
4622: if (p_log_level_rec.statement_level) then
4623: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4624: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4625: fa_rule_out.new_adjusted_cost, p_log_level_rec);
4626: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4627: end if;
4620: end if;
4621:
4622: if (p_log_level_rec.statement_level) then
4623: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4624: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4625: fa_rule_out.new_adjusted_cost, p_log_level_rec);
4626: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4627: end if;
4628:
4622: if (p_log_level_rec.statement_level) then
4623: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4624: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost',
4625: fa_rule_out.new_adjusted_cost, p_log_level_rec);
4626: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4627: end if;
4628:
4629: p_track_member_table(i).group_asset_id := h_group_asset_id;
4630: p_track_member_table(i).member_asset_id := h_member_asset_id;
4655: end if;
4656: END LOOP;
4657:
4658: if (p_log_level_rec.statement_level) then
4659: fa_debug_pkg.add(l_calling_fn, '++ Finally updated p_track_member_table ', i, p_log_level_rec);
4660: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
4661: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
4662: end if;
4663: end if;
4657:
4658: if (p_log_level_rec.statement_level) then
4659: fa_debug_pkg.add(l_calling_fn, '++ Finally updated p_track_member_table ', i, p_log_level_rec);
4660: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
4661: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
4662: end if;
4663: end if;
4664:
4665: end if; -- allocation type
4667:
4668: else -- In case of AFTER_DEPRN with ADJUSTMENT mode
4669:
4670: if (p_log_level_rec.statement_level) then
4671: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop', p_log_level_rec);
4672: 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);
4673: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1), p_log_level_rec);
4674: end if;
4675:
4668: else -- In case of AFTER_DEPRN with ADJUSTMENT mode
4669:
4670: if (p_log_level_rec.statement_level) then
4671: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop', p_log_level_rec);
4672: 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);
4673: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1), p_log_level_rec);
4674: end if;
4675:
4676: For i in 1 .. p_track_member_table.count loop
4669:
4670: if (p_log_level_rec.statement_level) then
4671: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (0) for AFTER_DEPRN ++ Indicator ++', 'Just before loop', p_log_level_rec);
4672: 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);
4673: fa_debug_pkg.add(l_calling_fn, 'period_Counter to be updated', (h_period_counter + 1), p_log_level_rec);
4674: end if;
4675:
4676: For i in 1 .. p_track_member_table.count loop
4677:
4675:
4676: For i in 1 .. p_track_member_table.count loop
4677:
4678: if (p_log_level_rec.statement_level) then
4679: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for AFTER_DEPRN ++ Indicator ++', i, p_log_level_rec);
4680: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count, p_log_level_rec);
4681: end if;
4682:
4683: l_track_member := p_track_member_table(i);
4676: For i in 1 .. p_track_member_table.count loop
4677:
4678: if (p_log_level_rec.statement_level) then
4679: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for AFTER_DEPRN ++ Indicator ++', i, p_log_level_rec);
4680: fa_debug_pkg.add(l_calling_fn, 'Loop until (exit number)', p_track_member_table.count, p_log_level_rec);
4681: end if;
4682:
4683: l_track_member := p_track_member_table(i);
4684: if nvl(l_track_member.group_asset_id, -99) = h_group_asset_id and
4701:
4702: then
4703:
4704: if (p_log_level_rec.statement_level) then
4705: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table('||i||').member_asset_id:retired_flag:reserved_flag:period_counter',
4706: p_track_member_table(i).member_asset_id||':'||p_track_member_table(i).fully_retired_flag||':'||
4707: p_track_member_table(i).fully_reserved_flag||':'||p_track_member_table(i).period_counter, p_log_level_rec);
4708: end if;
4709:
4708: end if;
4709:
4710: h_member_asset_id := l_track_member.member_asset_id;
4711: if (p_log_level_rec.statement_level) then
4712: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4713: end if;
4714:
4715: h_current_cost := l_track_member.cost;
4716: h_current_salvage_value := l_track_member.salvage_value;
4769: h_catchup_expense := nvl(h_catchup_expense,0);
4770: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4771:
4772: if (p_log_level_rec.statement_level) then
4773: 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);
4774: 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);
4775: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4776: end if;
4777:
4770: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4771:
4772: if (p_log_level_rec.statement_level) then
4773: 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);
4774: 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);
4775: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4776: end if;
4777:
4778: fa_rule_in.asset_type := x_asset_type;
4771:
4772: if (p_log_level_rec.statement_level) then
4773: 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);
4774: 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);
4775: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4776: end if;
4777:
4778: fa_rule_in.asset_type := x_asset_type;
4779: fa_rule_in.adjustment_amount := nvl(x_added_cost,0) + nvl(x_retired_cost,0);
4820: if (p_log_level_rec.statement_level) then
4821: if not display_debug_message(fa_rule_in => fa_rule_in,
4822: p_calling_fn => l_calling_fn,
4823: p_log_level_rec => p_log_level_rec) then
4824: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
4825: end if;
4826: end if;
4827:
4828: -- Call Deprn Basis Rule for this transaction or period
4832: raise upd_deprn_err;
4833: end if;
4834:
4835: if (p_log_level_rec.statement_level) then
4836: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4837: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
4838: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4839: end if;
4840:
4833: end if;
4834:
4835: if (p_log_level_rec.statement_level) then
4836: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4837: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
4838: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4839: end if;
4840:
4841: -- Calculate EOFY_RESERVE as prior year reserve amount
4834:
4835: if (p_log_level_rec.statement_level) then
4836: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4837: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
4838: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_current_cost, p_log_level_rec);
4839: end if;
4840:
4841: -- Calculate EOFY_RESERVE as prior year reserve amount
4842: if nvl(fa_rule_in.eofy_flag,'N') = 'Y' then
4845: h_new_eofy_reserve := l_track_member.eofy_reserve;
4846: end if;
4847:
4848: if (p_log_level_rec.statement_level) then
4849: fa_debug_pkg.add(l_calling_fn, 'update_deprn:h_new_eofy_reserve', h_new_eofy_reserve, p_log_level_rec);
4850: end if;
4851:
4852: p_track_member_table(i).adjusted_cost := fa_rule_out.new_adjusted_cost;
4853: p_track_member_table(i).eofy_reserve := h_new_eofy_reserve;
4852: p_track_member_table(i).adjusted_cost := fa_rule_out.new_adjusted_cost;
4853: p_track_member_table(i).eofy_reserve := h_new_eofy_reserve;
4854:
4855: if (p_log_level_rec.statement_level) then
4856: fa_debug_pkg.add(l_calling_fn, '++ End of updating p_track_member_table after depreciation', i, p_log_level_rec);
4857: if not display_debug_message2(i, l_calling_fn,p_log_level_rec => p_log_level_rec) then
4858: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2','returned error', p_log_level_rec);
4859: end if;
4860: end if;
4854:
4855: if (p_log_level_rec.statement_level) then
4856: fa_debug_pkg.add(l_calling_fn, '++ End of updating p_track_member_table after depreciation', i, p_log_level_rec);
4857: if not display_debug_message2(i, l_calling_fn,p_log_level_rec => p_log_level_rec) then
4858: fa_debug_pkg.add(l_calling_fn, 'display_debug_message2','returned error', p_log_level_rec);
4859: end if;
4860: end if;
4861:
4862: end if; -- allocation type
4870: nvl(p_group_rule_in.eofy_flag,'N') = 'Y' and
4871: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
4872:
4873: if (p_log_level_rec.statement_level) then
4874: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec);
4875: end if;
4876:
4877: For t IN 1.. p_track_member_table.COUNT LOOP
4878: if nvl(p_track_member_table(t).fully_reserved_flag,'N') = 'Y' and
4879: nvl(p_track_member_table(t).set_of_books_id,-99) = nvl(h_set_of_books_id,-99) then
4880: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
4881: - nvl(p_track_member_table(t).deprn_reserve,0);
4882: if (p_log_level_rec.statement_level) then
4883: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset', h_member_asset_id, p_log_level_rec);
4884: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
4885: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter, p_log_level_rec);
4886: end if;
4887: end if;
4880: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
4881: - nvl(p_track_member_table(t).deprn_reserve,0);
4882: if (p_log_level_rec.statement_level) then
4883: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset', h_member_asset_id, p_log_level_rec);
4884: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
4885: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter, p_log_level_rec);
4886: end if;
4887: end if;
4888: End Loop;
4887: end if;
4888: End Loop;
4889:
4890: if (p_log_level_rec.statement_level) then
4891: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Ended++++', p_log_level_rec);
4892: end if;
4893: end if;
4894:
4895: end if; -- event_type check
4902:
4903: h_member_asset_id := member.member_asset_id;
4904:
4905: if (p_log_level_rec.statement_level) then
4906: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Primary/Non-MRC Book +++', '+++', p_log_level_rec);
4907: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4908: end if;
4909:
4910: fa_rule_in := p_group_rule_in;
4903: h_member_asset_id := member.member_asset_id;
4904:
4905: if (p_log_level_rec.statement_level) then
4906: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Primary/Non-MRC Book +++', '+++', p_log_level_rec);
4907: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
4908: end if;
4909:
4910: fa_rule_in := p_group_rule_in;
4911:
4916: -- In this period, come transaction has occurred.
4917: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
4918:
4919: if (p_log_level_rec.statement_level) then
4920: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id', h_adj_member_trans_header_id, p_log_level_rec);
4921: end if;
4922:
4923: if h_adj_member_trans_header_id is not null then
4924: select asset_id,transaction_type_code
4930: end if;
4931: end if;
4932:
4933: if (p_log_level_rec.statement_level) then
4934: fa_debug_pkg.add(l_calling_fn, 'processed member_asset_id', h_asset_id, p_log_level_rec);
4935: end if;
4936:
4937: fa_rule_in.asset_id := member.member_asset_id;
4938: fa_rule_in.group_asset_id := h_group_asset_id;
4992: h_catchup_expense := nvl(h_catchup_expense,0);
4993: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4994:
4995: if (p_log_level_rec.statement_level) then
4996: 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);
4997: 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);
4998: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4999: end if;
5000:
4993: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
4994:
4995: if (p_log_level_rec.statement_level) then
4996: 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);
4997: 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);
4998: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4999: end if;
5000:
5001: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
4994:
4995: if (p_log_level_rec.statement_level) then
4996: 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);
4997: 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);
4998: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
4999: end if;
5000:
5001: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5002: -- Check FA_ADJUSTMENTS table if there is any depreciation expense during this period.
5101: h_prior_eofy_reserve := null;
5102: end if;
5103:
5104: if (p_log_level_rec.statement_level) then
5105: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5107: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5108: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5109: end if;
5102: end if;
5103:
5104: if (p_log_level_rec.statement_level) then
5105: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5107: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5108: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5109: end if;
5110:
5103:
5104: if (p_log_level_rec.statement_level) then
5105: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5106: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5107: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5108: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5109: end if;
5110:
5111: update fa_books
5127:
5128: h_member_asset_id := member.member_asset_id;
5129:
5130: if (p_log_level_rec.statement_level) then
5131: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Reporting Book +++', '+++', p_log_level_rec);
5132: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
5133: end if;
5134:
5135: fa_rule_in := p_group_rule_in;
5128: h_member_asset_id := member.member_asset_id;
5129:
5130: if (p_log_level_rec.statement_level) then
5131: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) ++ started for Reporting Book +++', '+++', p_log_level_rec);
5132: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', h_member_asset_id, p_log_level_rec);
5133: end if;
5134:
5135: fa_rule_in := p_group_rule_in;
5136:
5141: -- In this period, come transaction has occurred.
5142: h_adj_member_trans_header_id := p_group_rule_in.adj_mem_transaction_header_id;
5143:
5144: if (p_log_level_rec.statement_level) then
5145: fa_debug_pkg.add(l_calling_fn, 'h_adj_member_trans_header_id',h_adj_member_trans_header_id, p_log_level_rec);
5146: end if;
5147:
5148: if h_adj_member_trans_header_id is not null then
5149: select asset_id,transaction_type_code
5155: end if;
5156: end if;
5157:
5158: if (p_log_level_rec.statement_level) then
5159: fa_debug_pkg.add(l_calling_fn, 'processed member_asset_id', h_asset_id, p_log_level_rec);
5160: end if;
5161:
5162: fa_rule_in.asset_id := member.member_asset_id;
5163: fa_rule_in.group_asset_id := h_group_asset_id;
5202: h_catchup_expense := nvl(h_catchup_expense,0);
5203: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5204:
5205: if (p_log_level_rec.statement_level) then
5206: 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);
5207: 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);
5208: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
5209: end if;
5210:
5203: h_bonus_catchup_expense := nvl(h_bonus_catchup_expense,0);
5204:
5205: if (p_log_level_rec.statement_level) then
5206: 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);
5207: 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);
5208: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
5209: end if;
5210:
5211: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5204:
5205: if (p_log_level_rec.statement_level) then
5206: 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);
5207: 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);
5208: fa_debug_pkg.add(l_calling_fn, 'h_net_proceeds', h_net_proceeds, p_log_level_rec);
5209: end if;
5210:
5211: if p_group_rule_in.event_type = 'AFTER_DEPRN' and member.fully_reserved_flag is null then
5212: -- Check if there is catchup expense in this period.
5308: h_prior_eofy_reserve := null;
5309: end if;
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5313: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5314: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5315: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5316: end if;
5309: end if;
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5313: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5314: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5315: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5316: end if;
5317:
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add(l_calling_fn, '++ update FA_BOOKS for ',member.member_asset_id, p_log_level_rec);
5313: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost ',fa_rule_out.new_adjusted_cost, p_log_level_rec);
5314: fa_debug_pkg.add(l_calling_fn, 'h_eofy_adj_cost:h_eop_adj_cost:h_new_eofy_reserve ',
5315: h_eofy_adj_cost||':'||h_eop_adj_cost||':'||h_new_eofy_reserve, p_log_level_rec);
5316: end if;
5317:
5318: update fa_mc_books
5417: FA_CACHE_PKG.fazcbc_record.set_of_books_id);
5418: end if;
5419:
5420: if (p_log_level_rec.statement_level) then
5421: fa_debug_pkg.add(l_calling_fn, '+++ INS_DD_ADJ start +++', '+++', p_log_level_rec);
5422: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id', h_set_of_books_id, p_log_level_rec);
5423: end if;
5424:
5425: -- Currently this function will be called only after Unplanned Depreciation for Group Level.
5418: end if;
5419:
5420: if (p_log_level_rec.statement_level) then
5421: fa_debug_pkg.add(l_calling_fn, '+++ INS_DD_ADJ start +++', '+++', p_log_level_rec);
5422: fa_debug_pkg.add(l_calling_fn, 'h_set_of_books_id', h_set_of_books_id, p_log_level_rec);
5423: end if;
5424:
5425: -- Currently this function will be called only after Unplanned Depreciation for Group Level.
5426:
5688:
5689: else -- period of addition
5690:
5691: if (p_log_level_rec.statement_level) then
5692: fa_debug_pkg.add(l_calling_fn, 'period of addition', 'processed', p_log_level_rec);
5693: end if;
5694:
5695: -- get any current deprn adjustment amount balance (not available in query bal)
5696: if (p_mrc_sob_type_code = 'R') then
5711:
5712: end if;
5713:
5714: if (p_log_level_rec.statement_level) then
5715: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec);
5716: end if;
5717:
5718: -- calculate new value using unplanned amount as delta
5719: -- get current balance
5731:
5732: l_deprn_adjustment_amount := member.allocated_deprn_amount + nvl(l_deprn_adjustment_amount, 0);
5733:
5734: if (p_log_level_rec.statement_level) then
5735: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec);
5736: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5737: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec);
5738: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec);
5739: end if;
5732: l_deprn_adjustment_amount := member.allocated_deprn_amount + nvl(l_deprn_adjustment_amount, 0);
5733:
5734: if (p_log_level_rec.statement_level) then
5735: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec);
5736: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5737: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec);
5738: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec);
5739: end if;
5740:
5734: if (p_log_level_rec.statement_level) then
5735: fa_debug_pkg.add(l_calling_fn, 'member.allocated_deprn_amount', member.allocated_deprn_amount, p_log_level_rec);
5736: fa_debug_pkg.add(l_calling_fn, 'l_asset_deprn_rec.deprn_reserve:ytd_deprn',
5737: l_asset_deprn_rec.deprn_reserve||':'||l_asset_deprn_rec.ytd_deprn, p_log_level_rec);
5738: fa_debug_pkg.add(l_calling_fn, 'l_deprn_adjustment_amount', l_deprn_adjustment_amount, p_log_level_rec);
5739: end if;
5740:
5741: FA_DEPRN_SUMMARY_PKG.Update_Row
5742: (X_Book_Type_Code => p_asset_hdr_rec.book_type_code,
6298:
6299: begin
6300:
6301: if (p_log_level_rec.statement_level) then
6302: fa_debug_pkg.add(l_calling_fn, '+++ populate_previous_rows: Just Started +++', 'Parameters', p_log_level_rec);
6303: fa_debug_pkg.add(l_calling_fn, 'p_book:group:period_ctr:fiscal_yr:trans_hdr_id:mrc_type',
6304: 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);
6305: end if;
6306:
6299: begin
6300:
6301: if (p_log_level_rec.statement_level) then
6302: fa_debug_pkg.add(l_calling_fn, '+++ populate_previous_rows: Just Started +++', 'Parameters', p_log_level_rec);
6303: fa_debug_pkg.add(l_calling_fn, 'p_book:group:period_ctr:fiscal_yr:trans_hdr_id:mrc_type',
6304: 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);
6305: end if;
6306:
6307:
6309: open c_get_member_asset_id;
6310: fetch c_get_member_asset_id into l_member_asset_id;
6311: close c_get_member_asset_id;
6312: if (p_log_level_rec.statement_level) then
6313: fa_debug_pkg.add(l_calling_fn, 'l_member_asset_id', l_member_asset_id, p_log_level_rec);
6314: end if;
6315: end if;
6316:
6317:
6347: h_loop_period_counter := h_period_counter;
6348: end if;
6349:
6350: if (p_log_level_rec.statement_level) then
6351: fa_debug_pkg.add(l_calling_fn, 'h_loop_period_counter', h_loop_period_counter, p_log_level_rec);
6352: end if;
6353:
6354: if nvl(p_calling_fn,'OTHER') = 'TRACK_ASSETS' then -- Get group level info
6355: select deprn_method_code,life_in_months
6395: and DP.start_date >= FY.start_date
6396: and DP.end_date <= FY.end_date;
6397:
6398: if (p_log_level_rec.statement_level) then
6399: fa_debug_pkg.add(l_calling_fn, 'h_transaction_date from table', h_transaction_date, p_log_level_rec);
6400: end if;
6401: -- h_transaction_date := sysdate;
6402: end if;
6403:
6403:
6404: For pop_mem in ALL_MEMBERS(h_transaction_date) loop
6405:
6406: if (p_log_level_rec.statement_level) then
6407: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (transaction_date)', h_transaction_date, p_log_level_rec);
6408: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec);
6409: end if;
6410:
6411: h_member_asset_id := pop_mem.asset_id;
6404: For pop_mem in ALL_MEMBERS(h_transaction_date) loop
6405:
6406: if (p_log_level_rec.statement_level) then
6407: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (transaction_date)', h_transaction_date, p_log_level_rec);
6408: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec);
6409: end if;
6410:
6411: h_member_asset_id := pop_mem.asset_id;
6412:
6450: h_last_trans_id := p_transaction_header_id;
6451: end if;
6452:
6453: if (p_log_level_rec.statement_level) then
6454: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment);
6455: fa_debug_pkg.add(l_calling_fn, 'h_last_trans_id', h_last_trans_id);
6456: end if;
6457:
6458: open ALL_MEMBER_FOR_ADJ_MODE(h_member_asset_id);
6451: end if;
6452:
6453: if (p_log_level_rec.statement_level) then
6454: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment);
6455: fa_debug_pkg.add(l_calling_fn, 'h_last_trans_id', h_last_trans_id);
6456: end if;
6457:
6458: open ALL_MEMBER_FOR_ADJ_MODE(h_member_asset_id);
6459: fetch ALL_MEMBER_FOR_ADJ_MODE into h_cost, h_adjusted_cost, h_recoverable_cost,
6474: h_deprn_reserve, h_ytd_deprn,
6475: h_bonus_deprn_reserve, h_bonus_ytd_deprn, h_eop_fiscal_year;
6476: if ALL_MEMBER_FOR_ADDITION%NOTFOUND then
6477: if (p_log_level_rec.statement_level) then
6478: fa_debug_pkg.add(l_calling_fn, 'No rows in FA_BOOKS of member asset', h_member_asset_id);
6479: end if;
6480: else
6481: i := i + 1;
6482: p_track_member_table(i).group_asset_id := h_group_asset_id;
6499: p_track_member_table(i).eofy_salvage_value := 0;
6500: p_track_member_table(i).eop_salvage_value := 0;
6501:
6502: if (p_log_level_rec.statement_level) then
6503: fa_debug_pkg.add(l_calling_fn, '++ Stored values for added member asset indicator', i, p_log_level_rec);
6504: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,p_log_level_rec => p_log_level_rec) then
6505: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6506: end if;
6507: end if;
6501:
6502: if (p_log_level_rec.statement_level) then
6503: fa_debug_pkg.add(l_calling_fn, '++ Stored values for added member asset indicator', i, p_log_level_rec);
6504: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,p_log_level_rec => p_log_level_rec) then
6505: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6506: end if;
6507: end if;
6508: end if;
6509: close ALL_MEMBER_FOR_ADDITION;
6520: (nvl(p_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(p_allocate_to_fully_rsv_flag,'N') = 'Y'))
6521:
6522: then
6523: if (p_log_level_rec.statement_level) then
6524: fa_debug_pkg.add('fa_track_member_pvt', '++ In case when member asset is queried ++ ', i);
6525: end if;
6526: if h_eop_fiscal_year = h_fiscal_year then
6527: h_eofy_reserve := nvl(h_eofy_reserve,0) + nvl(h_eofy_reserve_adjustment,0) + nvl(h_adj_reserve,0);
6528: end if;
6536: p_track_member_eofy_table(j).member_asset_id = h_member_asset_id and
6537: nvl(p_track_member_eofy_table(j).set_of_books_id,-99) = nvl(h_set_of_books_id, -99) then
6538: -- p_track_member_eofy_table(j).fiscal_year = h_fiscal_year then
6539: if (p_log_level_rec.statement_level) then
6540: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table('||j||').cost:salvage:rec_cost:adj_cost:eofy_reserve',
6541: p_track_member_eofy_table(j).cost||':'||p_track_member_eofy_table(j).salvage_value||':'||
6542: p_track_member_eofy_table(j).recoverable_cost||':'||p_track_member_eofy_table(j).adjusted_cost||':'||
6543: p_track_member_eofy_table(j).eofy_reserve, p_log_level_rec);
6544: end if;
6591:
6592: end if; -- This is an asset to be processed
6593: close ALL_MEMBER_FOR_ADJ_MODE;
6594: if (p_log_level_rec.statement_level) then
6595: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec);
6596: if i > 0 then
6597: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn) then
6598: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6599: end if;
6594: if (p_log_level_rec.statement_level) then
6595: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec);
6596: if i > 0 then
6597: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn) then
6598: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6599: end if;
6600: end if;
6601: end if;
6602: <
6664: and DP.start_date >= FY.start_date
6665: and DP.end_date <= FY.end_date;
6666:
6667: if (p_log_level_rec.statement_level) then
6668: fa_debug_pkg.add(l_calling_fn, 'h_transaction_date from table', h_transaction_date, p_log_level_rec);
6669: end if;
6670: -- h_transaction_date := sysdate;
6671: end if;
6672:
6674:
6675: h_member_asset_id := pop_mem.asset_id;
6676:
6677: if (p_log_level_rec.statement_level) then
6678: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (Reporting Book/transaction_date)',
6679: h_transaction_date, p_log_level_rec);
6680: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec);
6681: end if;
6682:
6676:
6677: if (p_log_level_rec.statement_level) then
6678: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) for member loop starts +++ (Reporting Book/transaction_date)',
6679: h_transaction_date, p_log_level_rec);
6680: fa_debug_pkg.add(l_calling_fn, 'pop_mem.member_asset', pop_mem.asset_id, p_log_level_rec);
6681: end if;
6682:
6683: -- Check if selected member asset is the asset to be processed or not.
6684: -- Support backdated addition with reserve case.
6710: close FA_ADJ_RESERVE_MRC;
6711:
6712: h_eofy_reserve_adjustment := nvl(h_eofy_reserve_adjustment,0);
6713: if (p_log_level_rec.statement_level) then
6714: fa_debug_pkg.add(l_calling_fn, 'h_eofy_reserve_adjustment', h_eofy_reserve_adjustment);
6715: end if;
6716:
6717:
6718:
6735: h_deprn_reserve, h_ytd_deprn,
6736: h_bonus_deprn_reserve, h_bonus_ytd_deprn, h_eop_fiscal_year;
6737: if ALL_MEMBER_FOR_ADDITION_MRC%NOTFOUND then
6738: if (p_log_level_rec.statement_level) then
6739: fa_debug_pkg.add(l_calling_fn, 'No rows in FA_BOOKS(Reporting Book) of member asset', h_member_asset_id);
6740: end if;
6741: i := i + 1;
6742: p_track_member_table(i).group_asset_id := h_group_asset_id;
6743: p_track_member_table(i).member_asset_id := h_member_asset_id;
6759: p_track_member_table(i).eofy_salvage_value := 0;
6760: p_track_member_table(i).eop_salvage_value := 0;
6761:
6762: if (p_log_level_rec.statement_level) then
6763: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec);
6764: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6765: p_log_level_rec => p_log_level_rec) then
6766: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6767: end if;
6762: if (p_log_level_rec.statement_level) then
6763: fa_debug_pkg.add(l_calling_fn, '++ Stored values indicator', i, p_log_level_rec);
6764: if not display_debug_message2(i => i, p_calling_fn=> l_calling_fn,
6765: p_log_level_rec => p_log_level_rec) then
6766: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6767: end if;
6768: end if;
6769: end if;
6770: close ALL_MEMBER_FOR_ADDITION_MRC;
6782: (nvl(p_allocate_to_fully_ret_flag,'N') = 'Y' and nvl(p_allocate_to_fully_rsv_flag,'N') = 'Y'))
6783:
6784: then
6785: if (p_log_level_rec.statement_level) then
6786: fa_debug_pkg.add('fa_track_member_pvt', '++ In case when member asset is queried ++ ', i);
6787: end if;
6788: if h_eop_fiscal_year = h_fiscal_year then
6789: h_eofy_reserve := nvl(h_eofy_reserve,0) + nvl(h_eofy_reserve_adjustment,0) + nvl(h_adj_reserve,0);
6790: end if;
6798: p_track_member_eofy_table(j).member_asset_id = h_member_asset_id and
6799: nvl(p_track_member_eofy_table(j).set_of_books_id, -99) = nvl(h_set_of_books_id, -99) then
6800: -- p_track_member_eofy_table(j).fiscal_year = h_fiscal_year then
6801: if (p_log_level_rec.statement_level) then
6802: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table('||j||').cost:salvage:rec_cost:adj_cost:eofy_reserve',
6803: p_track_member_eofy_table(j).cost||':'||p_track_member_eofy_table(j).salvage_value||':'||
6804: p_track_member_eofy_table(j).recoverable_cost||':'||p_track_member_eofy_table(j).adjusted_cost||':'||
6805: p_track_member_eofy_table(j).eofy_reserve, p_log_level_rec);
6806: end if;
6853:
6854: end if; -- This is an asset to be processed
6855: close ALL_MEMBER_FOR_ADJ_MODE_MRC;
6856: if (p_log_level_rec.statement_level) then
6857: fa_debug_pkg.add(l_calling_fn, '+++ Stored values (For MRC book) indicator ', i, p_log_level_rec);
6858: if i > 0 then
6859: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
6860: p_log_level_rec => p_log_level_rec) then
6861: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6857: fa_debug_pkg.add(l_calling_fn, '+++ Stored values (For MRC book) indicator ', i, p_log_level_rec);
6858: if i > 0 then
6859: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn,
6860: p_log_level_rec => p_log_level_rec) then
6861: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
6862: end if;
6863: end if;
6864: end if;
6865: <
7116:
7117: begin
7118:
7119: if (p_log_level_rec.statement_level) then
7120: fa_debug_pkg.add(l_calling_fn, '+++ Get Member at Start ++ started', 'Parameters', p_log_level_rec);
7121: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id:mem_thid',
7122: p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id||':'||p_trans_rec.member_transaction_header_id, p_log_level_rec);
7123: end if;
7124:
7117: begin
7118:
7119: if (p_log_level_rec.statement_level) then
7120: fa_debug_pkg.add(l_calling_fn, '+++ Get Member at Start ++ started', 'Parameters', p_log_level_rec);
7121: fa_debug_pkg.add(l_calling_fn, 'book_type_code:group_asset_id:mem_thid',
7122: p_asset_hdr_rec.book_type_code||':'||p_asset_hdr_rec.asset_id||':'||p_trans_rec.member_transaction_header_id, p_log_level_rec);
7123: end if;
7124:
7125: p_track_member_table.delete;
7146: from fa_book_controls
7147: where book_type_code = h_book_type_code;
7148:
7149: if (p_log_level_rec.statement_level) then
7150: 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);
7151: end if;
7152:
7153: /* Apply MRC related feature */
7154: if p_mrc_sob_type_code <> 'R' then
7160:
7161: --* Need to call deprn basis rule to get correct adjusted cost at the loop start period.
7162: -- Followings are preparation to call faxcdb
7163: if (p_log_level_rec.statement_level) then
7164: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec);
7165: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7166: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec);
7167: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***', p_log_level_rec);
7168: end if;
7161: --* Need to call deprn basis rule to get correct adjusted cost at the loop start period.
7162: -- Followings are preparation to call faxcdb
7163: if (p_log_level_rec.statement_level) then
7164: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec);
7165: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7166: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec);
7167: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***', p_log_level_rec);
7168: end if;
7169:
7163: if (p_log_level_rec.statement_level) then
7164: fa_debug_pkg.add(l_calling_fn, '+++ Preparation to call deprn basis rule function +++', '+++', p_log_level_rec);
7165: fa_debug_pkg.add(l_calling_fn, 'h_period_counter:h_fiscal_year:h_deprn_method_code:h_life_in_months',
7166: h_period_counter||':'||h_fiscal_year||':'||h_deprn_method_code||':'||h_life_in_months, p_log_level_rec);
7167: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***', p_log_level_rec);
7168: end if;
7169:
7170: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
7171: X_life => h_life_in_months) then
7169:
7170: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
7171: X_life => h_life_in_months) then
7172: if (p_log_level_rec.statement_level) then
7173: fa_debug_pkg.add(l_calling_fn, '++ fa_cache_pkg.fazccmt is errored out ++', '+++', p_log_level_rec);
7174: end if;
7175: raise get_member_at_start_err;
7176: end if;
7177:
7229: i := i + 1; -- Count up for subscript
7230: h_member_asset_id := get_member.member_asset_id;
7231:
7232: if (p_log_level_rec.statement_level) then
7233: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id, p_log_level_rec);
7234: fa_debug_pkg.add(l_calling_fn, 'h_mem_trans_thid', h_mem_trans_thid, p_log_level_rec);
7235: end if;
7236:
7237: --* Check if this transaction is reclass and this member asset is now reclassed or not
7230: h_member_asset_id := get_member.member_asset_id;
7231:
7232: if (p_log_level_rec.statement_level) then
7233: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id, p_log_level_rec);
7234: fa_debug_pkg.add(l_calling_fn, 'h_mem_trans_thid', h_mem_trans_thid, p_log_level_rec);
7235: end if;
7236:
7237: --* Check if this transaction is reclass and this member asset is now reclassed or not
7238: if h_mem_trans_thid <> -99 then
7244: elsif h_new_group_asset_id is null then
7245: -- Now this asset becomes single asset. Don't need to include the calculation
7246: close RECLASS_TRANS_CHECK;
7247: if (p_log_level_rec.statement_level) then
7248: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++');
7249: end if;
7250: goto skip_processing;
7251: 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
7252: close RECLASS_TRANS_CHECK;
7250: goto skip_processing;
7251: 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
7252: close RECLASS_TRANS_CHECK;
7253: if (p_log_level_rec.statement_level) then
7254: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++');
7255: end if;
7256: goto skip_processing;
7257: end if;
7258: close RECLASS_TRANS_CHECK;
7291: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
7292: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7293:
7294: if (p_log_level_rec.statement_level) then
7295: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
7296: 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);
7297: 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);
7298: end if;
7299: End loop;
7292: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7293:
7294: if (p_log_level_rec.statement_level) then
7295: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
7296: 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);
7297: 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);
7298: end if;
7299: End loop;
7300:
7293:
7294: if (p_log_level_rec.statement_level) then
7295: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
7296: 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);
7297: 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);
7298: end if;
7299: End loop;
7300:
7301: if (p_log_level_rec.statement_level) then
7298: end if;
7299: End loop;
7300:
7301: if (p_log_level_rec.statement_level) then
7302: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR ALL_TRANS_IN_PERIOD ****', '****', p_log_level_rec);
7303: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7304: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
7305: end if;
7306:
7299: End loop;
7300:
7301: if (p_log_level_rec.statement_level) then
7302: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR ALL_TRANS_IN_PERIOD ****', '****', p_log_level_rec);
7303: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7304: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
7305: end if;
7306:
7307: --* Set old amounts as zero since this process will be made for just start period
7321: if GET_RESERVE_AT_ADDITION%NOTFOUND then
7322:
7323: -- Set zero initial reserve
7324: if (p_log_level_rec.statement_level) then
7325: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
7326: h_member_asset_id, p_log_level_rec);
7327: end if;
7328:
7329: h_ytd_deprn := 0;
7332: elsif h_deprn_source_code <> 'BOOK' then
7333: -- Set zero initial reserve
7334:
7335: if (p_log_level_rec.statement_level) then
7336: fa_debug_pkg.add(l_calling_fn, 'This Member asset record', h_deprn_source_code, p_log_level_rec);
7337: end if;
7338:
7339: h_ytd_deprn := 0;
7340: h_deprn_reserve := 0;
7342: end if;
7343: close GET_RESERVE_AT_ADDITION;
7344:
7345: if (p_log_level_rec.statement_level) then
7346: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec);
7347: end if;
7348: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
7349: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
7350: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
7383: h_new_adjusted_rec_cost := h_new_deprn_limit_amount;
7384: end if;
7385:
7386: if (p_log_level_rec.statement_level) then
7387: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7388: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
7389: end if;
7390:
7391: -- Get Asset type
7418: if (p_log_level_rec.statement_level) then
7419: if not display_debug_message(fa_rule_in => fa_rule_in,
7420: p_calling_fn => l_calling_fn,
7421: p_log_level_rec => p_log_level_rec) then
7422: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7423: end if;
7424: end if;
7425:
7426: -- Call Deprn Basis Rule for this transaction or period
7427: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
7428: rule_out => fa_rule_out,
7429: p_log_level_rec => p_log_level_rec)) then
7430: if (p_log_level_rec.statement_level) then
7431: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec);
7432: end if;
7433: raise get_member_at_start_err;
7434: end if;
7435:
7437: p_track_member_table(l_new_ind).fully_reserved_flag := NULL;
7438: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7439:
7440: if (p_log_level_rec.statement_level) then
7441: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
7442: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
7443: end if;
7444:
7445: --* Set calculated adjusted cost into p_track_member_table
7438: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7439:
7440: if (p_log_level_rec.statement_level) then
7441: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
7442: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
7443: end if;
7444:
7445: --* Set calculated adjusted cost into p_track_member_table
7446: p_track_member_table(l_new_ind).cost := h_new_cost;
7449: p_track_member_table(l_new_ind).adjusted_cost := fa_rule_out.new_adjusted_cost;
7450: p_track_member_table(l_new_ind).adjusted_recoverable_cost := h_new_adjusted_rec_cost;
7451:
7452: if (p_log_level_rec.statement_level) then
7453: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i, p_log_level_rec);
7454: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
7455: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7456: end if;
7457: end if;
7451:
7452: if (p_log_level_rec.statement_level) then
7453: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i, p_log_level_rec);
7454: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
7455: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7456: end if;
7457: end if;
7458:
7459: <
7457: end if;
7458:
7459: <
7460: if (p_log_level_rec.statement_level) then
7461: fa_debug_pkg.add(l_calling_fn, '++ End of Loop ++', i, p_log_level_rec);
7462: end if;
7463:
7464: end loop;
7465:
7470: i := i + 1; -- Count up for subscript
7471: h_member_asset_id := get_member.member_asset_id;
7472:
7473: if (p_log_level_rec.statement_level) then
7474: fa_debug_pkg.add(l_calling_fn, '+++ In Loop (1) : member asset id', h_member_asset_id, p_log_level_rec);
7475: end if;
7476:
7477: --* Check if this transaction is reclass and this member asset is now reclassed or not
7478: if h_mem_trans_thid <> -99 then
7483: elsif h_new_group_asset_id is null then
7484: -- Now this asset becomes single asset. Don't need to include the calculation
7485: close RECLASS_TRANS_CHECK;
7486: if (p_log_level_rec.statement_level) then
7487: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec);
7488: end if;
7489: goto skip_processing;
7490: 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
7491: close RECLASS_TRANS_CHECK;
7489: goto skip_processing;
7490: 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
7491: close RECLASS_TRANS_CHECK;
7492: if (p_log_level_rec.statement_level) then
7493: fa_debug_pkg.add(l_calling_fn, 'This member asset doesnt belong to this group asset','+++', p_log_level_rec);
7494: end if;
7495: goto skip_processing;
7496: end if;
7497: close RECLASS_TRANS_CHECK;
7530: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
7531: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7532:
7533: if (p_log_level_rec.statement_level) then
7534: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id, p_log_level_rec);
7535: 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);
7536: 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);
7537: end if;
7538: End loop;
7531: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
7532:
7533: if (p_log_level_rec.statement_level) then
7534: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id, p_log_level_rec);
7535: 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);
7536: 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);
7537: end if;
7538: End loop;
7539:
7532:
7533: if (p_log_level_rec.statement_level) then
7534: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GET_DELTA_FOR_MEMBER_MRC *** THID', h_transaction_header_id, p_log_level_rec);
7535: 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);
7536: 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);
7537: end if;
7538: End loop;
7539:
7540: if (p_log_level_rec.statement_level) then
7537: end if;
7538: End loop;
7539:
7540: if (p_log_level_rec.statement_level) then
7541: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****', p_log_level_rec);
7542: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7543: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
7544: end if;
7545:
7538: End loop;
7539:
7540: if (p_log_level_rec.statement_level) then
7541: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****', p_log_level_rec);
7542: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:h_new_deprn_limit:h_new_deprn_limit_amount',
7543: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
7544: end if;
7545:
7546: --* Set old amounts as zero since this process will be made for just start period
7560: if GET_RESERVE_AT_ADDITION_MRC%NOTFOUND then
7561: -- Set zero initial reserve
7562:
7563: if (p_log_level_rec.statement_level) then
7564: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
7565: h_member_asset_id, p_log_level_rec);
7566: end if;
7567:
7568: h_ytd_deprn := 0;
7571: elsif h_deprn_source_code <> 'BOOK' then
7572: -- Set zero initial reserve
7573:
7574: if (p_log_level_rec.statement_level) then
7575: fa_debug_pkg.add(l_calling_fn, 'This Member asset record', h_deprn_source_code, p_log_level_rec);
7576: end if;
7577:
7578: h_ytd_deprn := 0;
7579: h_deprn_reserve := 0;
7581: end if;
7582: close GET_RESERVE_AT_ADDITION_MRC;
7583:
7584: if (p_log_level_rec.statement_level) then
7585: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec);
7586: end if;
7587: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
7588: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
7589: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
7622: h_new_adjusted_rec_cost := h_new_deprn_limit_amount;
7623: end if;
7624:
7625: if (p_log_level_rec.statement_level) then
7626: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
7627: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7628: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
7629: end if;
7630:
7623: end if;
7624:
7625: if (p_log_level_rec.statement_level) then
7626: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
7627: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
7628: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
7629: end if;
7630:
7631: -- Get Asset type
7658: if (p_log_level_rec.statement_level) then
7659: if not display_debug_message(fa_rule_in => fa_rule_in,
7660: p_calling_fn => l_calling_fn,
7661: p_log_level_rec => p_log_level_rec) then
7662: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7663: end if;
7664: end if;
7665:
7666: -- Call Deprn Basis Rule for this transaction or period
7667: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
7668: rule_out => fa_rule_out,
7669: p_log_level_rec => p_log_level_rec)) then
7670: if (p_log_level_rec.statement_level) then
7671: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec);
7672: end if;
7673: raise get_member_at_start_err;
7674: end if;
7675:
7677: p_track_member_table(l_new_ind).fully_reserved_flag := NULL;
7678: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7679:
7680: if (p_log_level_rec.statement_level) then
7681: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
7682: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
7683: end if;
7684:
7685: --* Set calculated adjusted cost into p_track_member_table
7678: p_track_member_table(l_new_ind).fully_retired_flag := NULL;
7679:
7680: if (p_log_level_rec.statement_level) then
7681: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
7682: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
7683: end if;
7684:
7685: --* Set calculated adjusted cost into p_track_member_table
7686: p_track_member_table(l_new_ind).cost := h_new_cost;
7689: p_track_member_table(l_new_ind).adjusted_cost := fa_rule_out.new_adjusted_cost;
7690: p_track_member_table(l_new_ind).adjusted_recoverable_cost := h_new_adjusted_rec_cost;
7691:
7692: if (p_log_level_rec.statement_level) then
7693: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i, p_log_level_rec);
7694: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
7695: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7696: end if;
7697: end if;
7691:
7692: if (p_log_level_rec.statement_level) then
7693: fa_debug_pkg.add(l_calling_fn, '++ In Loop (2) indicator', i, p_log_level_rec);
7694: if not display_debug_message2(i => i, p_calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec) then
7695: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
7696: end if;
7697: end if;
7698:
7699: <
7697: end if;
7698:
7699: <
7700: if (p_log_level_rec.statement_level) then
7701: fa_debug_pkg.add(l_calling_fn, '++ End of Loop ++', i, p_log_level_rec);
7702: end if;
7703:
7704: end loop;
7705:
7799:
7800: begin
7801:
7802: if (p_log_level_rec.statement_level) then
7803: fa_debug_pkg.add('fa_track_member_pvt', '*** update_member_books Started', '***', p_log_level_rec);
7804: 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);
7805: end if;
7806:
7807: h_book_type_code := p_asset_hdr_rec.book_type_code;
7800: begin
7801:
7802: if (p_log_level_rec.statement_level) then
7803: fa_debug_pkg.add('fa_track_member_pvt', '*** update_member_books Started', '***', p_log_level_rec);
7804: 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);
7805: end if;
7806:
7807: h_book_type_code := p_asset_hdr_rec.book_type_code;
7808: h_group_asset_id := p_asset_hdr_rec.asset_id;
7814: open c_get_member_asset_id;
7815: fetch c_get_member_asset_id into l_member_asset_id;
7816: close c_get_member_asset_id;
7817: if (p_log_level_rec.statement_level) then
7818: fa_debug_pkg.add(l_calling_fn, 'l_member_asset_id', l_member_asset_id, p_log_level_rec);
7819: end if;
7820: end if;
7821:
7822:
7820: end if;
7821:
7822:
7823: if (p_log_level_rec.statement_level) then
7824: fa_debug_pkg.add(l_calling_fn, 'fiscal_year:period_num', h_fiscal_year||':'||h_period_num, p_log_level_rec);
7825: end if;
7826:
7827: /* Apply MRC related feature */
7828: if p_mrc_sob_type_code <> 'R' then
7842:
7843: h_period_counter := h_period_counter + 1;
7844:
7845: if (p_log_level_rec.statement_level) then
7846: 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);
7847: end if;
7848:
7849: -- Query member assets from FA_BOOKS with current date
7850: if p_mrc_sob_type_code <> 'R' then
7884: h_adjusted_cost := nvl(p_track_member_table(i).adjusted_cost,0);
7885: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
7886:
7887: if (p_log_level_rec.statement_level) then
7888: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7889: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7890: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7891: end if;
7892:
7885: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
7886:
7887: if (p_log_level_rec.statement_level) then
7888: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7889: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7890: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7891: end if;
7892:
7893: -- Update FA_BOOKS table
7886:
7887: if (p_log_level_rec.statement_level) then
7888: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7889: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7890: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7891: end if;
7892:
7893: -- Update FA_BOOKS table
7894: Update FA_BOOKS set adjusted_cost = h_adjusted_cost,
7942: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
7943: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
7944:
7945: if (p_log_level_rec.statement_level) then
7946: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7947: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7948: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7949: end if;
7950:
7943: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
7944:
7945: if (p_log_level_rec.statement_level) then
7946: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7947: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7948: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7949: end if;
7950:
7951: -- Update FA_BOOKS table
7944:
7945: if (p_log_level_rec.statement_level) then
7946: fa_debug_pkg.add('fa_track_member_pvt', 'member asset id', h_member_asset_id, p_log_level_rec);
7947: fa_debug_pkg.add('fa_track_member_pvt', 'adjusted cost', h_adjusted_cost, p_log_level_rec);
7948: fa_debug_pkg.add('fa_track_member_pvt', 'eofy reserve', h_eofy_reserve, p_log_level_rec);
7949: end if;
7950:
7951: -- Update FA_BOOKS table
7952: Update FA_BOOKS_MRC_V set adjusted_cost = h_adjusted_cost,
8033:
8034: begin
8035:
8036: if (p_log_level_rec.statement_level) then
8037: fa_debug_pkg.add(l_calling_fn, '++++ member_eofy_rsv:Just Started ++++', '++++++', p_log_level_rec);
8038: 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);
8039: end if;
8040:
8041: h_book_type_code := p_asset_hdr_rec.book_type_code;
8034: begin
8035:
8036: if (p_log_level_rec.statement_level) then
8037: fa_debug_pkg.add(l_calling_fn, '++++ member_eofy_rsv:Just Started ++++', '++++++', p_log_level_rec);
8038: 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);
8039: end if;
8040:
8041: h_book_type_code := p_asset_hdr_rec.book_type_code;
8042: h_group_asset_id := p_asset_hdr_rec.asset_id;
8043: h_fiscal_year := p_dpr_in.y_end;
8044: h_period_num := p_dpr_in.p_cl_end;
8045:
8046: if (p_log_level_rec.statement_level) then
8047: fa_debug_pkg.add(l_calling_fn, 'fiscal_year:period_num', h_fiscal_year||':'||h_period_num, p_log_level_rec);
8048: end if;
8049:
8050: /* Apply MRC related feature */
8051: if p_mrc_sob_type_code <> 'R' then
8065:
8066: h_period_counter := h_period_counter + 1;
8067:
8068: if (p_log_level_rec.statement_level) then
8069: 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);
8070: end if;
8071:
8072: if nvl(p_track_member_eofy_table.count,0) > 0 then
8073: p_track_member_eofy_table.delete;
8071:
8072: if nvl(p_track_member_eofy_table.count,0) > 0 then
8073: p_track_member_eofy_table.delete;
8074: if (p_log_level_rec.statement_level) then
8075: fa_debug_pkg.add(l_calling_fn, 'p_track_member_eofy_table is deleted', 1, p_log_level_rec);
8076: end if;
8077: end if;
8078:
8079: j := 0;
8091: h_recoverable_cost := p_track_member_table(i).recoverable_cost;
8092: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
8093: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8094: if (p_log_level_rec.statement_level) then
8095: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec);
8096: 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);
8097: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec);
8098: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8099: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec);
8092: h_adjusted_cost := p_track_member_table(i).adjusted_cost;
8093: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8094: if (p_log_level_rec.statement_level) then
8095: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec);
8096: 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);
8097: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec);
8098: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8099: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec);
8100: end if;
8093: h_eofy_reserve := p_track_member_table(i).eofy_reserve;
8094: if (p_log_level_rec.statement_level) then
8095: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec);
8096: 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);
8097: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec);
8098: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8099: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec);
8100: end if;
8101:
8094: if (p_log_level_rec.statement_level) then
8095: fa_debug_pkg.add(l_calling_fn, '+++ member_eofy_rsv:Folloings are stored +++', '+++', p_log_level_rec);
8096: 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);
8097: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', h_fiscal_year, p_log_level_rec);
8098: fa_debug_pkg.add(l_calling_fn, 'cost:salvage:rec_cost:adj_cost:eofy_rsv',
8099: h_cost||':'||h_salvage_value||':'||h_recoverable_cost||':'||h_adjusted_cost||':'||h_eofy_reserve, p_log_level_rec);
8100: end if;
8101:
8102: p_track_member_eofy_table(j).group_asset_id := h_group_asset_id;
8799:
8800:
8801: BEGIN
8802: if (p_log_level_rec.statement_level) then
8803: fa_debug_pkg.add(l_calling_fn, '+++ Populate Member Assets Table ++ is Started ++', '+++', p_log_level_rec);
8804: fa_debug_pkg.add(l_calling_fn, 'p_populate_for_recalc_period', p_populate_for_recalc_period, p_log_level_rec);
8805: end if;
8806:
8807: -- Get basic information from input parameters
8800:
8801: BEGIN
8802: if (p_log_level_rec.statement_level) then
8803: fa_debug_pkg.add(l_calling_fn, '+++ Populate Member Assets Table ++ is Started ++', '+++', p_log_level_rec);
8804: fa_debug_pkg.add(l_calling_fn, 'p_populate_for_recalc_period', p_populate_for_recalc_period, p_log_level_rec);
8805: end if;
8806:
8807: -- Get basic information from input parameters
8808: h_book_type_code := p_asset_hdr_rec.book_type_code;
8815: from fa_book_controls
8816: where book_type_code = h_book_type_code;
8817:
8818: if (p_log_level_rec.statement_level) then
8819: fa_debug_pkg.add(l_calling_fn, 'h_deprn_calendar:h_fiscal_year_name',
8820: h_deprn_calendar||':'||h_fiscal_year_name, p_log_level_rec);
8821: end if;
8822:
8823: if not fa_cache_pkg.fazcct(h_deprn_calendar) then
8821: end if;
8822:
8823: if not fa_cache_pkg.fazcct(h_deprn_calendar) then
8824: if (p_log_level_rec.statement_level) then
8825: fa_debug_pkg.add(l_calling_fn, 'Calendar Cache call is failed', '+++', p_log_level_rec);
8826: end if;
8827: raise pop_mem_table_err;
8828: end if;
8829:
8835: if GET_FY_PERDNUM%NOTFOUND then
8836: close GET_FY_PERDNUM;
8837:
8838: if (p_log_level_rec.statement_level) then
8839: fa_debug_pkg.add(l_calling_fn, '++ No record is found for the date (1)', p_amort_start_date, p_log_level_rec);
8840: end if;
8841:
8842: raise pop_mem_table_err;
8843:
8859: if GET_FY_PERDNUM%NOTFOUND then
8860: close GET_FY_PERDNUM;
8861:
8862: if (p_log_level_rec.statement_level) then
8863: fa_debug_pkg.add(l_calling_fn, '++ No record is found for the date (2)', h_group_dpis, p_log_level_rec);
8864: end if;
8865: raise pop_mem_table_err;
8866: end if;
8867:
8925: -- can allocate new amounts correctly.
8926: h_length_of_loop := h_recalc_period_counter - h_group_dpis_period_counter + 1;
8927:
8928: if (p_log_level_rec.statement_level) then
8929: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec);
8930: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec);
8931: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec);
8932: end if;
8933:
8926: h_length_of_loop := h_recalc_period_counter - h_group_dpis_period_counter + 1;
8927:
8928: if (p_log_level_rec.statement_level) then
8929: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec);
8930: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec);
8931: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec);
8932: end if;
8933:
8934: -- Now loop between h_group_dpis_period_counter and h_prv_period_counter to populate
8927:
8928: if (p_log_level_rec.statement_level) then
8929: fa_debug_pkg.add(l_calling_fn, 'h_group_dpis_period_counter', h_group_dpis_period_counter, p_log_level_rec);
8930: fa_debug_pkg.add(l_calling_fn, 'h_length_of_loop', h_length_of_loop, p_log_level_rec);
8931: fa_debug_pkg.add(l_calling_fn, 'h_period_per_fiscal_year', h_period_per_fiscal_year, p_log_level_rec);
8932: end if;
8933:
8934: -- Now loop between h_group_dpis_period_counter and h_prv_period_counter to populate
8935: -- member assets amounts
8944: h_processing_fiscal_year := h_processing_fiscal_year + 1;
8945: end if;
8946:
8947: if (p_log_level_rec.statement_level) then
8948: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter:fiscal_year:period_num',
8949: h_processing_period_counter||':'||h_processing_fiscal_year||':'||
8950: h_processing_period_num, p_log_level_rec);
8951: end if;
8952:
9008: end if; -- (if processing period counter >= amort period counter)
9009:
9010: if (p_log_level_rec.statement_level) then
9011: if (h_find_flag_1) then
9012: fa_debug_pkg.add(l_calling_fn, 'Memory Table has data for this asset', '+++', p_log_level_rec);
9013: else
9014: fa_debug_pkg.add(l_calling_fn, 'Need to query fa_books_summary table due to no data in'||
9015: ' memory table','+++', p_log_level_rec);
9016: end if;
9010: if (p_log_level_rec.statement_level) then
9011: if (h_find_flag_1) then
9012: fa_debug_pkg.add(l_calling_fn, 'Memory Table has data for this asset', '+++', p_log_level_rec);
9013: else
9014: fa_debug_pkg.add(l_calling_fn, 'Need to query fa_books_summary table due to no data in'||
9015: ' memory table','+++', p_log_level_rec);
9016: end if;
9017: end if;
9018:
9018:
9019: if not (h_find_flag_1) then -- there is no record for this group asset/period in global variables.
9020:
9021: if (p_log_level_rec.statement_level) then
9022: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter', h_processing_period_counter, p_log_level_rec);
9023: fa_debug_pkg.add(l_calling_fn, 'p_mrc_sob_type_code', p_mrc_sob_type_code, p_log_level_rec);
9024: end if;
9025:
9026: if p_mrc_sob_type_code <> 'R' then
9019: if not (h_find_flag_1) then -- there is no record for this group asset/period in global variables.
9020:
9021: if (p_log_level_rec.statement_level) then
9022: fa_debug_pkg.add(l_calling_fn, 'h_processing_period_counter', h_processing_period_counter, p_log_level_rec);
9023: fa_debug_pkg.add(l_calling_fn, 'p_mrc_sob_type_code', p_mrc_sob_type_code, p_log_level_rec);
9024: end if;
9025:
9026: if p_mrc_sob_type_code <> 'R' then
9027: --* Query Group Asset information for this processing period
9096: end if;
9097: end if;
9098:
9099: if (p_log_level_rec.statement_level) then
9100: fa_debug_pkg.add(l_calling_fn, 'h_deprn_method_code:h_life_in_months',
9101: h_deprn_method_code||':'||h_life_in_months, p_log_level_rec);
9102: end if;
9103:
9104: --* Prepare Cache for Method information
9106: h_old_deprn_method_code <> h_deprn_method_code and
9107: nvl(h_old_life_in_months,-99) <> nvl(h_life_in_months,-99) then
9108:
9109: if (p_log_level_rec.statement_level) then
9110: fa_debug_pkg.add(l_calling_fn, 'Method Cache is called.', '***', p_log_level_rec);
9111: end if;
9112:
9113: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
9114: X_life => h_life_in_months,
9113: if not fa_cache_pkg.fazccmt(X_method => h_deprn_method_code,
9114: X_life => h_life_in_months,
9115: p_log_level_rec => p_log_level_rec) then
9116: if (p_log_level_rec.statement_level) then
9117: fa_debug_pkg.add(l_calling_fn, '++ fa_cache_pkg.fazccmt is errored out ++', '+++', p_log_level_rec);
9118: end if;
9119:
9120: raise pop_mem_table_err;
9121: end if;
9130: --* Get system deprn amount if subtraction flag is 'Y'
9131: if nvl(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') = 'Y' then
9132:
9133: if (p_log_level_rec.statement_level) then
9134: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (1)' , '+++', p_log_level_rec);
9135: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year', h_processing_fiscal_year, p_log_level_rec);
9136: end if;
9137:
9138: h_first_period_counter := NULL;
9131: if nvl(fa_cache_pkg.fazcdrd_record.subtract_ytd_flag,'N') = 'Y' then
9132:
9133: if (p_log_level_rec.statement_level) then
9134: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (1)' , '+++', p_log_level_rec);
9135: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year', h_processing_fiscal_year, p_log_level_rec);
9136: end if;
9137:
9138: h_first_period_counter := NULL;
9139: h_temp_system_deprn_amount := 0;
9149: h_first_period_counter := fa_amort_pvt.t_period_counter(m);
9150: end if;
9151:
9152: if (p_log_level_rec.statement_level) then
9153: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++', p_log_level_rec);
9154: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m), p_log_level_rec);
9155: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m), p_log_level_rec);
9156: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9157: fa_amort_pvt.t_system_bonus_deprn_amount(m), p_log_level_rec);
9150: end if;
9151:
9152: if (p_log_level_rec.statement_level) then
9153: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++', p_log_level_rec);
9154: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m), p_log_level_rec);
9155: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m), p_log_level_rec);
9156: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9157: fa_amort_pvt.t_system_bonus_deprn_amount(m), p_log_level_rec);
9158: end if;
9151:
9152: if (p_log_level_rec.statement_level) then
9153: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++', p_log_level_rec);
9154: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m), p_log_level_rec);
9155: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m), p_log_level_rec);
9156: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9157: fa_amort_pvt.t_system_bonus_deprn_amount(m), p_log_level_rec);
9158: end if;
9159:
9152: if (p_log_level_rec.statement_level) then
9153: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-1)' , '+++', p_log_level_rec);
9154: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_period_counter(m)', fa_amort_pvt.t_period_counter(m), p_log_level_rec);
9155: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_deprn_amount(m)', fa_amort_pvt.t_system_deprn_amount(m), p_log_level_rec);
9156: fa_debug_pkg.add(l_calling_fn, 'fa_amort_pvt.t_system_bonus_deprn_amount(m)',
9157: fa_amort_pvt.t_system_bonus_deprn_amount(m), p_log_level_rec);
9158: end if;
9159:
9160: h_temp_system_deprn_amount := nvl(h_temp_system_deprn_amount,0) + nvl(fa_amort_pvt.t_system_deprn_amount(m),0);
9160: h_temp_system_deprn_amount := nvl(h_temp_system_deprn_amount,0) + nvl(fa_amort_pvt.t_system_deprn_amount(m),0);
9161: h_temp_system_bonus_deprn := nvl(h_temp_system_bonus_deprn,0) + nvl(fa_amort_pvt.t_system_bonus_deprn_amount(m),0);
9162:
9163: if (p_log_level_rec.statement_level) then
9164: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++', p_log_level_rec);
9165: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec);
9166: 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);
9167: end if;
9168: end if;
9161: h_temp_system_bonus_deprn := nvl(h_temp_system_bonus_deprn,0) + nvl(fa_amort_pvt.t_system_bonus_deprn_amount(m),0);
9162:
9163: if (p_log_level_rec.statement_level) then
9164: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++', p_log_level_rec);
9165: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec);
9166: 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);
9167: end if;
9168: end if;
9169: End Loop;
9162:
9163: if (p_log_level_rec.statement_level) then
9164: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (2-2)' , '+++', p_log_level_rec);
9165: fa_debug_pkg.add(l_calling_fn, 'h_first_period_counter', h_first_period_counter, p_log_level_rec);
9166: 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);
9167: end if;
9168: end if;
9169: End Loop;
9170:
9193:
9194: end if;
9195:
9196: if (p_log_level_rec.statement_level) then
9197: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (3)' , '+++', p_log_level_rec);
9198: 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);
9199: end if;
9200:
9201: end if; -- Subtraction
9194: end if;
9195:
9196: if (p_log_level_rec.statement_level) then
9197: fa_debug_pkg.add(l_calling_fn, '++ Logic in case the subtraction flag is Y (3)' , '+++', p_log_level_rec);
9198: 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);
9199: end if;
9200:
9201: end if; -- Subtraction
9202:
9252: h_max_thid_in_this_group := to_number(NULL);
9253: h_max_thid_in_other_group := to_number(NULL);
9254:
9255: if (p_log_level_rec.statement_level) then
9256: fa_debug_pkg.add(l_calling_fn, '*** Check member has been reclassified out or not ***',
9257: h_member_asset_id||':'||h_processing_fiscal_year||':'||h_processing_period_num, p_log_level_rec);
9258: end if;
9259:
9260: --* First of all, check if this selected member is actually reclassed out or not
9267: close GET_MAX_THID_IN_OTHER_GROUP;
9268:
9269: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9270: if (p_log_level_rec.statement_level) then
9271: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***', p_log_level_rec);
9272: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9273: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec);
9274: end if;
9275: goto skip_asset;
9268:
9269: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9270: if (p_log_level_rec.statement_level) then
9271: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***', p_log_level_rec);
9272: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9273: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec);
9274: end if;
9275: goto skip_asset;
9276: end if;
9283: if nvl(h_allocate_to_fully_ret_flag,'N') = 'N' and
9284: nvl(h_perd_ctr_fully_retired,h_processing_period_counter+1) < h_processing_period_counter then
9285:
9286: if (p_log_level_rec.statement_level) then
9287: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully retired', h_member_asset_id, p_log_level_rec);
9288: end if;
9289: goto skip_asset;
9290: end if;
9291:
9292: if nvl(h_allocate_to_fully_rsv_flag,'N') = 'N' and
9293: nvl(h_perd_ctr_fully_reserved,h_processing_period_counter+1) < h_processing_period_counter then
9294:
9295: if (p_log_level_rec.statement_level) then
9296: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully reserved', h_member_asset_id, p_log_level_rec);
9297: end if;
9298: goto skip_asset;
9299: end if;
9300:
9298: goto skip_asset;
9299: end if;
9300:
9301: if (p_log_level_rec.statement_level) then
9302: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '***', p_log_level_rec);
9303: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec);
9304: end if;
9305:
9306: --* Process get delta of cost, rec cost, salvage value etc...
9299: end if;
9300:
9301: if (p_log_level_rec.statement_level) then
9302: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '***', p_log_level_rec);
9303: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec);
9304: end if;
9305:
9306: --* Process get delta of cost, rec cost, salvage value etc...
9307: --* Query transaction header id of this member assetin this period
9345: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
9346: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9347:
9348: if (p_log_level_rec.statement_level) then
9349: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9350: 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);
9351: 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);
9352: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9353: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9346: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9347:
9348: if (p_log_level_rec.statement_level) then
9349: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9350: 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);
9351: 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);
9352: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9353: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9354: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec);
9347:
9348: if (p_log_level_rec.statement_level) then
9349: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9350: 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);
9351: 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);
9352: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9353: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9354: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec);
9355: end if;
9348: if (p_log_level_rec.statement_level) then
9349: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9350: 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);
9351: 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);
9352: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9353: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9354: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec);
9355: end if;
9356:
9349: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9350: 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);
9351: 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);
9352: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9353: fa_debug_pkg.add(l_calling_fn, 'fa_cache_pkg.fazcdrd_record.rule_name',
9354: fa_cache_pkg.fazcdrd_record.rule_name, p_log_level_rec);
9355: end if;
9356:
9357: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
9370: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9371: end if;
9372:
9373: if (p_log_level_rec.statement_level) then
9374: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id, p_log_level_rec);
9375: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired',
9376: h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec);
9377: end if;
9378: elsif (nvl(h_transaction_type_code,'NULL') = 'REINSTATEMENT') and
9371: end if;
9372:
9373: if (p_log_level_rec.statement_level) then
9374: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id, p_log_level_rec);
9375: fa_debug_pkg.add(l_calling_fn, 'h_new_eofy_reserve:h_new_reserve_retired',
9376: h_new_eofy_reserve||':'||h_new_reserve_retired, p_log_level_rec);
9377: end if;
9378: elsif (nvl(h_transaction_type_code,'NULL') = 'REINSTATEMENT') and
9379: (nvl(fa_cache_pkg.fazcdrd_record.rule_name, 'NONE') = 'ENERGY PERIOD END BALANCE') then
9382: fetch GET_REINSTATEMENT into h_recognize_gain_loss, h_adj_eofy_reserve, h_adj_reserve_retired;
9383: close GET_REINSTATEMENT;
9384:
9385: if (p_log_level_rec.statement_level) then
9386: fa_debug_pkg.add(l_calling_fn, 'h_adj_reserve_retired', h_adj_reserve_retired, p_log_level_rec);
9387: fa_debug_pkg.add(l_calling_fn, 'h_new_reserve_retired', h_new_reserve_retired, p_log_level_rec);
9388: end if;
9389:
9390: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9383: close GET_REINSTATEMENT;
9384:
9385: if (p_log_level_rec.statement_level) then
9386: fa_debug_pkg.add(l_calling_fn, 'h_adj_reserve_retired', h_adj_reserve_retired, p_log_level_rec);
9387: fa_debug_pkg.add(l_calling_fn, 'h_new_reserve_retired', h_new_reserve_retired, p_log_level_rec);
9388: end if;
9389:
9390: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9391: end if; -- Retirement treatment
9397: open GET_NEW_GROUP(h_member_asset_id, h_transaction_header_id);
9398: fetch GET_NEW_GROUP into h_new_group_asset_id;
9399: if GET_NEW_GROUP%FOUND then
9400: if (p_log_level_rec.statement_level) then
9401: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id, p_log_level_rec);
9402: 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);
9403: end if;
9404: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9405: close GET_NEW_GROUP;
9398: fetch GET_NEW_GROUP into h_new_group_asset_id;
9399: if GET_NEW_GROUP%FOUND then
9400: if (p_log_level_rec.statement_level) then
9401: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id, p_log_level_rec);
9402: 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);
9403: end if;
9404: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9405: close GET_NEW_GROUP;
9406: goto skip_thid;
9408: end if;
9409: close GET_NEW_GROUP;
9410:
9411: if (p_log_level_rec.statement_level) then
9412: fa_debug_pkg.add(l_calling_fn, '++++ Just set null to all ****', h_transaction_header_id, p_log_level_rec);
9413: end if;
9414: end if;
9415: <
9416: if (p_log_level_rec.statement_level) then
9413: end if;
9414: end if;
9415: <
9416: if (p_log_level_rec.statement_level) then
9417: fa_debug_pkg.add(l_calling_fn, '*** This is the end of loop ***', h_transaction_header_id, p_log_level_rec);
9418: end if;
9419:
9420: End loop;
9421:
9419:
9420: End loop;
9421:
9422: if (p_log_level_rec.statement_level) then
9423: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****', p_log_level_rec);
9424: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9425: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
9426: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9427: end if;
9420: End loop;
9421:
9422: if (p_log_level_rec.statement_level) then
9423: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****', p_log_level_rec);
9424: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9425: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
9426: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9427: end if;
9428:
9422: if (p_log_level_rec.statement_level) then
9423: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ****', '****', p_log_level_rec);
9424: fa_debug_pkg.add(l_calling_fn, 'h_new_limit_type:new_limit:new_limit_amount',
9425: h_new_limit_type||':'||h_new_deprn_limit||':'||h_new_deprn_limit_amount, p_log_level_rec);
9426: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9427: end if;
9428:
9429: h_find_flag_3 := FALSE;
9430:
9442: h_bonus_ytd_deprn,
9443: h_eofy_reserve;
9444: if GET_PRV_ROW_BS%NOTFOUND then
9445: if (p_log_level_rec.statement_level) then
9446: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***', p_log_level_rec);
9447: end if;
9448: else
9449: if (p_log_level_rec.statement_level) then
9450: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec);
9446: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***', p_log_level_rec);
9447: end if;
9448: else
9449: if (p_log_level_rec.statement_level) then
9450: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec);
9451: end if;
9452: if h_processing_period_num = 1 then
9453: h_ytd_deprn := 0;
9454: h_bonus_ytd_deprn := 0;
9467:
9468: --* Check if this asset exists in p_track_member table
9469: k := 0;
9470: if (p_log_level_rec.statement_level) then
9471: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table.count', p_track_member_table.COUNT, p_log_level_rec);
9472: end if;
9473: For j IN 1.. p_track_member_table.COUNT LOOP
9474: k := k + 1;
9475: if p_track_member_table(j).member_asset_id = h_member_asset_id and
9497:
9498: if nvl(h_new_group_asset_id, -99) <> h_group_asset_id then
9499: p_track_member_table(j).group_asset_id := h_new_group_asset_id;
9500: if (p_log_level_rec.statement_level) then
9501: fa_debug_pkg.add(l_calling_fn, 'This member does not belong to this group anymore', '+++', p_log_level_rec);
9502: end if;
9503: end if;
9504: exit;
9505: end if;
9525: if GET_RESERVE_AT_ADDITION%NOTFOUND then
9526: -- Set zero initial reserve
9527:
9528: if (p_log_level_rec.statement_level) then
9529: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
9530: h_member_asset_id, p_log_level_rec);
9531: end if;
9532:
9533: h_ytd_deprn := 0;
9535: elsif h_deprn_source_code <> 'BOOKS' then
9536: -- Set zero initial reserve
9537:
9538: if (p_log_level_rec.statement_level) then
9539: fa_debug_pkg.add(l_calling_fn, 'This Member assets record', h_deprn_source_code, p_log_level_rec);
9540: end if;
9541: h_ytd_deprn := 0;
9542: h_deprn_reserve := 0;
9543: end if;
9551: -- Then enter this asset to extended memory table at this moment
9552: l_new_ind := nvl(p_track_member_table.COUNT,0) + 1;
9553: l_processing_ind := l_new_ind;
9554: if (p_log_level_rec.statement_level) then
9555: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec);
9556: end if;
9557: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
9558: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
9559: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
9597: h_new_adjusted_rec_cost := h_new_cost - h_new_deprn_limit_amount;
9598: end if;
9599:
9600: if (p_log_level_rec.statement_level) then
9601: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
9602: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
9603: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
9604: end if;
9605:
9598: end if;
9599:
9600: if (p_log_level_rec.statement_level) then
9601: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
9602: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
9603: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
9604: end if;
9605:
9606: -- Get Asset type
9646: if (p_log_level_rec.statement_level) then
9647: if not display_debug_message(fa_rule_in => fa_rule_in,
9648: p_calling_fn => l_calling_fn,
9649: p_log_level_rec => p_log_level_rec) then
9650: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
9651: end if;
9652: end if;
9653:
9654: -- Call Deprn Basis Rule for this transaction or period
9654: -- Call Deprn Basis Rule for this transaction or period
9655: if (not fa_calc_deprn_basis1_pkg.faxcdb(rule_in => fa_rule_in,
9656: rule_out => fa_rule_out)) then
9657: if (p_log_level_rec.statement_level) then
9658: fa_debug_pkg.add(l_calling_fn, 'FAXCDB is errored out', '+++', p_log_level_rec);
9659: end if;
9660: raise pop_mem_table_err;
9661: end if;
9662:
9660: raise pop_mem_table_err;
9661: end if;
9662:
9663: if (p_log_level_rec.statement_level) then
9664: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
9665: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
9666: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
9667: end if;
9668:
9661: end if;
9662:
9663: if (p_log_level_rec.statement_level) then
9664: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
9665: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
9666: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
9667: end if;
9668:
9669: --* Set calculated adjusted cost into p_track_member_table
9662:
9663: if (p_log_level_rec.statement_level) then
9664: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
9665: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
9666: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
9667: end if;
9668:
9669: --* Set calculated adjusted cost into p_track_member_table
9670:
9687: end if;
9688: end if;
9689:
9690: if (p_log_level_rec.statement_level) then
9691: fa_debug_pkg.add(l_calling_fn, 'New p_track_member_table is as follows: Indicator', l_processing_ind, p_log_level_rec);
9692: if not display_debug_message2(l_processing_ind, l_calling_fn, p_log_level_rec => p_log_level_rec) then
9693: null;
9694: end if;
9695: end if;
9695: end if;
9696:
9697: <
9698: if (p_log_level_rec.statement_level) then
9699: fa_debug_pkg.add(l_calling_fn, '+++ End of Loop +++', '++++', p_log_level_rec);
9700: end if;
9701:
9702: End Loop; -- (For ALL_MMEBER)
9703:
9710: h_max_thid_in_this_group := to_number(NULL);
9711: h_max_thid_in_other_group := to_number(NULL);
9712:
9713: if (p_log_level_rec.statement_level) then
9714: fa_debug_pkg.add(l_calling_fn, '*** Check member has been reclassified out or not ***',
9715: h_member_asset_id||':'||h_processing_fiscal_year||':'||h_processing_period_num, p_log_level_rec);
9716: end if;
9717:
9718: --* First of all, check if this selected member is actually reclassed out or not
9725: close GET_MAX_THID_IN_OTHER_G_MRC;
9726:
9727: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9728: if (p_log_level_rec.statement_level) then
9729: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***', p_log_level_rec);
9730: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9731: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec);
9732: end if;
9733: goto skip_asset;
9726:
9727: if h_max_thid_in_this_group < nvl(h_max_thid_in_other_group,-1) then
9728: if (p_log_level_rec.statement_level) then
9729: fa_debug_pkg.add(l_calling_fn, '*** This member has been reclassified out ***', '***', p_log_level_rec);
9730: fa_debug_pkg.add(l_calling_fn, 'h_max_thid_in_this_group:h_max_thid_in_other_group',
9731: h_max_thid_in_this_group||':'||h_max_thid_in_other_group, p_log_level_rec);
9732: end if;
9733: goto skip_asset;
9734: end if;
9741: if nvl(h_allocate_to_fully_ret_flag,'N') = 'N' and
9742: nvl(h_perd_ctr_fully_retired,h_processing_period_counter+1) < h_processing_period_counter then
9743:
9744: if (p_log_level_rec.statement_level) then
9745: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully retired',
9746: h_member_asset_id, p_log_level_rec);
9747: end if;
9748: goto skip_asset;
9749: end if;
9751: if nvl(h_allocate_to_fully_rsv_flag,'N') = 'N' and
9752: nvl(h_perd_ctr_fully_reserved,h_processing_period_counter+1) < h_processing_period_counter then
9753:
9754: if (p_log_level_rec.statement_level) then
9755: fa_debug_pkg.add(l_calling_fn, 'Skip this asset due to fully reserved',
9756: h_member_asset_id, p_log_level_rec);
9757: end if;
9758:
9759: goto skip_asset;
9759: goto skip_asset;
9760: end if;
9761:
9762: if (p_log_level_rec.statement_level) then
9763: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '*Reporting Book*', p_log_level_rec);
9764: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec);
9765: end if;
9766:
9767: --* Process get delta of cost, rec cost, salvage value etc...
9760: end if;
9761:
9762: if (p_log_level_rec.statement_level) then
9763: fa_debug_pkg.add(l_calling_fn, '*** Member Loop Starts ***', '*Reporting Book*', p_log_level_rec);
9764: fa_debug_pkg.add(l_calling_fn, 'Processing Member Asset', h_member_asset_id, p_log_level_rec);
9765: end if;
9766:
9767: --* Process get delta of cost, rec cost, salvage value etc...
9768: --* Query transaction header id of this member assetin this period
9803: h_adj_rec_cost := h_adj_rec_cost + h_delta_recoverable_cost;
9804: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9805:
9806: if (p_log_level_rec.statement_level) then
9807: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9808: 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);
9809: 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);
9810: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9811: end if;
9804: h_adj_salvage_value := h_adj_cost - h_adj_rec_cost;
9805:
9806: if (p_log_level_rec.statement_level) then
9807: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9808: 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);
9809: 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);
9810: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9811: end if;
9812:
9805:
9806: if (p_log_level_rec.statement_level) then
9807: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9808: 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);
9809: 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);
9810: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9811: end if;
9812:
9813: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
9806: if (p_log_level_rec.statement_level) then
9807: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING DELTA *** THID', h_transaction_header_id, p_log_level_rec);
9808: 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);
9809: 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);
9810: fa_debug_pkg.add(l_calling_fn, 'h_new_perd_ctr_ret', h_new_perd_ctr_ret, p_log_level_rec);
9811: end if;
9812:
9813: if nvl(h_transaction_type_code,'NULL') in ('PARTIAL RETIREMENT','FULL RETIREMENT') then
9814: open GET_RETIREMENTS_MRC(h_transaction_header_id);
9822: h_new_reserve_retired := nvl(h_new_reserve_retired,0) + nvl(h_adj_reserve_retired,0);
9823: end if;
9824:
9825: if (p_log_level_rec.statement_level) then
9826: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id, p_log_level_rec);
9827: 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);
9828: end if;
9829: end if; -- Retirement treatment
9830:
9823: end if;
9824:
9825: if (p_log_level_rec.statement_level) then
9826: fa_debug_pkg.add(l_calling_fn, '++++ LOOP FOR GETTING RETIREMENT *** THID', h_transaction_header_id, p_log_level_rec);
9827: 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);
9828: end if;
9829: end if; -- Retirement treatment
9830:
9831: else -- if GET_DELTA_FOR_MEMBER%NOTFOUND then
9835: open GET_NEW_GROUP_MRC(h_member_asset_id, h_transaction_header_id);
9836: fetch GET_NEW_GROUP_MRC into h_new_group_asset_id;
9837: if GET_NEW_GROUP_MRC%FOUND then
9838: if (p_log_level_rec.statement_level) then
9839: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id, p_log_level_rec);
9840: 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);
9841: end if;
9842: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9843: close GET_NEW_GROUP_MRC;
9836: fetch GET_NEW_GROUP_MRC into h_new_group_asset_id;
9837: if GET_NEW_GROUP_MRC%FOUND then
9838: if (p_log_level_rec.statement_level) then
9839: fa_debug_pkg.add(l_calling_fn, '++++ Check the transaction is reclass or not ***', h_transaction_header_id, p_log_level_rec);
9840: 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);
9841: end if;
9842: if h_group_Asset_id <> nvl(h_new_group_Asset_id,-99) then
9843: close GET_NEW_GROUP_MRC;
9844: goto skip_thid;
9846: end if;
9847: close GET_NEW_GROUP_MRC;
9848:
9849: if (p_log_level_rec.statement_level) then
9850: fa_debug_pkg.add(l_calling_fn, '++++ Just set null to all ****', h_transaction_header_id, p_log_level_rec);
9851: end if;
9852: end if;
9853: <
9854: if (p_log_level_rec.statement_level) then
9851: end if;
9852: end if;
9853: <
9854: if (p_log_level_rec.statement_level) then
9855: fa_debug_pkg.add(l_calling_fn, '*** This is the end of loop ***', h_transaction_header_id, p_log_level_rec);
9856: end if;
9857:
9858: End loop;
9859:
9857:
9858: End loop;
9859:
9860: if (p_log_level_rec.statement_level) then
9861: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****', p_log_level_rec);
9862: 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);
9863: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9864: end if;
9865:
9858: End loop;
9859:
9860: if (p_log_level_rec.statement_level) then
9861: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****', p_log_level_rec);
9862: 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);
9863: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9864: end if;
9865:
9866: h_find_flag_3 := FALSE;
9859:
9860: if (p_log_level_rec.statement_level) then
9861: fa_debug_pkg.add(l_calling_fn, '++++ AFTER LOOP FOR GETTING DELTA ***', '****', p_log_level_rec);
9862: 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);
9863: fa_debug_pkg.add(l_calling_fn, 'h_new_group_asset_id', h_new_group_Asset_id, p_log_level_rec);
9864: end if;
9865:
9866: h_find_flag_3 := FALSE;
9867:
9879: h_bonus_ytd_deprn,
9880: h_eofy_reserve;
9881: if GET_PRV_ROW_BS_MRC%NOTFOUND then
9882: if (p_log_level_rec.statement_level) then
9883: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***', p_log_level_rec);
9884: end if;
9885: else
9886: if (p_log_level_rec.statement_level) then
9887: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec);
9883: fa_debug_pkg.add(l_calling_fn, 'No data in FA_BOOKS_SUMMARY', '***', p_log_level_rec);
9884: end if;
9885: else
9886: if (p_log_level_rec.statement_level) then
9887: fa_debug_pkg.add(l_calling_fn, 'Data in FA_BOOKS_SUMMARY', 'FOUND', p_log_level_rec);
9888: end if;
9889: if h_processing_period_num = 1 then
9890: h_ytd_deprn := 0;
9891: h_bonus_ytd_deprn := 0;
9930:
9931: if nvl(h_new_group_asset_id, -99) <> h_group_asset_id then
9932: p_track_member_table(j).group_asset_id := h_new_group_asset_id;
9933: if (p_log_level_rec.statement_level) then
9934: fa_debug_pkg.add(l_calling_fn, 'This member does not belong to this group anymore', '+++', p_log_level_rec);
9935: end if;
9936: end if;
9937: exit;
9938: end if;
9959: if GET_RESERVE_AT_ADDITION_MRC%NOTFOUND then
9960: -- Set zero initial reserve
9961:
9962: if (p_log_level_rec.statement_level) then
9963: fa_debug_pkg.add(l_calling_fn, 'Member asset which cannot find DEPRN SUMMARY table',
9964: h_member_asset_id, p_log_level_rec);
9965: end if;
9966:
9967: h_ytd_deprn := 0;
9969: elsif h_deprn_source_code <> 'BOOKS' then
9970: -- Set zero initial reserve
9971:
9972: if (p_log_level_rec.statement_level) then
9973: fa_debug_pkg.add(l_calling_fn, 'This Member assets record', h_deprn_source_code, p_log_level_rec);
9974: end if;
9975:
9976: h_ytd_deprn := 0;
9977: h_deprn_reserve := 0;
9985: -- Then enter this asset to extended memory table at this moment
9986: l_new_ind := p_track_member_table.COUNT + 1;
9987: l_processing_ind := l_new_ind;
9988: if (p_log_level_rec.statement_level) then
9989: fa_debug_pkg.add(l_calling_fn, 'l_new_ind', l_new_ind, p_log_level_rec);
9990: end if;
9991: p_track_member_table(l_new_ind).group_asset_id := h_group_asset_id;
9992: p_track_member_table(l_new_ind).member_asset_id := h_member_asset_id;
9993: p_track_member_table(l_new_ind).set_of_books_id := h_set_of_books_id;
10032: h_new_adjusted_rec_cost := h_new_cost - h_new_deprn_limit_amount;
10033: end if;
10034:
10035: if (p_log_level_rec.statement_level) then
10036: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
10037: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
10038: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
10039: end if;
10040:
10033: end if;
10034:
10035: if (p_log_level_rec.statement_level) then
10036: fa_debug_pkg.add(l_calling_fn, '++++ AFTER GETTING NEW COST etc ***', '*****', p_log_level_rec);
10037: fa_debug_pkg.add(l_calling_fn, 'h_new_cost:h_new_rec_cost:h_new_salvage:h_new_adj_rec_cost',
10038: h_new_cost||':'||h_new_recoverable_cost||':'||h_new_salvage_value||':'||h_new_adjusted_rec_cost, p_log_level_rec);
10039: end if;
10040:
10041: -- Get Asset type
10085:
10086: if (p_log_level_rec.statement_level) then
10087: if not display_debug_message(fa_rule_in => fa_rule_in,
10088: p_calling_fn => l_calling_fn) then
10089: fa_debug_pkg.add(l_calling_fn, 'display_debug_message', 'error', p_log_level_rec);
10090: end if;
10091: end if;
10092:
10093: -- Call Deprn Basis Rule for this transaction or period
10096: raise pop_mem_table_err;
10097: end if;
10098:
10099: if (p_log_level_rec.statement_level) then
10100: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
10101: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
10102: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
10103: end if;
10104:
10097: end if;
10098:
10099: if (p_log_level_rec.statement_level) then
10100: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
10101: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
10102: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
10103: end if;
10104:
10105: --* Set calculated adjusted cost into p_track_member_table
10098:
10099: if (p_log_level_rec.statement_level) then
10100: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id', fa_rule_in.asset_id, p_log_level_rec);
10101: fa_debug_pkg.add(l_calling_fn, 'fa_rule_out.new_adjusted_cost', fa_rule_out.new_adjusted_cost, p_log_level_rec);
10102: fa_debug_pkg.add(l_calling_fn, 'h_current_cost', h_new_cost, p_log_level_rec);
10103: end if;
10104:
10105: --* Set calculated adjusted cost into p_track_member_table
10106:
10124: end if;
10125:
10126: <
10127: if (p_log_level_rec.statement_level) then
10128: fa_debug_pkg.add(l_calling_fn, '+++ End of Loop +++', '++++', p_log_level_rec);
10129: end if;
10130:
10131: End Loop; -- (For ALL_MMEBER)
10132: end if; -- Primary or Reporting?
10132: end if; -- Primary or Reporting?
10133:
10134: --* From this point, Start to process allocate logic
10135: if (p_log_level_rec.statement_level) then
10136: fa_debug_pkg.add(l_calling_fn, '*** Ended all member assets treatment ***', '***', p_log_level_rec);
10137: fa_debug_pkg.add(l_calling_fn, '*** Start process to allocate group level amount ***', '***', p_log_level_rec);
10138: end if;
10139:
10140: if p_mrc_sob_type_code <> 'R' then
10133:
10134: --* From this point, Start to process allocate logic
10135: if (p_log_level_rec.statement_level) then
10136: fa_debug_pkg.add(l_calling_fn, '*** Ended all member assets treatment ***', '***', p_log_level_rec);
10137: fa_debug_pkg.add(l_calling_fn, '*** Start process to allocate group level amount ***', '***', p_log_level_rec);
10138: end if;
10139:
10140: if p_mrc_sob_type_code <> 'R' then
10141:
10212:
10213: else
10214:
10215: if (p_log_level_rec.statement_level) then
10216: fa_debug_pkg.add(l_calling_fn, '**** This processing period is last period of loop ****',
10217: '****', p_log_level_rec);
10218: end if;
10219:
10220: end if;
10219:
10220: end if;
10221:
10222: if (p_log_level_rec.statement_level) then
10223: fa_debug_pkg.add(l_calling_fn, '*** End of Period Loop ** Period Counter processed',
10224: h_processing_period_counter, p_log_level_rec);
10225: end if;
10226:
10227: End Loop; -- (For i IN 1.. h_length_of_loop)
10232: if nvl(h_exclude_fully_rsv_flag,'N') = 'Y' and
10233: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
10234:
10235: if (p_log_level_rec.statement_level) then
10236: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec);
10237: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year lopped out', h_processing_fiscal_year, p_log_level_rec);
10238: end if;
10239:
10240: -- If the fully reserved period is in the different fiscal year than
10233: nvl(fa_cache_pkg.fazccmt_record.deprn_basis_rule,'COST') = 'NBV' then
10234:
10235: if (p_log_level_rec.statement_level) then
10236: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Starts++++', p_log_level_rec);
10237: fa_debug_pkg.add(l_calling_fn, 'h_processing_fiscal_year lopped out', h_processing_fiscal_year, p_log_level_rec);
10238: end if;
10239:
10240: -- If the fully reserved period is in the different fiscal year than
10241: -- the fiscal year when the process is done.
10245: nvl(p_track_member_table(t).set_of_books_id,-99) = nvl(h_set_of_books_id,-99) then
10246: p_track_member_table(t).adjusted_cost := nvl(p_track_member_table(t).recoverable_cost,0)
10247: - nvl(p_track_member_table(t).deprn_reserve,0);
10248: if (p_log_level_rec.statement_level) then
10249: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset',
10250: p_track_member_table(t).member_asset_id, p_log_level_rec);
10251: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
10252: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter, p_log_level_rec);
10253: end if;
10247: - nvl(p_track_member_table(t).deprn_reserve,0);
10248: if (p_log_level_rec.statement_level) then
10249: fa_debug_pkg.add(l_calling_fn, 'Updated fully reserved member asset',
10250: p_track_member_table(t).member_asset_id, p_log_level_rec);
10251: fa_debug_pkg.add(l_calling_fn, 'Newly set Adjusted_cost and period_counter',
10252: p_track_member_table(t).adjusted_Cost||','||p_track_member_table(t).period_counter, p_log_level_rec);
10253: end if;
10254: end if;
10255: End Loop;
10254: end if;
10255: End Loop;
10256:
10257: if (p_log_level_rec.statement_level) then
10258: fa_debug_pkg.add(l_calling_fn, 'Fully Reserve Asset treatment', 'Ended++++', p_log_level_rec);
10259: end if;
10260:
10261: end if;
10262:
10467:
10468: BEGIN
10469:
10470: if (p_log_level_rec.statement_level) then
10471: fa_debug_pkg.add(l_calling_fn, '+++ populate member reserve starts +++ ',p_trans_rec.amortization_start_date , p_log_level_rec);
10472: end if;
10473:
10474: -- Populate Member Asset id processed in this transaction
10475: open FETCH_MEMBER_ASSET;
10477:
10478: if FETCH_MEMBER_ASSET%NOTFOUND then
10479:
10480: if (p_log_level_rec.statement_level) then
10481: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this group THID',
10482: p_trans_rec.transaction_header_id, p_log_level_rec);
10483: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this member THID',
10484: p_trans_rec.member_transaction_header_id, p_log_level_rec);
10485: end if;
10479:
10480: if (p_log_level_rec.statement_level) then
10481: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this group THID',
10482: p_trans_rec.transaction_header_id, p_log_level_rec);
10483: fa_debug_pkg.add(l_calling_fn, 'No transaction information for this member THID',
10484: p_trans_rec.member_transaction_header_id, p_log_level_rec);
10485: end if;
10486: close FETCH_MEMBER_ASSET;
10487:
10562:
10563: end if;
10564:
10565: if (p_log_level_rec.statement_level) then
10566: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec);
10567: 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);
10568: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec);
10569: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
10570: 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);
10563: end if;
10564:
10565: if (p_log_level_rec.statement_level) then
10566: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec);
10567: 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);
10568: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec);
10569: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
10570: 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);
10571: end if;
10564:
10565: if (p_log_level_rec.statement_level) then
10566: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec);
10567: 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);
10568: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec);
10569: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
10570: 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);
10571: end if;
10572:
10565: if (p_log_level_rec.statement_level) then
10566: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec);
10567: 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);
10568: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec);
10569: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
10570: 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);
10571: end if;
10572:
10573: if nvl(h_eofy_reserve,0) = 0 then
10566: fa_debug_pkg.add(l_calling_fn,'h_eofy_reserve:reserve_dpis_current',h_eofy_reserve||':'||h_reserve_dpis_current, p_log_level_rec);
10567: 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);
10568: fa_debug_pkg.add(l_calling_fn,'h_ds_fiscal_year', h_ds_fiscal_year, p_log_level_rec);
10569: fa_debug_pkg.add(l_calling_fn,'h_ytd_deprn', h_ytd_deprn, p_log_level_rec);
10570: 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);
10571: end if;
10572:
10573: if nvl(h_eofy_reserve,0) = 0 then
10574: if h_cur_fiscal_year = h_ds_fiscal_year then
10578: end if;
10579: end if;
10580:
10581: if (p_log_level_rec.statement_level) then
10582: fa_debug_pkg.add(l_calling_fn, 'x_deprn_reserve:x_eofy_reserve', h_reserve_dpis_current||':'||h_eofy_reserve, p_log_level_rec);
10583: end if;
10584:
10585: -- Set return value
10586: x_deprn_reserve := h_reserve_dpis_current;
10648:
10649: begin
10650:
10651: if (p_log_level_rec.statement_level) then
10652: fa_debug_pkg.add(l_calling_fn, '+++ Start to check 50% rule application ++ ', '+++', p_log_level_rec);
10653: end if;
10654:
10655: if p_rule_name in ('YEAR END BALANCE WITH POSITIVE REDUCTION',
10656: 'YEAR END BALANCE WITH HALF YEAR RULE') then
10661: h_half_year_rule_flag := 'N';
10662: end if;
10663:
10664: if (p_log_level_rec.statement_level) then
10665: fa_debug_pkg.add(l_calling_fn, 'Just before calling CALC_REDUCTION_AMOUNT', '***', p_log_level_rec);
10666: end if;
10667:
10668: if not FA_CALC_DEPRN_BASIS1_PKG.CALC_REDUCTION_AMOUNT
10669: (p_asset_id => p_group_asset_id,
10766: begin
10767:
10768: l_calling_fn := p_calling_fn;
10769:
10770: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10767:
10768: l_calling_fn := p_calling_fn;
10769:
10770: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10768: l_calling_fn := p_calling_fn;
10769:
10770: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10769:
10770: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10770: fa_debug_pkg.add(l_calling_fn, '++ Debug Message for fa_rule_in structure ++', fa_rule_in.asset_id, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10771: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.event_type', fa_rule_in.event_type, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10772: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.book_type_code', fa_rule_in.book_type_code, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10773: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.asset_type', fa_rule_in.asset_type, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10774: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.method_code', fa_rule_in.method_code, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10775: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.life_in_months', fa_rule_in.life_in_months, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10776: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.cost',fa_rule_in.cost, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10777: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.salvage_value',fa_rule_in.salvage_value, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10778: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.recoverable_cost',fa_rule_in.recoverable_cost, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10779: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_rsv', fa_rule_in.current_total_rsv, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10780: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_rsv', fa_rule_in.current_rsv, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10781: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.current_total_ytd', fa_rule_in.current_total_ytd, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10782: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_adjusted_cost', fa_rule_in.old_adjusted_cost, p_log_level_rec);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10790: 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);
10783: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.old_raf',fa_rule_in.old_raf, p_log_level_rec);
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10790: 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);
10791:
10784: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.period_counter', fa_rule_in.period_counter, p_log_level_rec);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10790: 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);
10791:
10792: return(true);
10785: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.fiscal_year', fa_rule_in.fiscal_year, p_log_level_rec);
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10790: 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);
10791:
10792: return(true);
10793:
10786: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.tracking_method',fa_rule_in.tracking_method, p_log_level_rec);
10787: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.used_by_adjustment', fa_rule_in.used_by_adjustment, p_log_level_rec);
10788: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_flag', fa_rule_in.eofy_flag, p_log_level_rec);
10789: fa_debug_pkg.add(l_calling_fn, 'fa_rule_in.eofy_reserve', fa_rule_in.eofy_reserve, p_log_level_rec);
10790: 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);
10791:
10792: return(true);
10793:
10794: end display_debug_message;
10811: begin
10812:
10813: l_calling_fn := p_calling_fn;
10814:
10815: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10812:
10813: l_calling_fn := p_calling_fn;
10814:
10815: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10813: l_calling_fn := p_calling_fn;
10814:
10815: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10814:
10815: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10815: fa_debug_pkg.add(l_calling_fn, '++ Debug Message display for p_track_member_table ++ Indicator ', i, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10816: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', p_track_member_table(i).member_asset_id, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10817: fa_debug_pkg.add(l_calling_fn, 'set_of_books_id', p_track_member_table(i).set_of_books_id, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10818: fa_debug_pkg.add(l_calling_fn, 'period_counter', p_track_member_table(i).period_counter, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10819: fa_debug_pkg.add(l_calling_fn, 'fiscal_year', p_track_member_table(i).fiscal_year, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10820: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10821: fa_debug_pkg.add(l_calling_fn, 'salvage_value', p_track_member_table(i).salvage_value, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10822: fa_debug_pkg.add(l_calling_fn, 'recoverable_cost', p_track_member_table(i).recoverable_cost, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10823: fa_debug_pkg.add(l_calling_fn, 'adjusted_cost', p_track_member_table(i).adjusted_cost, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10824: fa_debug_pkg.add(l_calling_fn, 'adjusted_recoverable_cost', p_track_member_table(i).adjusted_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10825: fa_debug_pkg.add(l_calling_fn, 'deprn_amount', p_track_member_table(i).allocated_deprn_amount, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10826: fa_debug_pkg.add(l_calling_fn, 'deprn_reserve', p_track_member_table(i).deprn_reserve, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10827: fa_debug_pkg.add(l_calling_fn, 'ytd_deprn', p_track_member_table(i).ytd_deprn, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10835: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag, p_log_level_rec);
10828: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_amount', p_track_member_table(i).allocated_bonus_amount, p_log_level_rec);
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10835: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag, p_log_level_rec);
10836:
10829: fa_debug_pkg.add(l_calling_fn, 'bonus_deprn_reserve', p_track_member_table(i).bonus_deprn_reserve, p_log_level_rec);
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10835: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag, p_log_level_rec);
10836:
10837: return true;
10830: fa_debug_pkg.add(l_calling_fn, 'bonus_ytd_deprn', p_track_member_table(i).bonus_ytd_deprn, p_log_level_rec);
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10835: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag, p_log_level_rec);
10836:
10837: return true;
10838:
10831: fa_debug_pkg.add(l_calling_fn, 'eofy_reserve', p_track_member_table(i).eofy_reserve, p_log_level_rec);
10832: fa_debug_pkg.add(l_calling_fn, 'eofy_recoverable_cost', p_track_member_table(i).eofy_recoverable_cost, p_log_level_rec);
10833: fa_debug_pkg.add(l_calling_fn, 'eofy_salvage_value', p_track_member_table(i).eofy_salvage_value, p_log_level_rec);
10834: fa_debug_pkg.add(l_calling_fn, 'fully_reserved_flag', p_track_member_table(i).fully_reserved_flag, p_log_level_rec);
10835: fa_debug_pkg.add(l_calling_fn, 'fully_retired_flag', p_track_member_table(i).fully_retired_flag, p_log_level_rec);
10836:
10837: return true;
10838:
10839: end display_debug_message2;
10861: begin
10862:
10863: if p_backup_restore = 'BACKUP' then
10864: if (p_log_level_rec.statement_level) then
10865: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec);
10866: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec);
10867: 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);
10868: end if;
10869:
10862:
10863: if p_backup_restore = 'BACKUP' then
10864: if (p_log_level_rec.statement_level) then
10865: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec);
10866: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec);
10867: 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);
10868: end if;
10869:
10870: if p_current_fiscal_year is not null and p_current_period_num is not null then
10863: if p_backup_restore = 'BACKUP' then
10864: if (p_log_level_rec.statement_level) then
10865: fa_debug_pkg.add(l_calling_fn, '++++ Backup p_track_member_table starts ++++', '++++', p_log_level_rec);
10866: fa_debug_pkg.add(l_calling_fn, 'Backup p_track_member_table rows', p_track_member_table.COUNT, p_log_level_rec);
10867: 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);
10868: end if;
10869:
10870: if p_current_fiscal_year is not null and p_current_period_num is not null then
10871: h_number_per_fy := fa_cache_pkg.fazcct_record.NUMBER_PER_FISCAL_YEAR;
10911: End Loop;
10912:
10913: else
10914: if (p_log_level_rec.statement_level) then
10915: fa_debug_pkg.add(l_calling_fn, '++++ Restore p_track_member_table starts ++++', '++++', p_log_level_rec);
10916: fa_debug_pkg.add(l_calling_fn, 'Restored p_track_member_table rows', p_track_member_table_for_deprn.COUNT, p_log_level_rec);
10917: end if;
10918:
10919: p_track_member_table.delete;
10912:
10913: else
10914: if (p_log_level_rec.statement_level) then
10915: fa_debug_pkg.add(l_calling_fn, '++++ Restore p_track_member_table starts ++++', '++++', p_log_level_rec);
10916: fa_debug_pkg.add(l_calling_fn, 'Restored p_track_member_table rows', p_track_member_table_for_deprn.COUNT, p_log_level_rec);
10917: end if;
10918:
10919: p_track_member_table.delete;
10920:
10950: p_track_member_table(l_ind).eofy_salvage_value := p_track_member_table_for_deprn(l_ind).eofy_salvage_value;
10951: p_track_member_table(l_ind).eop_salvage_value := p_track_member_table_for_deprn(l_ind).eop_salvage_value;
10952:
10953: if (p_log_level_rec.statement_level) then
10954: fa_debug_pkg.add('#### HH Test ###', 'Period Counter, member_asset_id restored',
10955: p_track_member_table(l_ind).period_counter||','||
10956: p_track_member_table(l_ind).member_asset_id, p_log_level_rec);
10957: end if;
10958:
10960:
10961: end if;
10962:
10963: if (p_log_level_rec.statement_level) then
10964: fa_debug_pkg.add(l_calling_fn, p_backup_restore||' has been done ++++', '++++', p_log_level_rec);
10965: end if;
10966:
10967: return(true);
10968:
11017:
11018: begin
11019:
11020: if (p_log_level_rec.statement_level) then
11021: fa_debug_pkg.add(l_calling_fn, '## Start to insert/update fa_books_summary for member assets','####', p_log_level_rec);
11022: fa_debug_pkg.add(l_calling_fn, 'h_book_type_code:h_group_asset_id',p_book_type_code||':'||p_group_asset_id, p_log_level_rec);
11023: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table.COUNT', p_track_member_table.COUNT, p_log_level_rec);
11024: end if;
11025:
11018: begin
11019:
11020: if (p_log_level_rec.statement_level) then
11021: fa_debug_pkg.add(l_calling_fn, '## Start to insert/update fa_books_summary for member assets','####', p_log_level_rec);
11022: fa_debug_pkg.add(l_calling_fn, 'h_book_type_code:h_group_asset_id',p_book_type_code||':'||p_group_asset_id, p_log_level_rec);
11023: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table.COUNT', p_track_member_table.COUNT, p_log_level_rec);
11024: end if;
11025:
11026: h_book_type_code := p_book_type_code;
11019:
11020: if (p_log_level_rec.statement_level) then
11021: fa_debug_pkg.add(l_calling_fn, '## Start to insert/update fa_books_summary for member assets','####', p_log_level_rec);
11022: fa_debug_pkg.add(l_calling_fn, 'h_book_type_code:h_group_asset_id',p_book_type_code||':'||p_group_asset_id, p_log_level_rec);
11023: fa_debug_pkg.add(l_calling_fn, 'p_track_member_table.COUNT', p_track_member_table.COUNT, p_log_level_rec);
11024: end if;
11025:
11026: h_book_type_code := p_book_type_code;
11027: h_group_asset_id := p_group_asset_id;
11033: h_period_counter := p_track_member_table(i).period_counter;
11034: h_set_of_books_id := p_track_member_table(i).set_of_books_id;
11035:
11036: if (p_log_level_rec.statement_level) then
11037: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec);
11038: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', h_member_asset_id, p_log_level_rec);
11039: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
11040: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
11041: end if;
11034: h_set_of_books_id := p_track_member_table(i).set_of_books_id;
11035:
11036: if (p_log_level_rec.statement_level) then
11037: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec);
11038: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', h_member_asset_id, p_log_level_rec);
11039: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
11040: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
11041: end if;
11042:
11035:
11036: if (p_log_level_rec.statement_level) then
11037: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec);
11038: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', h_member_asset_id, p_log_level_rec);
11039: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
11040: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
11041: end if;
11042:
11043: if p_mrc_sob_type_code <> 'R' then
11036: if (p_log_level_rec.statement_level) then
11037: fa_debug_pkg.add(l_calling_fn, 'i', i, p_log_level_rec);
11038: fa_debug_pkg.add(l_calling_fn, 'member_asset_id', h_member_asset_id, p_log_level_rec);
11039: fa_debug_pkg.add(l_calling_fn, 'h_period_counter', h_period_counter, p_log_level_rec);
11040: fa_debug_pkg.add(l_calling_fn, 'cost', p_track_member_table(i).cost, p_log_level_rec);
11041: end if;
11042:
11043: if p_mrc_sob_type_code <> 'R' then
11044: --* query fa_books_summary if this member record for this period exists or not
11045: open CHK_BS_TABLE;
11046: fetch CHK_BS_TABLE into h_chk_bs_flag;
11047: if CHK_BS_TABLE%NOTFOUND then
11048: if (p_log_level_rec.statement_level) then
11049: fa_debug_pkg.add(l_calling_fn, 'Newly insert following assets into fa_books_summary','###', p_log_level_rec);
11050: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id:h_group_asset_id:h_period_counter',
11051: h_member_asset_id||':'||h_group_asset_id||':'||h_period_counter, p_log_level_rec);
11052: end if;
11053: -- This means to insert new row into FA_BOOKS_SUMMARY
11046: fetch CHK_BS_TABLE into h_chk_bs_flag;
11047: if CHK_BS_TABLE%NOTFOUND then
11048: if (p_log_level_rec.statement_level) then
11049: fa_debug_pkg.add(l_calling_fn, 'Newly insert following assets into fa_books_summary','###', p_log_level_rec);
11050: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id:h_group_asset_id:h_period_counter',
11051: h_member_asset_id||':'||h_group_asset_id||':'||h_period_counter, p_log_level_rec);
11052: end if;
11053: -- This means to insert new row into FA_BOOKS_SUMMARY
11054: INSERT INTO FA_BOOKS_SUMMARY
11094: p_trans_rec.who_info.last_update_date,
11095: p_trans_rec.who_info.last_updated_by,
11096: p_trans_rec.who_info.last_update_login);
11097: if (p_log_level_rec.statement_level) then
11098: fa_debug_pkg.add(l_calling_fn, 'Inserted new row for', h_member_asset_id||':'||h_period_counter, p_log_level_rec);
11099: end if;
11100: else
11101: if (p_log_level_rec.statement_level) then
11102: fa_debug_pkg.add(l_calling_fn, 'Update following assets into fa_books_summary:','####', p_log_level_rec);
11098: fa_debug_pkg.add(l_calling_fn, 'Inserted new row for', h_member_asset_id||':'||h_period_counter, p_log_level_rec);
11099: end if;
11100: else
11101: if (p_log_level_rec.statement_level) then
11102: fa_debug_pkg.add(l_calling_fn, 'Update following assets into fa_books_summary:','####', p_log_level_rec);
11103: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id:h_group_asset_id:h_period_counter',
11104: h_member_asset_id||':'||h_group_asset_id||':'||h_period_counter, p_log_level_rec);
11105: end if;
11106: UPDATE FA_BOOKS_SUMMARY
11099: end if;
11100: else
11101: if (p_log_level_rec.statement_level) then
11102: fa_debug_pkg.add(l_calling_fn, 'Update following assets into fa_books_summary:','####', p_log_level_rec);
11103: fa_debug_pkg.add(l_calling_fn, 'h_member_asset_id:h_group_asset_id:h_period_counter',
11104: h_member_asset_id||':'||h_group_asset_id||':'||h_period_counter, p_log_level_rec);
11105: end if;
11106: UPDATE FA_BOOKS_SUMMARY
11107: SET COST = p_track_member_table(i).cost
11123: AND ASSET_ID = h_member_asset_id
11124: AND BOOK_TYPE_CODE = h_book_type_code
11125: AND PERIOD_COUNTER = h_period_counter;
11126: if (p_log_level_rec.statement_level) then
11127: fa_debug_pkg.add(l_calling_fn, 'Updated existing row for', h_member_asset_id||':'||h_period_counter, p_log_level_rec);
11128: end if;
11129:
11130: end if;
11131: close CHK_BS_TABLE;
11181: p_trans_rec.who_info.last_update_date,
11182: p_trans_rec.who_info.last_updated_by,
11183: p_trans_rec.who_info.last_update_login);
11184: if (p_log_level_rec.statement_level) then
11185: fa_debug_pkg.add(l_calling_fn, 'Inserted new row for', h_member_asset_id||':'||h_period_counter, p_log_level_rec);
11186: end if;
11187: else
11188: UPDATE FA_BOOKS_SUMMARY_MRC_V
11189: SET COST = p_track_member_table(i).cost
11207: ASSET_ID = h_member_asset_id
11208: AND BOOK_TYPE_CODE = h_book_type_code
11209: AND PERIOD_COUNTER = h_period_counter;
11210: if (p_log_level_rec.statement_level) then
11211: fa_debug_pkg.add(l_calling_fn, 'Updated existing row for', h_member_asset_id||':'||h_period_counter, p_log_level_rec);
11212: end if;
11213:
11214: end if;
11215: close CHK_BS_TABLE_MRC;
11216: end if;
11217: END LOOP;
11218:
11219: if (p_log_level_rec.statement_level) then
11220: fa_debug_pkg.add(l_calling_fn, '## End of insert/update fa_books_summary for member assets','####', p_log_level_rec);
11221: end if;
11222:
11223: return (true);
11224:
11284:
11285: begin
11286:
11287: if (p_log_level_rec.statement_level) then
11288: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***', p_log_level_rec);
11289: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11290: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec);
11291: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec);
11292: end if;
11285: begin
11286:
11287: if (p_log_level_rec.statement_level) then
11288: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***', p_log_level_rec);
11289: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11290: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec);
11291: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec);
11292: end if;
11293:
11287: if (p_log_level_rec.statement_level) then
11288: fa_debug_pkg.add(l_calling_fn, '*** Start OVERRIDE for populate_member_assets_table process', '***', p_log_level_rec);
11289: fa_debug_pkg.add(l_calling_fn, 'p_book_type_code:p_member_asset_id:p_mrc_sob_type_code',
11290: p_book_type_code||':'||p_member_asset_id||':'||p_mrc_sob_type_code, p_log_level_rec);
11291: fa_debug_pkg.add(l_calling_fn, 'p_calling_fn', p_calling_fn, p_log_level_rec);
11292: end if;
11293:
11294: if nvl(p_calling_fn,'NULL') = 'POPULATE_MEMBER_ASSETS_TABLE' then
11295: -- This funcation can work only during processing populate_member_assets_table
11303: h_reporting_flag := 'P';
11304: END IF;
11305:
11306: if (p_log_level_rec.statement_level) then
11307: 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);
11308: end if;
11309: /* select the corresponding period_counter for the current period: fyctr, perd_ctr */
11310: h_calendar_type:= fa_cache_pkg.fazcbc_record.deprn_calendar;
11311: h_fy_name:= fa_cache_pkg.fazcbc_record.fiscal_year_name;
11321: fy.fiscal_year_name = h_fy_name and
11322: fy.fiscal_year = p_fiscal_year;
11323:
11324: if (p_log_level_rec.statement_level) then
11325: fa_debug_pkg.add(l_calling_fn, 'h_period_name', h_period_name, p_log_level_rec);
11326: end if;
11327: /* Query override table */
11328: open GET_OVERRIDE_AMOUNT;
11329: fetch GET_OVERRIDE_AMOUNT INTO x_override_deprn_amount, x_override_bonus_amount, h_subtract_ytd_flag, h_deprn_override_id;
11329: fetch GET_OVERRIDE_AMOUNT INTO x_override_deprn_amount, x_override_bonus_amount, h_subtract_ytd_flag, h_deprn_override_id;
11330: close GET_OVERRIDE_AMOUNT;
11331:
11332: if (p_log_level_rec.statement_level) then
11333: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec);
11334: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec);
11335: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec);
11336: end if;
11337:
11330: close GET_OVERRIDE_AMOUNT;
11331:
11332: if (p_log_level_rec.statement_level) then
11333: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec);
11334: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec);
11335: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec);
11336: end if;
11337:
11338: l_avg_rate := 1;
11331:
11332: if (p_log_level_rec.statement_level) then
11333: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount', x_override_deprn_amount||':'||x_override_bonus_amount, p_log_level_rec);
11334: fa_debug_pkg.add(l_calling_fn, 'p_ytd_deprn:bonus_ytd', p_ytd_deprn||':'||p_bonus_ytd_deprn, p_log_level_rec);
11335: fa_debug_pkg.add(l_calling_fn, 'p_recoverable_cost:p_salvage_value', p_recoverable_cost||':'||p_salvage_value, p_log_level_rec);
11336: end if;
11337:
11338: l_avg_rate := 1;
11339:
11343: report_cost:= p_recoverable_cost + p_salvage_value;
11344: end if;
11345:
11346: if (p_log_level_rec.statement_level) then
11347: fa_debug_pkg.add(l_calling_fn, 'primary_cost:report_cost', primary_cost||':'||report_cost, p_log_level_rec);
11348: end if;
11349:
11350: -- ratio = Reporting Books Cost / Primary books Cost for adjustment.
11351: -- the above calculation can be used once the depreciaion
11383: x_override_bonus_amount := x_override_bonus_amount - p_bonus_ytd_deprn;
11384: END IF;
11385:
11386: if (p_log_level_rec.statement_level) then
11387: fa_debug_pkg.add(l_calling_fn, 'x_override_deprn:bonus_amount:override_flag',
11388: x_override_deprn_amount||':'||x_override_bonus_amount||':'||x_deprn_override_flag, p_log_level_rec);
11389: end if;
11390:
11391: end if;