360: -- -------------------------------------------------------------------
361: FUNCTION Do_Cost_Revaluation
362: (p_asset_iac_adj_info igi_iac_types.iac_adj_hist_asset_info,
363: p_asset_iac_dist_info igi_iac_types.iac_adj_dist_info_tab,
364: p_adj_hist igi_iac_adjustments_history%ROWTYPE,
365: p_event_id number) --R12 uptake
366: RETURN BOOLEAN
367: IS
368: -- local cursors
495: l_fa_deprn_period igi_iac_fa_deprn.deprn_period%TYPE;
496: l_fa_deprn_reserve igi_iac_fa_deprn.deprn_reserve%TYPE;
497: l_fa_deprn_ytd igi_iac_fa_deprn.deprn_ytd%TYPE;
498:
499: l_dr_cr_flag_c igi_iac_adjustments.dr_cr_flag%TYPE;
500: l_dr_cr_flag_ro igi_iac_adjustments.dr_cr_flag%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
496: l_fa_deprn_reserve igi_iac_fa_deprn.deprn_reserve%TYPE;
497: l_fa_deprn_ytd igi_iac_fa_deprn.deprn_ytd%TYPE;
498:
499: l_dr_cr_flag_c igi_iac_adjustments.dr_cr_flag%TYPE;
500: l_dr_cr_flag_ro igi_iac_adjustments.dr_cr_flag%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
498:
499: l_dr_cr_flag_c igi_iac_adjustments.dr_cr_flag%TYPE;
500: l_dr_cr_flag_ro igi_iac_adjustments.dr_cr_flag%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
499: l_dr_cr_flag_c igi_iac_adjustments.dr_cr_flag%TYPE;
500: l_dr_cr_flag_ro igi_iac_adjustments.dr_cr_flag%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
507: l_adjustment_offset_type VARCHAR2(50);
500: l_dr_cr_flag_ro igi_iac_adjustments.dr_cr_flag%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
507: l_adjustment_offset_type VARCHAR2(50);
508: l_units_assigned igi_iac_adjustments.units_assigned%TYPE;
501: l_adjust_type VARCHAR2(15);
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
507: l_adjustment_offset_type VARCHAR2(50);
508: l_units_assigned igi_iac_adjustments.units_assigned%TYPE;
509: l_last_period_counter igi_iac_transaction_headers.period_counter%TYPE;
502: -- l_ccid igi_iac_adjustments.code_combination_id%TYPE;
503: l_cost_ccid igi_iac_adjustments.code_combination_id%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
507: l_adjustment_offset_type VARCHAR2(50);
508: l_units_assigned igi_iac_adjustments.units_assigned%TYPE;
509: l_last_period_counter igi_iac_transaction_headers.period_counter%TYPE;
510: l_rsvd_pc igi_iac_transaction_headers.period_counter%TYPE;
504: l_reval_rsv_ccid igi_iac_adjustments.code_combination_id%TYPE;
505: l_op_exp_ccid igi_iac_adjustments.code_combination_id%TYPE;
506: l_report_ccid igi_iac_adjustments.code_combination_id%TYPE;
507: l_adjustment_offset_type VARCHAR2(50);
508: l_units_assigned igi_iac_adjustments.units_assigned%TYPE;
509: l_last_period_counter igi_iac_transaction_headers.period_counter%TYPE;
510: l_rsvd_pc igi_iac_transaction_headers.period_counter%TYPE;
511:
512: l_sob_id NUMBER;
900: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
901: p_full_path => l_path_name,
902: p_string => 'IAC Deprn row inserted');
903:
904: -- Create the following accounting entries with the prorated amounts in IGI_IAC_ADJUSTMENTS
905:
906: -- find the ccid for COST
907:
908: If l_add_cost <> 0 Then
919: igi_iac_debug_pkg.debug_other_string(p_level => g_state_level,
920: p_full_path => l_path_name,
921: p_string => 'COST ccid: '||l_cost_ccid||' Flag: '||l_dr_cr_flag_c);
922:
923: -- insert into igi_iac_adjustments for REVAL RESERVE or OP EXPENSE
924: IF (l_iac_asset_bal.cumulative_reval_factor >= 1 ) THEN
925: -- find the ccid for COST
926: IF NOT igi_iac_common_utils.get_account_ccid(l_book_type_code,
927: l_asset_id,
936: l_report_ccid :=l_reval_rsv_ccid;
937:
938: -------- REVAL RESERVE A/C Entry-------------
939:
940: -- insert into igi_iac_adjustments for REVAL RESERVE
941: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
942: x_rowid => l_rowid,
943: x_adjustment_id => l_new_adj_id,
944: x_book_type_code => l_book_type_code,
937:
938: -------- REVAL RESERVE A/C Entry-------------
939:
940: -- insert into igi_iac_adjustments for REVAL RESERVE
941: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
942: x_rowid => l_rowid,
943: x_adjustment_id => l_new_adj_id,
944: x_book_type_code => l_book_type_code,
945: x_code_combination_id => l_reval_rsv_ccid,
977:
978: l_adjustment_offset_type:='OP EXPENSE';
979: l_report_ccid :=l_op_exp_ccid;
980:
981: -- insert into igi_iac_adjustments for OP EXPENSE
982: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
983: x_rowid => l_rowid,
984: x_adjustment_id => l_new_adj_id,
985: x_book_type_code => l_book_type_code,
978: l_adjustment_offset_type:='OP EXPENSE';
979: l_report_ccid :=l_op_exp_ccid;
980:
981: -- insert into igi_iac_adjustments for OP EXPENSE
982: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
983: x_rowid => l_rowid,
984: x_adjustment_id => l_new_adj_id,
985: x_book_type_code => l_book_type_code,
986: x_code_combination_id => l_op_exp_ccid,
1002: p_full_path => l_path_name,
1003: p_string => 'OP EXPENSE ccid: '||l_op_exp_ccid||' Flag: '||l_dr_cr_flag_ro);
1004: END IF;
1005:
1006: -- insert into igi_iac_adjustments for COST
1007: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
1008: x_rowid => l_rowid,
1009: x_adjustment_id => l_new_adj_id,
1010: x_book_type_code => l_book_type_code,
1003: p_string => 'OP EXPENSE ccid: '||l_op_exp_ccid||' Flag: '||l_dr_cr_flag_ro);
1004: END IF;
1005:
1006: -- insert into igi_iac_adjustments for COST
1007: IGI_IAC_ADJUSTMENTS_PKG.Insert_Row(
1008: x_rowid => l_rowid,
1009: x_adjustment_id => l_new_adj_id,
1010: x_book_type_code => l_book_type_code,
1011: x_code_combination_id => l_cost_ccid,