[Home] [Help]
3831: --
3832: -- bulk performance
3833: --
3834: l_balance_type_code VARCHAR2(1);
3835: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3836: l_log_module VARCHAR2(240);
3837:
3838: --
3839: -- Upgrade strategy
3903: ') = 'Y'
3904: THEN
3905:
3906: --
3907: XLA_AE_LINES_PKG.SetNewLine;
3908:
3909: p_balance_type_code := l_balance_type_code;
3910: -- set the flag so later we will know whether the gain loss line needs to be created
3911:
3915:
3916: --
3917: -- bulk performance
3918: --
3919: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3920: p_header_num => 0); -- 4262811
3921: --
3922: -- set accounting line options
3923: --
3920: p_header_num => 0); -- 4262811
3921: --
3922: -- set accounting line options
3923: --
3924: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3925: p_natural_side_code => 'D'
3926: , p_gain_or_loss_flag => 'Y'
3927: , p_gl_transfer_mode_code => 'S'
3928: , p_acct_entry_type_code => 'A'
3934: --
3935: --
3936: -- set accounting line type info
3937: --
3938: xla_ae_lines_pkg.SetAcctLineType
3939: (p_component_type => l_component_type
3940: ,p_event_type_code => l_event_type_code
3941: ,p_line_definition_owner_code => l_line_definition_owner_code
3942: ,p_line_definition_code => l_line_definition_code
3948: ,p_event_class_code => l_event_class_code);
3949: --
3950: -- set accounting class
3951: --
3952: xla_ae_lines_pkg.SetAcctClass(
3953: p_accounting_class_code => 'EXCHANGE_RATE_VARIANCE'
3954: , p_ae_header_id => l_ae_header_id
3955: );
3956:
3956:
3957: --
3958: -- set rounding class
3959: --
3960: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3961: 'EXCHANGE_RATE_VARIANCE';
3962:
3963: --
3964: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3960: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3961: 'EXCHANGE_RATE_VARIANCE';
3962:
3963: --
3964: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3965: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3966: --
3967: -- bulk performance
3968: --
3961: 'EXCHANGE_RATE_VARIANCE';
3962:
3963: --
3964: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3965: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3966: --
3967: -- bulk performance
3968: --
3969: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3965: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3966: --
3967: -- bulk performance
3968: --
3969: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3970:
3971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3972: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3973:
3967: -- bulk performance
3968: --
3969: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3970:
3971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3972: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3973:
3974: -- 4955764
3975: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3972: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3973:
3974: -- 4955764
3975: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3976: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
3977:
3978: -- 4458381 Public Sector Enh
3979:
4043: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
4044: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
4045: l_rec_acct_attrs.array_char_value(30) := p_source_35;
4046:
4047: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4048: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4049:
4050: ---------------------------------------------------------------------------------------------------------------
4051: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4044: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
4045: l_rec_acct_attrs.array_char_value(30) := p_source_35;
4046:
4047: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4048: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4049:
4050: ---------------------------------------------------------------------------------------------------------------
4051: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4052: ---------------------------------------------------------------------------------------------------------------
4047: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4048: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4049:
4050: ---------------------------------------------------------------------------------------------------------------
4051: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4052: ---------------------------------------------------------------------------------------------------------------
4053: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4054:
4055: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4049:
4050: ---------------------------------------------------------------------------------------------------------------
4051: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4052: ---------------------------------------------------------------------------------------------------------------
4053: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4054:
4055: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4056: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4057:
4051: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4052: ---------------------------------------------------------------------------------------------------------------
4053: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4054:
4055: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4056: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4057:
4058: IF xla_accounting_cache_pkg.GetValueChar
4059: (p_source_code => 'LEDGER_CATEGORY_CODE'
4052: ---------------------------------------------------------------------------------------------------------------
4053: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4054:
4055: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4056: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4057:
4058: IF xla_accounting_cache_pkg.GetValueChar
4059: (p_source_code => 'LEDGER_CATEGORY_CODE'
4060: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4063: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4064: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4065: )
4066: THEN
4067: xla_ae_lines_pkg.BflowUpgEntry
4068: (p_business_method_code => l_bflow_method_code
4069: ,p_business_class_code => l_bflow_class_code
4070: ,p_balance_type => l_balance_type_code);
4071: ELSE
4105: , x_value_type_code => l_adr_value_type_code
4106: , p_side => 'NA'
4107: );
4108:
4109: xla_ae_lines_pkg.set_ccid(
4110: p_code_combination_id => l_ccid
4111: , p_value_type_code => l_adr_value_type_code
4112: , p_transaction_coa_id => l_adr_transaction_coa_id
4113: , p_accounting_coa_id => l_adr_accounting_coa_id
4141: xla_accounting_err_pkg.build_message
4142: (p_appli_s_name => 'XLA'
4143: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4144: ,p_token_1 => 'LINE_NUMBER'
4145: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4146: ,p_token_2 => 'LINE_TYPE_NAME'
4147: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4148: l_component_type
4149: ,l_component_code
4177: --
4178: --
4179: ------------------------------------------------------------------------------------------------
4180: -- 4219869 Business Flow
4181: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4182: -- Prior Entry. Currently, the following code is always generated.
4183: ------------------------------------------------------------------------------------------------
4184: XLA_AE_LINES_PKG.ValidateCurrentLine;
4185:
4180: -- 4219869 Business Flow
4181: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4182: -- Prior Entry. Currently, the following code is always generated.
4183: ------------------------------------------------------------------------------------------------
4184: XLA_AE_LINES_PKG.ValidateCurrentLine;
4185:
4186: ------------------------------------------------------------------------------------
4187: -- 4219869 Business Flow
4188: -- Populated credit and debit amounts -- Need to generate this within IF
4186: ------------------------------------------------------------------------------------
4187: -- 4219869 Business Flow
4188: -- Populated credit and debit amounts -- Need to generate this within IF
4189: ------------------------------------------------------------------------------------
4190: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4191:
4192: ----------------------------------------------------------------------------------
4193: -- 4219869 Business Flow
4194: -- Update journal entry status -- Need to generate this within IF
4218: -- To allow MPA report to determine if it should generate report process
4219: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4220: ------------------------------------------------------------------------------------------
4221:
4222: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4223: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4224:
4225: --
4226: -- Update the line information that should be overwritten
4219: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4220: ------------------------------------------------------------------------------------------
4221:
4222: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4223: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4224:
4225: --
4226: -- Update the line information that should be overwritten
4227: --
4224:
4225: --
4226: -- Update the line information that should be overwritten
4227: --
4228: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4229: p_header_num => 1);
4230: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4231:
4232: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4226: -- Update the line information that should be overwritten
4227: --
4228: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4229: p_header_num => 1);
4230: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4231:
4232: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4233:
4234: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4228: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4229: p_header_num => 1);
4230: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4231:
4232: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4233:
4234: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4235: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4236: END IF;
4231:
4232: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4233:
4234: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4235: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4236: END IF;
4237:
4238: --
4239: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4238: --
4239: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4240: --
4241: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4242: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4243: ELSE
4244: ---------------------------------------------------------------------------------------------------
4245: -- 4262811a Switch Sign
4246: ---------------------------------------------------------------------------------------------------
4243: ELSE
4244: ---------------------------------------------------------------------------------------------------
4245: -- 4262811a Switch Sign
4246: ---------------------------------------------------------------------------------------------------
4247: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4248: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4244: ---------------------------------------------------------------------------------------------------
4245: -- 4262811a Switch Sign
4246: ---------------------------------------------------------------------------------------------------
4247: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4248: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4245: -- 4262811a Switch Sign
4246: ---------------------------------------------------------------------------------------------------
4247: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4248: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4253: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4246: ---------------------------------------------------------------------------------------------------
4247: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4248: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4253: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4247: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4248: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4253: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4255:
4249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4253: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4255:
4256: END IF;
4257:
4250: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4252: -- 5132302
4253: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4255:
4256: END IF;
4257:
4258: -- 4955764
4255:
4256: END IF;
4257:
4258: -- 4955764
4259: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4260: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4261:
4262:
4263: XLA_AE_LINES_PKG.ValidateCurrentLine;
4259: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4260: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4261:
4262:
4263: XLA_AE_LINES_PKG.ValidateCurrentLine;
4264: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4265:
4266: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4267: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4260: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4261:
4262:
4263: XLA_AE_LINES_PKG.ValidateCurrentLine;
4264: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4265:
4266: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4267: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4268: ,p_balance_type_code => l_balance_type_code);
4412: --
4413: -- bulk performance
4414: --
4415: l_balance_type_code VARCHAR2(1);
4416: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4417: l_log_module VARCHAR2(240);
4418:
4419: --
4420: -- Upgrade strategy
4484: ') = 'Y'
4485: THEN
4486:
4487: --
4488: XLA_AE_LINES_PKG.SetNewLine;
4489:
4490: p_balance_type_code := l_balance_type_code;
4491: -- set the flag so later we will know whether the gain loss line needs to be created
4492:
4496:
4497: --
4498: -- bulk performance
4499: --
4500: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
4501: p_header_num => 0); -- 4262811
4502: --
4503: -- set accounting line options
4504: --
4501: p_header_num => 0); -- 4262811
4502: --
4503: -- set accounting line options
4504: --
4505: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
4506: p_natural_side_code => 'D'
4507: , p_gain_or_loss_flag => 'Y'
4508: , p_gl_transfer_mode_code => 'S'
4509: , p_acct_entry_type_code => 'A'
4515: --
4516: --
4517: -- set accounting line type info
4518: --
4519: xla_ae_lines_pkg.SetAcctLineType
4520: (p_component_type => l_component_type
4521: ,p_event_type_code => l_event_type_code
4522: ,p_line_definition_owner_code => l_line_definition_owner_code
4523: ,p_line_definition_code => l_line_definition_code
4529: ,p_event_class_code => l_event_class_code);
4530: --
4531: -- set accounting class
4532: --
4533: xla_ae_lines_pkg.SetAcctClass(
4534: p_accounting_class_code => 'EXCHANGE_RATE_VARIANCE'
4535: , p_ae_header_id => l_ae_header_id
4536: );
4537:
4537:
4538: --
4539: -- set rounding class
4540: --
4541: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4542: 'EXCHANGE_RATE_VARIANCE';
4543:
4544: --
4545: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4541: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4542: 'EXCHANGE_RATE_VARIANCE';
4543:
4544: --
4545: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4546: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4547: --
4548: -- bulk performance
4549: --
4542: 'EXCHANGE_RATE_VARIANCE';
4543:
4544: --
4545: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4546: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4547: --
4548: -- bulk performance
4549: --
4550: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4546: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4547: --
4548: -- bulk performance
4549: --
4550: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4551:
4552: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4553: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4554:
4548: -- bulk performance
4549: --
4550: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4551:
4552: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4553: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4554:
4555: -- 4955764
4556: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4552: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4553: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4554:
4555: -- 4955764
4556: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4557: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4558:
4559: -- 4458381 Public Sector Enh
4560:
4624: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
4625: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
4626: l_rec_acct_attrs.array_char_value(30) := p_source_35;
4627:
4628: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4629: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4630:
4631: ---------------------------------------------------------------------------------------------------------------
4632: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4625: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
4626: l_rec_acct_attrs.array_char_value(30) := p_source_35;
4627:
4628: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4629: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4630:
4631: ---------------------------------------------------------------------------------------------------------------
4632: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4633: ---------------------------------------------------------------------------------------------------------------
4628: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4629: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4630:
4631: ---------------------------------------------------------------------------------------------------------------
4632: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4633: ---------------------------------------------------------------------------------------------------------------
4634: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4635:
4636: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4630:
4631: ---------------------------------------------------------------------------------------------------------------
4632: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4633: ---------------------------------------------------------------------------------------------------------------
4634: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4635:
4636: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4637: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4638:
4632: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4633: ---------------------------------------------------------------------------------------------------------------
4634: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4635:
4636: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4637: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4638:
4639: IF xla_accounting_cache_pkg.GetValueChar
4640: (p_source_code => 'LEDGER_CATEGORY_CODE'
4633: ---------------------------------------------------------------------------------------------------------------
4634: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4635:
4636: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4637: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4638:
4639: IF xla_accounting_cache_pkg.GetValueChar
4640: (p_source_code => 'LEDGER_CATEGORY_CODE'
4641: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4644: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4645: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4646: )
4647: THEN
4648: xla_ae_lines_pkg.BflowUpgEntry
4649: (p_business_method_code => l_bflow_method_code
4650: ,p_business_class_code => l_bflow_class_code
4651: ,p_balance_type => l_balance_type_code);
4652: ELSE
4685: , x_value_type_code => l_adr_value_type_code
4686: , p_side => 'NA'
4687: );
4688:
4689: xla_ae_lines_pkg.set_ccid(
4690: p_code_combination_id => l_ccid
4691: , p_value_type_code => l_adr_value_type_code
4692: , p_transaction_coa_id => l_adr_transaction_coa_id
4693: , p_accounting_coa_id => l_adr_accounting_coa_id
4721: xla_accounting_err_pkg.build_message
4722: (p_appli_s_name => 'XLA'
4723: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4724: ,p_token_1 => 'LINE_NUMBER'
4725: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4726: ,p_token_2 => 'LINE_TYPE_NAME'
4727: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4728: l_component_type
4729: ,l_component_code
4757: --
4758: --
4759: ------------------------------------------------------------------------------------------------
4760: -- 4219869 Business Flow
4761: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4762: -- Prior Entry. Currently, the following code is always generated.
4763: ------------------------------------------------------------------------------------------------
4764: XLA_AE_LINES_PKG.ValidateCurrentLine;
4765:
4760: -- 4219869 Business Flow
4761: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4762: -- Prior Entry. Currently, the following code is always generated.
4763: ------------------------------------------------------------------------------------------------
4764: XLA_AE_LINES_PKG.ValidateCurrentLine;
4765:
4766: ------------------------------------------------------------------------------------
4767: -- 4219869 Business Flow
4768: -- Populated credit and debit amounts -- Need to generate this within IF
4766: ------------------------------------------------------------------------------------
4767: -- 4219869 Business Flow
4768: -- Populated credit and debit amounts -- Need to generate this within IF
4769: ------------------------------------------------------------------------------------
4770: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4771:
4772: ----------------------------------------------------------------------------------
4773: -- 4219869 Business Flow
4774: -- Update journal entry status -- Need to generate this within IF
4798: -- To allow MPA report to determine if it should generate report process
4799: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4800: ------------------------------------------------------------------------------------------
4801:
4802: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4803: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4804:
4805: --
4806: -- Update the line information that should be overwritten
4799: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4800: ------------------------------------------------------------------------------------------
4801:
4802: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4803: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4804:
4805: --
4806: -- Update the line information that should be overwritten
4807: --
4804:
4805: --
4806: -- Update the line information that should be overwritten
4807: --
4808: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4809: p_header_num => 1);
4810: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4811:
4812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4806: -- Update the line information that should be overwritten
4807: --
4808: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4809: p_header_num => 1);
4810: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4811:
4812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4813:
4814: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4808: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4809: p_header_num => 1);
4810: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4811:
4812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4813:
4814: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4815: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4816: END IF;
4811:
4812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4813:
4814: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4815: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4816: END IF;
4817:
4818: --
4819: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4818: --
4819: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4820: --
4821: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4822: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4823: ELSE
4824: ---------------------------------------------------------------------------------------------------
4825: -- 4262811a Switch Sign
4826: ---------------------------------------------------------------------------------------------------
4823: ELSE
4824: ---------------------------------------------------------------------------------------------------
4825: -- 4262811a Switch Sign
4826: ---------------------------------------------------------------------------------------------------
4827: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4828: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4824: ---------------------------------------------------------------------------------------------------
4825: -- 4262811a Switch Sign
4826: ---------------------------------------------------------------------------------------------------
4827: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4828: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4825: -- 4262811a Switch Sign
4826: ---------------------------------------------------------------------------------------------------
4827: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4828: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4833: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4826: ---------------------------------------------------------------------------------------------------
4827: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4828: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4833: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4827: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4828: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4833: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4835:
4829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4833: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4835:
4836: END IF;
4837:
4830: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4832: -- 5132302
4833: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4835:
4836: END IF;
4837:
4838: -- 4955764
4835:
4836: END IF;
4837:
4838: -- 4955764
4839: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4840: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4841:
4842:
4843: XLA_AE_LINES_PKG.ValidateCurrentLine;
4839: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4840: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4841:
4842:
4843: XLA_AE_LINES_PKG.ValidateCurrentLine;
4844: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4845:
4846: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4847: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4840: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4841:
4842:
4843: XLA_AE_LINES_PKG.ValidateCurrentLine;
4844: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4845:
4846: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4847: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4848: ,p_balance_type_code => l_balance_type_code);
4992: --
4993: -- bulk performance
4994: --
4995: l_balance_type_code VARCHAR2(1);
4996: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4997: l_log_module VARCHAR2(240);
4998:
4999: --
5000: -- Upgrade strategy
5064: ') = 'Y'
5065: THEN
5066:
5067: --
5068: XLA_AE_LINES_PKG.SetNewLine;
5069:
5070: p_balance_type_code := l_balance_type_code;
5071: -- set the flag so later we will know whether the gain loss line needs to be created
5072:
5076:
5077: --
5078: -- bulk performance
5079: --
5080: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5081: p_header_num => 0); -- 4262811
5082: --
5083: -- set accounting line options
5084: --
5081: p_header_num => 0); -- 4262811
5082: --
5083: -- set accounting line options
5084: --
5085: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5086: p_natural_side_code => 'C'
5087: , p_gain_or_loss_flag => 'Y'
5088: , p_gl_transfer_mode_code => 'S'
5089: , p_acct_entry_type_code => 'A'
5095: --
5096: --
5097: -- set accounting line type info
5098: --
5099: xla_ae_lines_pkg.SetAcctLineType
5100: (p_component_type => l_component_type
5101: ,p_event_type_code => l_event_type_code
5102: ,p_line_definition_owner_code => l_line_definition_owner_code
5103: ,p_line_definition_code => l_line_definition_code
5109: ,p_event_class_code => l_event_class_code);
5110: --
5111: -- set accounting class
5112: --
5113: xla_ae_lines_pkg.SetAcctClass(
5114: p_accounting_class_code => 'COST_CLEARING'
5115: , p_ae_header_id => l_ae_header_id
5116: );
5117:
5117:
5118: --
5119: -- set rounding class
5120: --
5121: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5122: 'COST_CLEARING';
5123:
5124: --
5125: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5121: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5122: 'COST_CLEARING';
5123:
5124: --
5125: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5126: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5127: --
5128: -- bulk performance
5129: --
5122: 'COST_CLEARING';
5123:
5124: --
5125: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5126: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5127: --
5128: -- bulk performance
5129: --
5130: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5126: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5127: --
5128: -- bulk performance
5129: --
5130: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5131:
5132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5133: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5134:
5128: -- bulk performance
5129: --
5130: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5131:
5132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5133: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5134:
5135: -- 4955764
5136: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5133: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5134:
5135: -- 4955764
5136: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5137: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5138:
5139: -- 4458381 Public Sector Enh
5140:
5204: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
5205: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
5206: l_rec_acct_attrs.array_char_value(30) := p_source_35;
5207:
5208: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5209: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: ---------------------------------------------------------------------------------------------------------------
5212: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5205: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
5206: l_rec_acct_attrs.array_char_value(30) := p_source_35;
5207:
5208: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5209: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: ---------------------------------------------------------------------------------------------------------------
5212: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5213: ---------------------------------------------------------------------------------------------------------------
5208: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5209: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: ---------------------------------------------------------------------------------------------------------------
5212: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5213: ---------------------------------------------------------------------------------------------------------------
5214: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5215:
5216: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5210:
5211: ---------------------------------------------------------------------------------------------------------------
5212: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5213: ---------------------------------------------------------------------------------------------------------------
5214: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5215:
5216: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5217: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5218:
5212: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5213: ---------------------------------------------------------------------------------------------------------------
5214: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5215:
5216: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5217: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5218:
5219: IF xla_accounting_cache_pkg.GetValueChar
5220: (p_source_code => 'LEDGER_CATEGORY_CODE'
5213: ---------------------------------------------------------------------------------------------------------------
5214: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5215:
5216: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5217: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5218:
5219: IF xla_accounting_cache_pkg.GetValueChar
5220: (p_source_code => 'LEDGER_CATEGORY_CODE'
5221: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5224: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5225: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5226: )
5227: THEN
5228: xla_ae_lines_pkg.BflowUpgEntry
5229: (p_business_method_code => l_bflow_method_code
5230: ,p_business_class_code => l_bflow_class_code
5231: ,p_balance_type => l_balance_type_code);
5232: ELSE
5265: , x_value_type_code => l_adr_value_type_code
5266: , p_side => 'NA'
5267: );
5268:
5269: xla_ae_lines_pkg.set_ccid(
5270: p_code_combination_id => l_ccid
5271: , p_value_type_code => l_adr_value_type_code
5272: , p_transaction_coa_id => l_adr_transaction_coa_id
5273: , p_accounting_coa_id => l_adr_accounting_coa_id
5301: xla_accounting_err_pkg.build_message
5302: (p_appli_s_name => 'XLA'
5303: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5304: ,p_token_1 => 'LINE_NUMBER'
5305: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5306: ,p_token_2 => 'LINE_TYPE_NAME'
5307: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5308: l_component_type
5309: ,l_component_code
5337: --
5338: --
5339: ------------------------------------------------------------------------------------------------
5340: -- 4219869 Business Flow
5341: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5342: -- Prior Entry. Currently, the following code is always generated.
5343: ------------------------------------------------------------------------------------------------
5344: XLA_AE_LINES_PKG.ValidateCurrentLine;
5345:
5340: -- 4219869 Business Flow
5341: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5342: -- Prior Entry. Currently, the following code is always generated.
5343: ------------------------------------------------------------------------------------------------
5344: XLA_AE_LINES_PKG.ValidateCurrentLine;
5345:
5346: ------------------------------------------------------------------------------------
5347: -- 4219869 Business Flow
5348: -- Populated credit and debit amounts -- Need to generate this within IF
5346: ------------------------------------------------------------------------------------
5347: -- 4219869 Business Flow
5348: -- Populated credit and debit amounts -- Need to generate this within IF
5349: ------------------------------------------------------------------------------------
5350: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5351:
5352: ----------------------------------------------------------------------------------
5353: -- 4219869 Business Flow
5354: -- Update journal entry status -- Need to generate this within IF
5378: -- To allow MPA report to determine if it should generate report process
5379: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5380: ------------------------------------------------------------------------------------------
5381:
5382: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5383: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5384:
5385: --
5386: -- Update the line information that should be overwritten
5379: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5380: ------------------------------------------------------------------------------------------
5381:
5382: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5383: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5384:
5385: --
5386: -- Update the line information that should be overwritten
5387: --
5384:
5385: --
5386: -- Update the line information that should be overwritten
5387: --
5388: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5389: p_header_num => 1);
5390: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5391:
5392: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5386: -- Update the line information that should be overwritten
5387: --
5388: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5389: p_header_num => 1);
5390: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5391:
5392: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5393:
5394: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5388: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5389: p_header_num => 1);
5390: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5391:
5392: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5393:
5394: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5395: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5396: END IF;
5391:
5392: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5393:
5394: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5395: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5396: END IF;
5397:
5398: --
5399: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5398: --
5399: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5400: --
5401: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5402: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5403: ELSE
5404: ---------------------------------------------------------------------------------------------------
5405: -- 4262811a Switch Sign
5406: ---------------------------------------------------------------------------------------------------
5403: ELSE
5404: ---------------------------------------------------------------------------------------------------
5405: -- 4262811a Switch Sign
5406: ---------------------------------------------------------------------------------------------------
5407: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5404: ---------------------------------------------------------------------------------------------------
5405: -- 4262811a Switch Sign
5406: ---------------------------------------------------------------------------------------------------
5407: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5405: -- 4262811a Switch Sign
5406: ---------------------------------------------------------------------------------------------------
5407: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5413: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5406: ---------------------------------------------------------------------------------------------------
5407: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5413: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5414: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5407: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5408: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5413: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5414: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5415:
5409: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5413: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5414: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5415:
5416: END IF;
5417:
5410: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5411: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5412: -- 5132302
5413: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5414: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5415:
5416: END IF;
5417:
5418: -- 4955764
5415:
5416: END IF;
5417:
5418: -- 4955764
5419: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5420: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5421:
5422:
5423: XLA_AE_LINES_PKG.ValidateCurrentLine;
5419: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5420: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5421:
5422:
5423: XLA_AE_LINES_PKG.ValidateCurrentLine;
5424: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5425:
5426: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5427: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5420: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5421:
5422:
5423: XLA_AE_LINES_PKG.ValidateCurrentLine;
5424: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5425:
5426: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5427: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5428: ,p_balance_type_code => l_balance_type_code);
5572: --
5573: -- bulk performance
5574: --
5575: l_balance_type_code VARCHAR2(1);
5576: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5577: l_log_module VARCHAR2(240);
5578:
5579: --
5580: -- Upgrade strategy
5644: ') = 'Y'
5645: THEN
5646:
5647: --
5648: XLA_AE_LINES_PKG.SetNewLine;
5649:
5650: p_balance_type_code := l_balance_type_code;
5651: -- set the flag so later we will know whether the gain loss line needs to be created
5652:
5656:
5657: --
5658: -- bulk performance
5659: --
5660: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5661: p_header_num => 0); -- 4262811
5662: --
5663: -- set accounting line options
5664: --
5661: p_header_num => 0); -- 4262811
5662: --
5663: -- set accounting line options
5664: --
5665: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5666: p_natural_side_code => 'C'
5667: , p_gain_or_loss_flag => 'Y'
5668: , p_gl_transfer_mode_code => 'S'
5669: , p_acct_entry_type_code => 'A'
5675: --
5676: --
5677: -- set accounting line type info
5678: --
5679: xla_ae_lines_pkg.SetAcctLineType
5680: (p_component_type => l_component_type
5681: ,p_event_type_code => l_event_type_code
5682: ,p_line_definition_owner_code => l_line_definition_owner_code
5683: ,p_line_definition_code => l_line_definition_code
5689: ,p_event_class_code => l_event_class_code);
5690: --
5691: -- set accounting class
5692: --
5693: xla_ae_lines_pkg.SetAcctClass(
5694: p_accounting_class_code => 'COST_CLEARING'
5695: , p_ae_header_id => l_ae_header_id
5696: );
5697:
5697:
5698: --
5699: -- set rounding class
5700: --
5701: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5702: 'COST_CLEARING';
5703:
5704: --
5705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5701: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5702: 'COST_CLEARING';
5703:
5704: --
5705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5707: --
5708: -- bulk performance
5709: --
5702: 'COST_CLEARING';
5703:
5704: --
5705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5707: --
5708: -- bulk performance
5709: --
5710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5707: --
5708: -- bulk performance
5709: --
5710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5711:
5712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5714:
5708: -- bulk performance
5709: --
5710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5711:
5712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5714:
5715: -- 4955764
5716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5714:
5715: -- 4955764
5716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5717: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5718:
5719: -- 4458381 Public Sector Enh
5720:
5784: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
5785: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
5786: l_rec_acct_attrs.array_char_value(30) := p_source_35;
5787:
5788: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5789: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5790:
5791: ---------------------------------------------------------------------------------------------------------------
5792: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5785: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
5786: l_rec_acct_attrs.array_char_value(30) := p_source_35;
5787:
5788: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5789: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5790:
5791: ---------------------------------------------------------------------------------------------------------------
5792: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5793: ---------------------------------------------------------------------------------------------------------------
5788: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5789: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5790:
5791: ---------------------------------------------------------------------------------------------------------------
5792: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5793: ---------------------------------------------------------------------------------------------------------------
5794: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5795:
5796: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5790:
5791: ---------------------------------------------------------------------------------------------------------------
5792: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5793: ---------------------------------------------------------------------------------------------------------------
5794: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5795:
5796: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5797: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5798:
5792: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5793: ---------------------------------------------------------------------------------------------------------------
5794: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5795:
5796: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5797: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5798:
5799: IF xla_accounting_cache_pkg.GetValueChar
5800: (p_source_code => 'LEDGER_CATEGORY_CODE'
5793: ---------------------------------------------------------------------------------------------------------------
5794: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5795:
5796: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5797: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5798:
5799: IF xla_accounting_cache_pkg.GetValueChar
5800: (p_source_code => 'LEDGER_CATEGORY_CODE'
5801: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5804: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5805: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5806: )
5807: THEN
5808: xla_ae_lines_pkg.BflowUpgEntry
5809: (p_business_method_code => l_bflow_method_code
5810: ,p_business_class_code => l_bflow_class_code
5811: ,p_balance_type => l_balance_type_code);
5812: ELSE
5846: , x_value_type_code => l_adr_value_type_code
5847: , p_side => 'NA'
5848: );
5849:
5850: xla_ae_lines_pkg.set_ccid(
5851: p_code_combination_id => l_ccid
5852: , p_value_type_code => l_adr_value_type_code
5853: , p_transaction_coa_id => l_adr_transaction_coa_id
5854: , p_accounting_coa_id => l_adr_accounting_coa_id
5882: xla_accounting_err_pkg.build_message
5883: (p_appli_s_name => 'XLA'
5884: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5885: ,p_token_1 => 'LINE_NUMBER'
5886: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5887: ,p_token_2 => 'LINE_TYPE_NAME'
5888: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5889: l_component_type
5890: ,l_component_code
5918: --
5919: --
5920: ------------------------------------------------------------------------------------------------
5921: -- 4219869 Business Flow
5922: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5923: -- Prior Entry. Currently, the following code is always generated.
5924: ------------------------------------------------------------------------------------------------
5925: XLA_AE_LINES_PKG.ValidateCurrentLine;
5926:
5921: -- 4219869 Business Flow
5922: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5923: -- Prior Entry. Currently, the following code is always generated.
5924: ------------------------------------------------------------------------------------------------
5925: XLA_AE_LINES_PKG.ValidateCurrentLine;
5926:
5927: ------------------------------------------------------------------------------------
5928: -- 4219869 Business Flow
5929: -- Populated credit and debit amounts -- Need to generate this within IF
5927: ------------------------------------------------------------------------------------
5928: -- 4219869 Business Flow
5929: -- Populated credit and debit amounts -- Need to generate this within IF
5930: ------------------------------------------------------------------------------------
5931: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5932:
5933: ----------------------------------------------------------------------------------
5934: -- 4219869 Business Flow
5935: -- Update journal entry status -- Need to generate this within IF
5959: -- To allow MPA report to determine if it should generate report process
5960: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5961: ------------------------------------------------------------------------------------------
5962:
5963: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5964: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5965:
5966: --
5967: -- Update the line information that should be overwritten
5960: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5961: ------------------------------------------------------------------------------------------
5962:
5963: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5964: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5965:
5966: --
5967: -- Update the line information that should be overwritten
5968: --
5965:
5966: --
5967: -- Update the line information that should be overwritten
5968: --
5969: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5970: p_header_num => 1);
5971: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5972:
5973: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5967: -- Update the line information that should be overwritten
5968: --
5969: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5970: p_header_num => 1);
5971: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5972:
5973: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5974:
5975: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5969: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5970: p_header_num => 1);
5971: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5972:
5973: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5974:
5975: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5976: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5977: END IF;
5972:
5973: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5974:
5975: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5976: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5977: END IF;
5978:
5979: --
5980: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5979: --
5980: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5981: --
5982: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5983: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5984: ELSE
5985: ---------------------------------------------------------------------------------------------------
5986: -- 4262811a Switch Sign
5987: ---------------------------------------------------------------------------------------------------
5984: ELSE
5985: ---------------------------------------------------------------------------------------------------
5986: -- 4262811a Switch Sign
5987: ---------------------------------------------------------------------------------------------------
5988: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5989: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5985: ---------------------------------------------------------------------------------------------------
5986: -- 4262811a Switch Sign
5987: ---------------------------------------------------------------------------------------------------
5988: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5989: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5986: -- 4262811a Switch Sign
5987: ---------------------------------------------------------------------------------------------------
5988: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5989: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5994: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5987: ---------------------------------------------------------------------------------------------------
5988: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5989: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5994: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5988: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5989: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5994: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5996:
5990: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5994: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5996:
5997: END IF;
5998:
5991: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5992: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5993: -- 5132302
5994: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5995: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5996:
5997: END IF;
5998:
5999: -- 4955764
5996:
5997: END IF;
5998:
5999: -- 4955764
6000: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6001: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6002:
6003:
6004: XLA_AE_LINES_PKG.ValidateCurrentLine;
6000: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6001: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6002:
6003:
6004: XLA_AE_LINES_PKG.ValidateCurrentLine;
6005: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6006:
6007: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6008: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6001: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6002:
6003:
6004: XLA_AE_LINES_PKG.ValidateCurrentLine;
6005: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6006:
6007: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6008: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6009: ,p_balance_type_code => l_balance_type_code);
6148: --
6149: -- bulk performance
6150: --
6151: l_balance_type_code VARCHAR2(1);
6152: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6153: l_log_module VARCHAR2(240);
6154:
6155: --
6156: -- Upgrade strategy
6220: ') = 'B'
6221: THEN
6222:
6223: --
6224: XLA_AE_LINES_PKG.SetNewLine;
6225:
6226: p_balance_type_code := l_balance_type_code;
6227: -- set the flag so later we will know whether the gain loss line needs to be created
6228:
6232:
6233: --
6234: -- bulk performance
6235: --
6236: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6237: p_header_num => 0); -- 4262811
6238: --
6239: -- set accounting line options
6240: --
6237: p_header_num => 0); -- 4262811
6238: --
6239: -- set accounting line options
6240: --
6241: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6242: p_natural_side_code => 'C'
6243: , p_gain_or_loss_flag => 'N'
6244: , p_gl_transfer_mode_code => 'S'
6245: , p_acct_entry_type_code => 'A'
6251: --
6252: --
6253: -- set accounting line type info
6254: --
6255: xla_ae_lines_pkg.SetAcctLineType
6256: (p_component_type => l_component_type
6257: ,p_event_type_code => l_event_type_code
6258: ,p_line_definition_owner_code => l_line_definition_owner_code
6259: ,p_line_definition_code => l_line_definition_code
6265: ,p_event_class_code => l_event_class_code);
6266: --
6267: -- set accounting class
6268: --
6269: xla_ae_lines_pkg.SetAcctClass(
6270: p_accounting_class_code => 'PA_BUDGET_EXECUTION_RESERVE_CR'
6271: , p_ae_header_id => l_ae_header_id
6272: );
6273:
6273:
6274: --
6275: -- set rounding class
6276: --
6277: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6278: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6279:
6280: --
6281: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6277: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6278: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6279:
6280: --
6281: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6282: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6283: --
6284: -- bulk performance
6285: --
6278: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6279:
6280: --
6281: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6282: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6283: --
6284: -- bulk performance
6285: --
6286: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6282: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6283: --
6284: -- bulk performance
6285: --
6286: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6287:
6288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6289: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6290:
6284: -- bulk performance
6285: --
6286: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6287:
6288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6289: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6290:
6291: -- 4955764
6292: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6289: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6290:
6291: -- 4955764
6292: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6293: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6294:
6295: -- 4458381 Public Sector Enh
6296:
6336: l_rec_acct_attrs.array_char_value(17) := p_source_35;
6337: l_rec_acct_attrs.array_acct_attr_code(18) := 'UPG_DR_ENC_TYPE_ID';
6338: l_rec_acct_attrs.array_num_value(18) := p_source_45;
6339:
6340: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6341: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6342:
6343: ---------------------------------------------------------------------------------------------------------------
6344: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6337: l_rec_acct_attrs.array_acct_attr_code(18) := 'UPG_DR_ENC_TYPE_ID';
6338: l_rec_acct_attrs.array_num_value(18) := p_source_45;
6339:
6340: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6341: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6342:
6343: ---------------------------------------------------------------------------------------------------------------
6344: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6345: ---------------------------------------------------------------------------------------------------------------
6340: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6341: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6342:
6343: ---------------------------------------------------------------------------------------------------------------
6344: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6345: ---------------------------------------------------------------------------------------------------------------
6346: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6347:
6348: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6342:
6343: ---------------------------------------------------------------------------------------------------------------
6344: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6345: ---------------------------------------------------------------------------------------------------------------
6346: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6347:
6348: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6349: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6350:
6344: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6345: ---------------------------------------------------------------------------------------------------------------
6346: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6347:
6348: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6349: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6350:
6351: IF xla_accounting_cache_pkg.GetValueChar
6352: (p_source_code => 'LEDGER_CATEGORY_CODE'
6345: ---------------------------------------------------------------------------------------------------------------
6346: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6347:
6348: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6349: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6350:
6351: IF xla_accounting_cache_pkg.GetValueChar
6352: (p_source_code => 'LEDGER_CATEGORY_CODE'
6353: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6356: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6357: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6358: )
6359: THEN
6360: xla_ae_lines_pkg.BflowUpgEntry
6361: (p_business_method_code => l_bflow_method_code
6362: ,p_business_class_code => l_bflow_class_code
6363: ,p_balance_type => l_balance_type_code);
6364: ELSE
6396: , x_value_type_code => l_adr_value_type_code
6397: , p_side => 'NA'
6398: );
6399:
6400: xla_ae_lines_pkg.set_ccid(
6401: p_code_combination_id => l_ccid
6402: , p_value_type_code => l_adr_value_type_code
6403: , p_transaction_coa_id => l_adr_transaction_coa_id
6404: , p_accounting_coa_id => l_adr_accounting_coa_id
6428: );
6429:
6430: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
6431:
6432: xla_ae_lines_pkg.set_segment(
6433: p_to_segment_code => 'GL_ACCOUNT'
6434: , p_segment_value => l_segment
6435: , p_from_segment_code => l_adr_value_segment_code
6436: , p_from_combination_id => l_adr_value_combination_id
6472: xla_accounting_err_pkg.build_message
6473: (p_appli_s_name => 'XLA'
6474: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6475: ,p_token_1 => 'LINE_NUMBER'
6476: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6477: ,p_token_2 => 'LINE_TYPE_NAME'
6478: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6479: l_component_type
6480: ,l_component_code
6508: --
6509: --
6510: ------------------------------------------------------------------------------------------------
6511: -- 4219869 Business Flow
6512: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6513: -- Prior Entry. Currently, the following code is always generated.
6514: ------------------------------------------------------------------------------------------------
6515: XLA_AE_LINES_PKG.ValidateCurrentLine;
6516:
6511: -- 4219869 Business Flow
6512: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6513: -- Prior Entry. Currently, the following code is always generated.
6514: ------------------------------------------------------------------------------------------------
6515: XLA_AE_LINES_PKG.ValidateCurrentLine;
6516:
6517: ------------------------------------------------------------------------------------
6518: -- 4219869 Business Flow
6519: -- Populated credit and debit amounts -- Need to generate this within IF
6517: ------------------------------------------------------------------------------------
6518: -- 4219869 Business Flow
6519: -- Populated credit and debit amounts -- Need to generate this within IF
6520: ------------------------------------------------------------------------------------
6521: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6522:
6523: ----------------------------------------------------------------------------------
6524: -- 4219869 Business Flow
6525: -- Update journal entry status -- Need to generate this within IF
6549: -- To allow MPA report to determine if it should generate report process
6550: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6551: ------------------------------------------------------------------------------------------
6552:
6553: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6554: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6555:
6556: --
6557: -- Update the line information that should be overwritten
6550: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6551: ------------------------------------------------------------------------------------------
6552:
6553: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6554: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6555:
6556: --
6557: -- Update the line information that should be overwritten
6558: --
6555:
6556: --
6557: -- Update the line information that should be overwritten
6558: --
6559: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6560: p_header_num => 1);
6561: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6562:
6563: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6557: -- Update the line information that should be overwritten
6558: --
6559: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6560: p_header_num => 1);
6561: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6562:
6563: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6564:
6565: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6559: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6560: p_header_num => 1);
6561: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6562:
6563: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6564:
6565: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6566: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6567: END IF;
6562:
6563: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6564:
6565: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6566: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6567: END IF;
6568:
6569: --
6570: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6569: --
6570: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6571: --
6572: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6573: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6574: ELSE
6575: ---------------------------------------------------------------------------------------------------
6576: -- 4262811a Switch Sign
6577: ---------------------------------------------------------------------------------------------------
6574: ELSE
6575: ---------------------------------------------------------------------------------------------------
6576: -- 4262811a Switch Sign
6577: ---------------------------------------------------------------------------------------------------
6578: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6575: ---------------------------------------------------------------------------------------------------
6576: -- 4262811a Switch Sign
6577: ---------------------------------------------------------------------------------------------------
6578: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6576: -- 4262811a Switch Sign
6577: ---------------------------------------------------------------------------------------------------
6578: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6584: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6577: ---------------------------------------------------------------------------------------------------
6578: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6584: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6585: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6578: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6584: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6585: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6586:
6580: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6584: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6585: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6586:
6587: END IF;
6588:
6581: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6582: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6583: -- 5132302
6584: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6585: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6586:
6587: END IF;
6588:
6589: -- 4955764
6586:
6587: END IF;
6588:
6589: -- 4955764
6590: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6591: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6592:
6593:
6594: XLA_AE_LINES_PKG.ValidateCurrentLine;
6590: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6591: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6592:
6593:
6594: XLA_AE_LINES_PKG.ValidateCurrentLine;
6595: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6596:
6597: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6598: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6591: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6592:
6593:
6594: XLA_AE_LINES_PKG.ValidateCurrentLine;
6595: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6596:
6597: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6598: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6599: ,p_balance_type_code => l_balance_type_code);
6730: --
6731: -- bulk performance
6732: --
6733: l_balance_type_code VARCHAR2(1);
6734: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6735: l_log_module VARCHAR2(240);
6736:
6737: --
6738: -- Upgrade strategy
6802: ') = 'B'
6803: THEN
6804:
6805: --
6806: XLA_AE_LINES_PKG.SetNewLine;
6807:
6808: p_balance_type_code := l_balance_type_code;
6809: -- set the flag so later we will know whether the gain loss line needs to be created
6810:
6814:
6815: --
6816: -- bulk performance
6817: --
6818: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6819: p_header_num => 0); -- 4262811
6820: --
6821: -- set accounting line options
6822: --
6819: p_header_num => 0); -- 4262811
6820: --
6821: -- set accounting line options
6822: --
6823: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6824: p_natural_side_code => 'C'
6825: , p_gain_or_loss_flag => 'N'
6826: , p_gl_transfer_mode_code => 'S'
6827: , p_acct_entry_type_code => 'A'
6833: --
6834: --
6835: -- set accounting line type info
6836: --
6837: xla_ae_lines_pkg.SetAcctLineType
6838: (p_component_type => l_component_type
6839: ,p_event_type_code => l_event_type_code
6840: ,p_line_definition_owner_code => l_line_definition_owner_code
6841: ,p_line_definition_code => l_line_definition_code
6847: ,p_event_class_code => l_event_class_code);
6848: --
6849: -- set accounting class
6850: --
6851: xla_ae_lines_pkg.SetAcctClass(
6852: p_accounting_class_code => 'PA_BUDGET_EXECUTION_RESERVE_CR'
6853: , p_ae_header_id => l_ae_header_id
6854: );
6855:
6855:
6856: --
6857: -- set rounding class
6858: --
6859: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6860: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6861:
6862: --
6863: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6859: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6860: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6861:
6862: --
6863: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6864: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6865: --
6866: -- bulk performance
6867: --
6860: 'PA_BUDGET_EXECUTION_RESERVE_CR';
6861:
6862: --
6863: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6864: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6865: --
6866: -- bulk performance
6867: --
6868: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6864: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6865: --
6866: -- bulk performance
6867: --
6868: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6869:
6870: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6871: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6872:
6866: -- bulk performance
6867: --
6868: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6869:
6870: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6871: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6872:
6873: -- 4955764
6874: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6870: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6871: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6872:
6873: -- 4955764
6874: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6875: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6876:
6877: -- 4458381 Public Sector Enh
6878:
6879: --
6880: -- set accounting attributes for the line type
6881: --
6882:
6883: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6884: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6885:
6886: ---------------------------------------------------------------------------------------------------------------
6887: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6880: -- set accounting attributes for the line type
6881: --
6882:
6883: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6884: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6885:
6886: ---------------------------------------------------------------------------------------------------------------
6887: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6888: ---------------------------------------------------------------------------------------------------------------
6883: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6884: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6885:
6886: ---------------------------------------------------------------------------------------------------------------
6887: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6888: ---------------------------------------------------------------------------------------------------------------
6889: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6890:
6891: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6885:
6886: ---------------------------------------------------------------------------------------------------------------
6887: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6888: ---------------------------------------------------------------------------------------------------------------
6889: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6890:
6891: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6892: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6893:
6887: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6888: ---------------------------------------------------------------------------------------------------------------
6889: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6890:
6891: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6892: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6893:
6894: IF xla_accounting_cache_pkg.GetValueChar
6895: (p_source_code => 'LEDGER_CATEGORY_CODE'
6888: ---------------------------------------------------------------------------------------------------------------
6889: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6890:
6891: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6892: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6893:
6894: IF xla_accounting_cache_pkg.GetValueChar
6895: (p_source_code => 'LEDGER_CATEGORY_CODE'
6896: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6899: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6900: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6901: )
6902: THEN
6903: xla_ae_lines_pkg.BflowUpgEntry
6904: (p_business_method_code => l_bflow_method_code
6905: ,p_business_class_code => l_bflow_class_code
6906: ,p_balance_type => l_balance_type_code);
6907: ELSE
6939: , x_value_type_code => l_adr_value_type_code
6940: , p_side => 'NA'
6941: );
6942:
6943: xla_ae_lines_pkg.set_ccid(
6944: p_code_combination_id => l_ccid
6945: , p_value_type_code => l_adr_value_type_code
6946: , p_transaction_coa_id => l_adr_transaction_coa_id
6947: , p_accounting_coa_id => l_adr_accounting_coa_id
6971: );
6972:
6973: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
6974:
6975: xla_ae_lines_pkg.set_segment(
6976: p_to_segment_code => 'GL_ACCOUNT'
6977: , p_segment_value => l_segment
6978: , p_from_segment_code => l_adr_value_segment_code
6979: , p_from_combination_id => l_adr_value_combination_id
7015: xla_accounting_err_pkg.build_message
7016: (p_appli_s_name => 'XLA'
7017: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7018: ,p_token_1 => 'LINE_NUMBER'
7019: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7020: ,p_token_2 => 'LINE_TYPE_NAME'
7021: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7022: l_component_type
7023: ,l_component_code
7051: --
7052: --
7053: ------------------------------------------------------------------------------------------------
7054: -- 4219869 Business Flow
7055: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7056: -- Prior Entry. Currently, the following code is always generated.
7057: ------------------------------------------------------------------------------------------------
7058: XLA_AE_LINES_PKG.ValidateCurrentLine;
7059:
7054: -- 4219869 Business Flow
7055: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7056: -- Prior Entry. Currently, the following code is always generated.
7057: ------------------------------------------------------------------------------------------------
7058: XLA_AE_LINES_PKG.ValidateCurrentLine;
7059:
7060: ------------------------------------------------------------------------------------
7061: -- 4219869 Business Flow
7062: -- Populated credit and debit amounts -- Need to generate this within IF
7060: ------------------------------------------------------------------------------------
7061: -- 4219869 Business Flow
7062: -- Populated credit and debit amounts -- Need to generate this within IF
7063: ------------------------------------------------------------------------------------
7064: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7065:
7066: ----------------------------------------------------------------------------------
7067: -- 4219869 Business Flow
7068: -- Update journal entry status -- Need to generate this within IF
7092: -- To allow MPA report to determine if it should generate report process
7093: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7094: ------------------------------------------------------------------------------------------
7095:
7096: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7097: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7098:
7099: --
7100: -- Update the line information that should be overwritten
7093: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7094: ------------------------------------------------------------------------------------------
7095:
7096: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7097: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7098:
7099: --
7100: -- Update the line information that should be overwritten
7101: --
7098:
7099: --
7100: -- Update the line information that should be overwritten
7101: --
7102: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7103: p_header_num => 1);
7104: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7105:
7106: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7100: -- Update the line information that should be overwritten
7101: --
7102: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7103: p_header_num => 1);
7104: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7105:
7106: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7107:
7108: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7102: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7103: p_header_num => 1);
7104: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7105:
7106: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7107:
7108: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7109: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7110: END IF;
7105:
7106: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7107:
7108: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7109: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7110: END IF;
7111:
7112: --
7113: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7112: --
7113: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7114: --
7115: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7116: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7117: ELSE
7118: ---------------------------------------------------------------------------------------------------
7119: -- 4262811a Switch Sign
7120: ---------------------------------------------------------------------------------------------------
7117: ELSE
7118: ---------------------------------------------------------------------------------------------------
7119: -- 4262811a Switch Sign
7120: ---------------------------------------------------------------------------------------------------
7121: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7118: ---------------------------------------------------------------------------------------------------
7119: -- 4262811a Switch Sign
7120: ---------------------------------------------------------------------------------------------------
7121: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7119: -- 4262811a Switch Sign
7120: ---------------------------------------------------------------------------------------------------
7121: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7120: ---------------------------------------------------------------------------------------------------
7121: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7128: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7121: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7122: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7128: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7129:
7123: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7128: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7129:
7130: END IF;
7131:
7124: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7125: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7126: -- 5132302
7127: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7128: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7129:
7130: END IF;
7131:
7132: -- 4955764
7129:
7130: END IF;
7131:
7132: -- 4955764
7133: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7134: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7135:
7136:
7137: XLA_AE_LINES_PKG.ValidateCurrentLine;
7133: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7134: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7135:
7136:
7137: XLA_AE_LINES_PKG.ValidateCurrentLine;
7138: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7139:
7140: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7141: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7134: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7135:
7136:
7137: XLA_AE_LINES_PKG.ValidateCurrentLine;
7138: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7139:
7140: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7141: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7142: ,p_balance_type_code => l_balance_type_code);
7273: --
7274: -- bulk performance
7275: --
7276: l_balance_type_code VARCHAR2(1);
7277: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7278: l_log_module VARCHAR2(240);
7279:
7280: --
7281: -- Upgrade strategy
7345: ') = 'N'
7346: THEN
7347:
7348: --
7349: XLA_AE_LINES_PKG.SetNewLine;
7350:
7351: p_balance_type_code := l_balance_type_code;
7352: -- set the flag so later we will know whether the gain loss line needs to be created
7353:
7357:
7358: --
7359: -- bulk performance
7360: --
7361: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7362: p_header_num => 0); -- 4262811
7363: --
7364: -- set accounting line options
7365: --
7362: p_header_num => 0); -- 4262811
7363: --
7364: -- set accounting line options
7365: --
7366: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7367: p_natural_side_code => 'C'
7368: , p_gain_or_loss_flag => 'N'
7369: , p_gl_transfer_mode_code => 'S'
7370: , p_acct_entry_type_code => 'A'
7376: --
7377: --
7378: -- set accounting line type info
7379: --
7380: xla_ae_lines_pkg.SetAcctLineType
7381: (p_component_type => l_component_type
7382: ,p_event_type_code => l_event_type_code
7383: ,p_line_definition_owner_code => l_line_definition_owner_code
7384: ,p_line_definition_code => l_line_definition_code
7390: ,p_event_class_code => l_event_class_code);
7391: --
7392: -- set accounting class
7393: --
7394: xla_ae_lines_pkg.SetAcctClass(
7395: p_accounting_class_code => 'REVENUE'
7396: , p_ae_header_id => l_ae_header_id
7397: );
7398:
7398:
7399: --
7400: -- set rounding class
7401: --
7402: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7403: 'REVENUE';
7404:
7405: --
7406: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7402: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7403: 'REVENUE';
7404:
7405: --
7406: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7407: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7408: --
7409: -- bulk performance
7410: --
7403: 'REVENUE';
7404:
7405: --
7406: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7407: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7408: --
7409: -- bulk performance
7410: --
7411: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7407: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7408: --
7409: -- bulk performance
7410: --
7411: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7412:
7413: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7414: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7415:
7409: -- bulk performance
7410: --
7411: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7412:
7413: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7414: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7415:
7416: -- 4955764
7417: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7413: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7414: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7415:
7416: -- 4955764
7417: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7418: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7419:
7420: -- 4458381 Public Sector Enh
7421:
7445: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
7446: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
7447: l_rec_acct_attrs.array_num_value(10) := p_source_43;
7448:
7449: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7450: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7451:
7452: ---------------------------------------------------------------------------------------------------------------
7453: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7446: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
7447: l_rec_acct_attrs.array_num_value(10) := p_source_43;
7448:
7449: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7450: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7451:
7452: ---------------------------------------------------------------------------------------------------------------
7453: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7454: ---------------------------------------------------------------------------------------------------------------
7449: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7450: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7451:
7452: ---------------------------------------------------------------------------------------------------------------
7453: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7454: ---------------------------------------------------------------------------------------------------------------
7455: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7456:
7457: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7451:
7452: ---------------------------------------------------------------------------------------------------------------
7453: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7454: ---------------------------------------------------------------------------------------------------------------
7455: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7456:
7457: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7458: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7459:
7453: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7454: ---------------------------------------------------------------------------------------------------------------
7455: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7456:
7457: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7458: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7459:
7460: IF xla_accounting_cache_pkg.GetValueChar
7461: (p_source_code => 'LEDGER_CATEGORY_CODE'
7454: ---------------------------------------------------------------------------------------------------------------
7455: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7456:
7457: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7458: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7459:
7460: IF xla_accounting_cache_pkg.GetValueChar
7461: (p_source_code => 'LEDGER_CATEGORY_CODE'
7462: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7465: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7466: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7467: )
7468: THEN
7469: xla_ae_lines_pkg.BflowUpgEntry
7470: (p_business_method_code => l_bflow_method_code
7471: ,p_business_class_code => l_bflow_class_code
7472: ,p_balance_type => l_balance_type_code);
7473: ELSE
7505: , x_value_type_code => l_adr_value_type_code
7506: , p_side => 'NA'
7507: );
7508:
7509: xla_ae_lines_pkg.set_ccid(
7510: p_code_combination_id => l_ccid
7511: , p_value_type_code => l_adr_value_type_code
7512: , p_transaction_coa_id => l_adr_transaction_coa_id
7513: , p_accounting_coa_id => l_adr_accounting_coa_id
7541: xla_accounting_err_pkg.build_message
7542: (p_appli_s_name => 'XLA'
7543: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7544: ,p_token_1 => 'LINE_NUMBER'
7545: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7546: ,p_token_2 => 'LINE_TYPE_NAME'
7547: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7548: l_component_type
7549: ,l_component_code
7577: --
7578: --
7579: ------------------------------------------------------------------------------------------------
7580: -- 4219869 Business Flow
7581: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7582: -- Prior Entry. Currently, the following code is always generated.
7583: ------------------------------------------------------------------------------------------------
7584: XLA_AE_LINES_PKG.ValidateCurrentLine;
7585:
7580: -- 4219869 Business Flow
7581: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7582: -- Prior Entry. Currently, the following code is always generated.
7583: ------------------------------------------------------------------------------------------------
7584: XLA_AE_LINES_PKG.ValidateCurrentLine;
7585:
7586: ------------------------------------------------------------------------------------
7587: -- 4219869 Business Flow
7588: -- Populated credit and debit amounts -- Need to generate this within IF
7586: ------------------------------------------------------------------------------------
7587: -- 4219869 Business Flow
7588: -- Populated credit and debit amounts -- Need to generate this within IF
7589: ------------------------------------------------------------------------------------
7590: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7591:
7592: ----------------------------------------------------------------------------------
7593: -- 4219869 Business Flow
7594: -- Update journal entry status -- Need to generate this within IF
7618: -- To allow MPA report to determine if it should generate report process
7619: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7620: ------------------------------------------------------------------------------------------
7621:
7622: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7623: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7624:
7625: --
7626: -- Update the line information that should be overwritten
7619: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7620: ------------------------------------------------------------------------------------------
7621:
7622: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7623: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7624:
7625: --
7626: -- Update the line information that should be overwritten
7627: --
7624:
7625: --
7626: -- Update the line information that should be overwritten
7627: --
7628: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7629: p_header_num => 1);
7630: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7631:
7632: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7626: -- Update the line information that should be overwritten
7627: --
7628: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7629: p_header_num => 1);
7630: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7631:
7632: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7633:
7634: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7628: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7629: p_header_num => 1);
7630: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7631:
7632: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7633:
7634: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7635: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7636: END IF;
7631:
7632: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7633:
7634: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7635: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7636: END IF;
7637:
7638: --
7639: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7638: --
7639: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7640: --
7641: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7642: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7643: ELSE
7644: ---------------------------------------------------------------------------------------------------
7645: -- 4262811a Switch Sign
7646: ---------------------------------------------------------------------------------------------------
7643: ELSE
7644: ---------------------------------------------------------------------------------------------------
7645: -- 4262811a Switch Sign
7646: ---------------------------------------------------------------------------------------------------
7647: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7644: ---------------------------------------------------------------------------------------------------
7645: -- 4262811a Switch Sign
7646: ---------------------------------------------------------------------------------------------------
7647: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7645: -- 4262811a Switch Sign
7646: ---------------------------------------------------------------------------------------------------
7647: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7653: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7646: ---------------------------------------------------------------------------------------------------
7647: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7653: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7654: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7647: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7648: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7653: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7654: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7655:
7649: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7653: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7654: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7655:
7656: END IF;
7657:
7650: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7651: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7652: -- 5132302
7653: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7654: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7655:
7656: END IF;
7657:
7658: -- 4955764
7655:
7656: END IF;
7657:
7658: -- 4955764
7659: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7660: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7661:
7662:
7663: XLA_AE_LINES_PKG.ValidateCurrentLine;
7659: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7660: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7661:
7662:
7663: XLA_AE_LINES_PKG.ValidateCurrentLine;
7664: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7665:
7666: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7667: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7660: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7661:
7662:
7663: XLA_AE_LINES_PKG.ValidateCurrentLine;
7664: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7665:
7666: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7667: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7668: ,p_balance_type_code => l_balance_type_code);
7836: --
7837: -- bulk performance
7838: --
7839: l_balance_type_code VARCHAR2(1);
7840: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7841: l_log_module VARCHAR2(240);
7842:
7843: --
7844: -- Upgrade strategy
7904: ') = 'R'
7905: THEN
7906:
7907: --
7908: XLA_AE_LINES_PKG.SetNewLine;
7909:
7910: p_balance_type_code := l_balance_type_code;
7911: -- set the flag so later we will know whether the gain loss line needs to be created
7912:
7916:
7917: --
7918: -- bulk performance
7919: --
7920: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7921: p_header_num => 0); -- 4262811
7922: --
7923: -- set accounting line options
7924: --
7921: p_header_num => 0); -- 4262811
7922: --
7923: -- set accounting line options
7924: --
7925: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7926: p_natural_side_code => 'D'
7927: , p_gain_or_loss_flag => 'N'
7928: , p_gl_transfer_mode_code => 'S'
7929: , p_acct_entry_type_code => 'A'
7935: --
7936: --
7937: -- set accounting line type info
7938: --
7939: xla_ae_lines_pkg.SetAcctLineType
7940: (p_component_type => l_component_type
7941: ,p_event_type_code => l_event_type_code
7942: ,p_line_definition_owner_code => l_line_definition_owner_code
7943: ,p_line_definition_code => l_line_definition_code
7949: ,p_event_class_code => l_event_class_code);
7950: --
7951: -- set accounting class
7952: --
7953: xla_ae_lines_pkg.SetAcctClass(
7954: p_accounting_class_code => 'COST'
7955: , p_ae_header_id => l_ae_header_id
7956: );
7957:
7957:
7958: --
7959: -- set rounding class
7960: --
7961: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7962: 'COST';
7963:
7964: --
7965: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7961: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7962: 'COST';
7963:
7964: --
7965: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7966: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7967: --
7968: -- bulk performance
7969: --
7962: 'COST';
7963:
7964: --
7965: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7966: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7967: --
7968: -- bulk performance
7969: --
7970: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7966: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7967: --
7968: -- bulk performance
7969: --
7970: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7971:
7972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7973: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7974:
7968: -- bulk performance
7969: --
7970: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7971:
7972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7973: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7974:
7975: -- 4955764
7976: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7973: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7974:
7975: -- 4955764
7976: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7977: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7978:
7979: -- 4458381 Public Sector Enh
7980:
8084: l_rec_acct_attrs.array_num_value(49) := p_source_62;
8085: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
8086: l_rec_acct_attrs.array_num_value(50) := p_source_63;
8087:
8088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8090:
8091: ---------------------------------------------------------------------------------------------------------------
8092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8085: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
8086: l_rec_acct_attrs.array_num_value(50) := p_source_63;
8087:
8088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8090:
8091: ---------------------------------------------------------------------------------------------------------------
8092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8093: ---------------------------------------------------------------------------------------------------------------
8088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8090:
8091: ---------------------------------------------------------------------------------------------------------------
8092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8093: ---------------------------------------------------------------------------------------------------------------
8094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8095:
8096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8090:
8091: ---------------------------------------------------------------------------------------------------------------
8092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8093: ---------------------------------------------------------------------------------------------------------------
8094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8095:
8096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8098:
8092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8093: ---------------------------------------------------------------------------------------------------------------
8094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8095:
8096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8098:
8099: IF xla_accounting_cache_pkg.GetValueChar
8100: (p_source_code => 'LEDGER_CATEGORY_CODE'
8093: ---------------------------------------------------------------------------------------------------------------
8094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8095:
8096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8098:
8099: IF xla_accounting_cache_pkg.GetValueChar
8100: (p_source_code => 'LEDGER_CATEGORY_CODE'
8101: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8104: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8105: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8106: )
8107: THEN
8108: xla_ae_lines_pkg.BflowUpgEntry
8109: (p_business_method_code => l_bflow_method_code
8110: ,p_business_class_code => l_bflow_class_code
8111: ,p_balance_type => l_balance_type_code);
8112: ELSE
8146: , x_value_type_code => l_adr_value_type_code
8147: , p_side => 'NA'
8148: );
8149:
8150: xla_ae_lines_pkg.set_ccid(
8151: p_code_combination_id => l_ccid
8152: , p_value_type_code => l_adr_value_type_code
8153: , p_transaction_coa_id => l_adr_transaction_coa_id
8154: , p_accounting_coa_id => l_adr_accounting_coa_id
8182: xla_accounting_err_pkg.build_message
8183: (p_appli_s_name => 'XLA'
8184: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8185: ,p_token_1 => 'LINE_NUMBER'
8186: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8187: ,p_token_2 => 'LINE_TYPE_NAME'
8188: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8189: l_component_type
8190: ,l_component_code
8218: --
8219: --
8220: ------------------------------------------------------------------------------------------------
8221: -- 4219869 Business Flow
8222: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8223: -- Prior Entry. Currently, the following code is always generated.
8224: ------------------------------------------------------------------------------------------------
8225: XLA_AE_LINES_PKG.ValidateCurrentLine;
8226:
8221: -- 4219869 Business Flow
8222: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8223: -- Prior Entry. Currently, the following code is always generated.
8224: ------------------------------------------------------------------------------------------------
8225: XLA_AE_LINES_PKG.ValidateCurrentLine;
8226:
8227: ------------------------------------------------------------------------------------
8228: -- 4219869 Business Flow
8229: -- Populated credit and debit amounts -- Need to generate this within IF
8227: ------------------------------------------------------------------------------------
8228: -- 4219869 Business Flow
8229: -- Populated credit and debit amounts -- Need to generate this within IF
8230: ------------------------------------------------------------------------------------
8231: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8232:
8233: ----------------------------------------------------------------------------------
8234: -- 4219869 Business Flow
8235: -- Update journal entry status -- Need to generate this within IF
8259: -- To allow MPA report to determine if it should generate report process
8260: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8261: ------------------------------------------------------------------------------------------
8262:
8263: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8264: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8265:
8266: --
8267: -- Update the line information that should be overwritten
8260: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8261: ------------------------------------------------------------------------------------------
8262:
8263: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8264: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8265:
8266: --
8267: -- Update the line information that should be overwritten
8268: --
8265:
8266: --
8267: -- Update the line information that should be overwritten
8268: --
8269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8270: p_header_num => 1);
8271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8272:
8273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8267: -- Update the line information that should be overwritten
8268: --
8269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8270: p_header_num => 1);
8271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8272:
8273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8274:
8275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8270: p_header_num => 1);
8271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8272:
8273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8274:
8275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8276: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8277: END IF;
8272:
8273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8274:
8275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8276: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8277: END IF;
8278:
8279: --
8280: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8279: --
8280: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8281: --
8282: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8283: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8284: ELSE
8285: ---------------------------------------------------------------------------------------------------
8286: -- 4262811a Switch Sign
8287: ---------------------------------------------------------------------------------------------------
8284: ELSE
8285: ---------------------------------------------------------------------------------------------------
8286: -- 4262811a Switch Sign
8287: ---------------------------------------------------------------------------------------------------
8288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8285: ---------------------------------------------------------------------------------------------------
8286: -- 4262811a Switch Sign
8287: ---------------------------------------------------------------------------------------------------
8288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8286: -- 4262811a Switch Sign
8287: ---------------------------------------------------------------------------------------------------
8288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8287: ---------------------------------------------------------------------------------------------------
8288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8296:
8290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8296:
8297: END IF;
8298:
8291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8293: -- 5132302
8294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8296:
8297: END IF;
8298:
8299: -- 4955764
8296:
8297: END IF;
8298:
8299: -- 4955764
8300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8302:
8303:
8304: XLA_AE_LINES_PKG.ValidateCurrentLine;
8300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8302:
8303:
8304: XLA_AE_LINES_PKG.ValidateCurrentLine;
8305: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8306:
8307: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8308: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8302:
8303:
8304: XLA_AE_LINES_PKG.ValidateCurrentLine;
8305: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8306:
8307: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8308: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8309: ,p_balance_type_code => l_balance_type_code);
8477: --
8478: -- bulk performance
8479: --
8480: l_balance_type_code VARCHAR2(1);
8481: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8482: l_log_module VARCHAR2(240);
8483:
8484: --
8485: -- Upgrade strategy
8545: ') = 'R'
8546: THEN
8547:
8548: --
8549: XLA_AE_LINES_PKG.SetNewLine;
8550:
8551: p_balance_type_code := l_balance_type_code;
8552: -- set the flag so later we will know whether the gain loss line needs to be created
8553:
8557:
8558: --
8559: -- bulk performance
8560: --
8561: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8562: p_header_num => 0); -- 4262811
8563: --
8564: -- set accounting line options
8565: --
8562: p_header_num => 0); -- 4262811
8563: --
8564: -- set accounting line options
8565: --
8566: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8567: p_natural_side_code => 'D'
8568: , p_gain_or_loss_flag => 'N'
8569: , p_gl_transfer_mode_code => 'S'
8570: , p_acct_entry_type_code => 'A'
8576: --
8577: --
8578: -- set accounting line type info
8579: --
8580: xla_ae_lines_pkg.SetAcctLineType
8581: (p_component_type => l_component_type
8582: ,p_event_type_code => l_event_type_code
8583: ,p_line_definition_owner_code => l_line_definition_owner_code
8584: ,p_line_definition_code => l_line_definition_code
8590: ,p_event_class_code => l_event_class_code);
8591: --
8592: -- set accounting class
8593: --
8594: xla_ae_lines_pkg.SetAcctClass(
8595: p_accounting_class_code => 'COST'
8596: , p_ae_header_id => l_ae_header_id
8597: );
8598:
8598:
8599: --
8600: -- set rounding class
8601: --
8602: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8603: 'COST';
8604:
8605: --
8606: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8602: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8603: 'COST';
8604:
8605: --
8606: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8607: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8608: --
8609: -- bulk performance
8610: --
8603: 'COST';
8604:
8605: --
8606: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8607: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8608: --
8609: -- bulk performance
8610: --
8611: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8607: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8608: --
8609: -- bulk performance
8610: --
8611: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8612:
8613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8614: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8615:
8609: -- bulk performance
8610: --
8611: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8612:
8613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8614: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8615:
8616: -- 4955764
8617: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8613: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8614: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8615:
8616: -- 4955764
8617: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8618: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8619:
8620: -- 4458381 Public Sector Enh
8621:
8725: l_rec_acct_attrs.array_num_value(49) := p_source_62;
8726: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
8727: l_rec_acct_attrs.array_num_value(50) := p_source_63;
8728:
8729: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8730: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8731:
8732: ---------------------------------------------------------------------------------------------------------------
8733: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8726: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
8727: l_rec_acct_attrs.array_num_value(50) := p_source_63;
8728:
8729: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8730: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8731:
8732: ---------------------------------------------------------------------------------------------------------------
8733: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8734: ---------------------------------------------------------------------------------------------------------------
8729: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8730: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8731:
8732: ---------------------------------------------------------------------------------------------------------------
8733: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8734: ---------------------------------------------------------------------------------------------------------------
8735: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8736:
8737: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8731:
8732: ---------------------------------------------------------------------------------------------------------------
8733: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8734: ---------------------------------------------------------------------------------------------------------------
8735: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8736:
8737: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8738: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8739:
8733: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8734: ---------------------------------------------------------------------------------------------------------------
8735: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8736:
8737: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8738: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8739:
8740: IF xla_accounting_cache_pkg.GetValueChar
8741: (p_source_code => 'LEDGER_CATEGORY_CODE'
8734: ---------------------------------------------------------------------------------------------------------------
8735: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8736:
8737: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8738: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8739:
8740: IF xla_accounting_cache_pkg.GetValueChar
8741: (p_source_code => 'LEDGER_CATEGORY_CODE'
8742: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8745: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8746: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8747: )
8748: THEN
8749: xla_ae_lines_pkg.BflowUpgEntry
8750: (p_business_method_code => l_bflow_method_code
8751: ,p_business_class_code => l_bflow_class_code
8752: ,p_balance_type => l_balance_type_code);
8753: ELSE
8786: , x_value_type_code => l_adr_value_type_code
8787: , p_side => 'NA'
8788: );
8789:
8790: xla_ae_lines_pkg.set_ccid(
8791: p_code_combination_id => l_ccid
8792: , p_value_type_code => l_adr_value_type_code
8793: , p_transaction_coa_id => l_adr_transaction_coa_id
8794: , p_accounting_coa_id => l_adr_accounting_coa_id
8822: xla_accounting_err_pkg.build_message
8823: (p_appli_s_name => 'XLA'
8824: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8825: ,p_token_1 => 'LINE_NUMBER'
8826: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8827: ,p_token_2 => 'LINE_TYPE_NAME'
8828: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8829: l_component_type
8830: ,l_component_code
8858: --
8859: --
8860: ------------------------------------------------------------------------------------------------
8861: -- 4219869 Business Flow
8862: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8863: -- Prior Entry. Currently, the following code is always generated.
8864: ------------------------------------------------------------------------------------------------
8865: XLA_AE_LINES_PKG.ValidateCurrentLine;
8866:
8861: -- 4219869 Business Flow
8862: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8863: -- Prior Entry. Currently, the following code is always generated.
8864: ------------------------------------------------------------------------------------------------
8865: XLA_AE_LINES_PKG.ValidateCurrentLine;
8866:
8867: ------------------------------------------------------------------------------------
8868: -- 4219869 Business Flow
8869: -- Populated credit and debit amounts -- Need to generate this within IF
8867: ------------------------------------------------------------------------------------
8868: -- 4219869 Business Flow
8869: -- Populated credit and debit amounts -- Need to generate this within IF
8870: ------------------------------------------------------------------------------------
8871: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8872:
8873: ----------------------------------------------------------------------------------
8874: -- 4219869 Business Flow
8875: -- Update journal entry status -- Need to generate this within IF
8899: -- To allow MPA report to determine if it should generate report process
8900: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8901: ------------------------------------------------------------------------------------------
8902:
8903: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8904: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8905:
8906: --
8907: -- Update the line information that should be overwritten
8900: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8901: ------------------------------------------------------------------------------------------
8902:
8903: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8904: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8905:
8906: --
8907: -- Update the line information that should be overwritten
8908: --
8905:
8906: --
8907: -- Update the line information that should be overwritten
8908: --
8909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8910: p_header_num => 1);
8911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8912:
8913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8907: -- Update the line information that should be overwritten
8908: --
8909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8910: p_header_num => 1);
8911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8912:
8913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8914:
8915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8910: p_header_num => 1);
8911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8912:
8913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8914:
8915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8916: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8917: END IF;
8912:
8913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8914:
8915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8916: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8917: END IF;
8918:
8919: --
8920: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8919: --
8920: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8921: --
8922: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8923: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8924: ELSE
8925: ---------------------------------------------------------------------------------------------------
8926: -- 4262811a Switch Sign
8927: ---------------------------------------------------------------------------------------------------
8924: ELSE
8925: ---------------------------------------------------------------------------------------------------
8926: -- 4262811a Switch Sign
8927: ---------------------------------------------------------------------------------------------------
8928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8925: ---------------------------------------------------------------------------------------------------
8926: -- 4262811a Switch Sign
8927: ---------------------------------------------------------------------------------------------------
8928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8926: -- 4262811a Switch Sign
8927: ---------------------------------------------------------------------------------------------------
8928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8927: ---------------------------------------------------------------------------------------------------
8928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8936:
8930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8936:
8937: END IF;
8938:
8931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8933: -- 5132302
8934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8936:
8937: END IF;
8938:
8939: -- 4955764
8936:
8937: END IF;
8938:
8939: -- 4955764
8940: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8942:
8943:
8944: XLA_AE_LINES_PKG.ValidateCurrentLine;
8940: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8942:
8943:
8944: XLA_AE_LINES_PKG.ValidateCurrentLine;
8945: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8946:
8947: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8948: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8942:
8943:
8944: XLA_AE_LINES_PKG.ValidateCurrentLine;
8945: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8946:
8947: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8948: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8949: ,p_balance_type_code => l_balance_type_code);
9117: --
9118: -- bulk performance
9119: --
9120: l_balance_type_code VARCHAR2(1);
9121: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9122: l_log_module VARCHAR2(240);
9123:
9124: --
9125: -- Upgrade strategy
9185: ') = 'R'
9186: THEN
9187:
9188: --
9189: XLA_AE_LINES_PKG.SetNewLine;
9190:
9191: p_balance_type_code := l_balance_type_code;
9192: -- set the flag so later we will know whether the gain loss line needs to be created
9193:
9197:
9198: --
9199: -- bulk performance
9200: --
9201: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9202: p_header_num => 0); -- 4262811
9203: --
9204: -- set accounting line options
9205: --
9202: p_header_num => 0); -- 4262811
9203: --
9204: -- set accounting line options
9205: --
9206: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9207: p_natural_side_code => 'C'
9208: , p_gain_or_loss_flag => 'N'
9209: , p_gl_transfer_mode_code => 'S'
9210: , p_acct_entry_type_code => 'A'
9216: --
9217: --
9218: -- set accounting line type info
9219: --
9220: xla_ae_lines_pkg.SetAcctLineType
9221: (p_component_type => l_component_type
9222: ,p_event_type_code => l_event_type_code
9223: ,p_line_definition_owner_code => l_line_definition_owner_code
9224: ,p_line_definition_code => l_line_definition_code
9230: ,p_event_class_code => l_event_class_code);
9231: --
9232: -- set accounting class
9233: --
9234: xla_ae_lines_pkg.SetAcctClass(
9235: p_accounting_class_code => 'COST_CLEARING'
9236: , p_ae_header_id => l_ae_header_id
9237: );
9238:
9238:
9239: --
9240: -- set rounding class
9241: --
9242: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9243: 'COST_CLEARING';
9244:
9245: --
9246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9242: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9243: 'COST_CLEARING';
9244:
9245: --
9246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9248: --
9249: -- bulk performance
9250: --
9243: 'COST_CLEARING';
9244:
9245: --
9246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9248: --
9249: -- bulk performance
9250: --
9251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9248: --
9249: -- bulk performance
9250: --
9251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9252:
9253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9255:
9249: -- bulk performance
9250: --
9251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9252:
9253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9255:
9256: -- 4955764
9257: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9255:
9256: -- 4955764
9257: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9258: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9259:
9260: -- 4458381 Public Sector Enh
9261:
9365: l_rec_acct_attrs.array_num_value(49) := p_source_62;
9366: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
9367: l_rec_acct_attrs.array_num_value(50) := p_source_63;
9368:
9369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9371:
9372: ---------------------------------------------------------------------------------------------------------------
9373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9366: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
9367: l_rec_acct_attrs.array_num_value(50) := p_source_63;
9368:
9369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9371:
9372: ---------------------------------------------------------------------------------------------------------------
9373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9374: ---------------------------------------------------------------------------------------------------------------
9369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9371:
9372: ---------------------------------------------------------------------------------------------------------------
9373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9374: ---------------------------------------------------------------------------------------------------------------
9375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9376:
9377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9371:
9372: ---------------------------------------------------------------------------------------------------------------
9373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9374: ---------------------------------------------------------------------------------------------------------------
9375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9376:
9377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9379:
9373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9374: ---------------------------------------------------------------------------------------------------------------
9375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9376:
9377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9379:
9380: IF xla_accounting_cache_pkg.GetValueChar
9381: (p_source_code => 'LEDGER_CATEGORY_CODE'
9374: ---------------------------------------------------------------------------------------------------------------
9375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9376:
9377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9379:
9380: IF xla_accounting_cache_pkg.GetValueChar
9381: (p_source_code => 'LEDGER_CATEGORY_CODE'
9382: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9385: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9386: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9387: )
9388: THEN
9389: xla_ae_lines_pkg.BflowUpgEntry
9390: (p_business_method_code => l_bflow_method_code
9391: ,p_business_class_code => l_bflow_class_code
9392: ,p_balance_type => l_balance_type_code);
9393: ELSE
9426: , x_value_type_code => l_adr_value_type_code
9427: , p_side => 'NA'
9428: );
9429:
9430: xla_ae_lines_pkg.set_ccid(
9431: p_code_combination_id => l_ccid
9432: , p_value_type_code => l_adr_value_type_code
9433: , p_transaction_coa_id => l_adr_transaction_coa_id
9434: , p_accounting_coa_id => l_adr_accounting_coa_id
9462: xla_accounting_err_pkg.build_message
9463: (p_appli_s_name => 'XLA'
9464: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9465: ,p_token_1 => 'LINE_NUMBER'
9466: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9467: ,p_token_2 => 'LINE_TYPE_NAME'
9468: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9469: l_component_type
9470: ,l_component_code
9498: --
9499: --
9500: ------------------------------------------------------------------------------------------------
9501: -- 4219869 Business Flow
9502: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9503: -- Prior Entry. Currently, the following code is always generated.
9504: ------------------------------------------------------------------------------------------------
9505: XLA_AE_LINES_PKG.ValidateCurrentLine;
9506:
9501: -- 4219869 Business Flow
9502: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9503: -- Prior Entry. Currently, the following code is always generated.
9504: ------------------------------------------------------------------------------------------------
9505: XLA_AE_LINES_PKG.ValidateCurrentLine;
9506:
9507: ------------------------------------------------------------------------------------
9508: -- 4219869 Business Flow
9509: -- Populated credit and debit amounts -- Need to generate this within IF
9507: ------------------------------------------------------------------------------------
9508: -- 4219869 Business Flow
9509: -- Populated credit and debit amounts -- Need to generate this within IF
9510: ------------------------------------------------------------------------------------
9511: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9512:
9513: ----------------------------------------------------------------------------------
9514: -- 4219869 Business Flow
9515: -- Update journal entry status -- Need to generate this within IF
9539: -- To allow MPA report to determine if it should generate report process
9540: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9541: ------------------------------------------------------------------------------------------
9542:
9543: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9544: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9545:
9546: --
9547: -- Update the line information that should be overwritten
9540: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9541: ------------------------------------------------------------------------------------------
9542:
9543: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9544: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9545:
9546: --
9547: -- Update the line information that should be overwritten
9548: --
9545:
9546: --
9547: -- Update the line information that should be overwritten
9548: --
9549: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9550: p_header_num => 1);
9551: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9552:
9553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9547: -- Update the line information that should be overwritten
9548: --
9549: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9550: p_header_num => 1);
9551: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9552:
9553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9554:
9555: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9549: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9550: p_header_num => 1);
9551: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9552:
9553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9554:
9555: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9556: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9557: END IF;
9552:
9553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9554:
9555: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9556: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9557: END IF;
9558:
9559: --
9560: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9559: --
9560: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9561: --
9562: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9563: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9564: ELSE
9565: ---------------------------------------------------------------------------------------------------
9566: -- 4262811a Switch Sign
9567: ---------------------------------------------------------------------------------------------------
9564: ELSE
9565: ---------------------------------------------------------------------------------------------------
9566: -- 4262811a Switch Sign
9567: ---------------------------------------------------------------------------------------------------
9568: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9569: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9565: ---------------------------------------------------------------------------------------------------
9566: -- 4262811a Switch Sign
9567: ---------------------------------------------------------------------------------------------------
9568: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9569: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9566: -- 4262811a Switch Sign
9567: ---------------------------------------------------------------------------------------------------
9568: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9569: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9574: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9567: ---------------------------------------------------------------------------------------------------
9568: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9569: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9574: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9568: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9569: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9574: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9576:
9570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9574: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9576:
9577: END IF;
9578:
9571: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9573: -- 5132302
9574: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9576:
9577: END IF;
9578:
9579: -- 4955764
9576:
9577: END IF;
9578:
9579: -- 4955764
9580: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9581: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9582:
9583:
9584: XLA_AE_LINES_PKG.ValidateCurrentLine;
9580: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9581: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9582:
9583:
9584: XLA_AE_LINES_PKG.ValidateCurrentLine;
9585: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9586:
9587: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9588: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9581: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9582:
9583:
9584: XLA_AE_LINES_PKG.ValidateCurrentLine;
9585: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9586:
9587: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9588: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9589: ,p_balance_type_code => l_balance_type_code);
9757: --
9758: -- bulk performance
9759: --
9760: l_balance_type_code VARCHAR2(1);
9761: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9762: l_log_module VARCHAR2(240);
9763:
9764: --
9765: -- Upgrade strategy
9825: ') = 'R'
9826: THEN
9827:
9828: --
9829: XLA_AE_LINES_PKG.SetNewLine;
9830:
9831: p_balance_type_code := l_balance_type_code;
9832: -- set the flag so later we will know whether the gain loss line needs to be created
9833:
9837:
9838: --
9839: -- bulk performance
9840: --
9841: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9842: p_header_num => 0); -- 4262811
9843: --
9844: -- set accounting line options
9845: --
9842: p_header_num => 0); -- 4262811
9843: --
9844: -- set accounting line options
9845: --
9846: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9847: p_natural_side_code => 'C'
9848: , p_gain_or_loss_flag => 'N'
9849: , p_gl_transfer_mode_code => 'S'
9850: , p_acct_entry_type_code => 'A'
9856: --
9857: --
9858: -- set accounting line type info
9859: --
9860: xla_ae_lines_pkg.SetAcctLineType
9861: (p_component_type => l_component_type
9862: ,p_event_type_code => l_event_type_code
9863: ,p_line_definition_owner_code => l_line_definition_owner_code
9864: ,p_line_definition_code => l_line_definition_code
9870: ,p_event_class_code => l_event_class_code);
9871: --
9872: -- set accounting class
9873: --
9874: xla_ae_lines_pkg.SetAcctClass(
9875: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
9876: , p_ae_header_id => l_ae_header_id
9877: );
9878:
9878:
9879: --
9880: -- set rounding class
9881: --
9882: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9883: 'FEDERAL_PROJECT_COST_CLEARING';
9884:
9885: --
9886: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9882: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9883: 'FEDERAL_PROJECT_COST_CLEARING';
9884:
9885: --
9886: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9887: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9888: --
9889: -- bulk performance
9890: --
9883: 'FEDERAL_PROJECT_COST_CLEARING';
9884:
9885: --
9886: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9887: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9888: --
9889: -- bulk performance
9890: --
9891: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9887: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9888: --
9889: -- bulk performance
9890: --
9891: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9892:
9893: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9894: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9895:
9889: -- bulk performance
9890: --
9891: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9892:
9893: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9894: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9895:
9896: -- 4955764
9897: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9893: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9894: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9895:
9896: -- 4955764
9897: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9898: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9899:
9900: -- 4458381 Public Sector Enh
9901:
10005: l_rec_acct_attrs.array_num_value(49) := p_source_62;
10006: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
10007: l_rec_acct_attrs.array_num_value(50) := p_source_63;
10008:
10009: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10010: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10011:
10012: ---------------------------------------------------------------------------------------------------------------
10013: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10006: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
10007: l_rec_acct_attrs.array_num_value(50) := p_source_63;
10008:
10009: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10010: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10011:
10012: ---------------------------------------------------------------------------------------------------------------
10013: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10014: ---------------------------------------------------------------------------------------------------------------
10009: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10010: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10011:
10012: ---------------------------------------------------------------------------------------------------------------
10013: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10014: ---------------------------------------------------------------------------------------------------------------
10015: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10016:
10017: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10011:
10012: ---------------------------------------------------------------------------------------------------------------
10013: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10014: ---------------------------------------------------------------------------------------------------------------
10015: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10016:
10017: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10018: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10019:
10013: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10014: ---------------------------------------------------------------------------------------------------------------
10015: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10016:
10017: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10018: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10019:
10020: IF xla_accounting_cache_pkg.GetValueChar
10021: (p_source_code => 'LEDGER_CATEGORY_CODE'
10014: ---------------------------------------------------------------------------------------------------------------
10015: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10016:
10017: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10018: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10019:
10020: IF xla_accounting_cache_pkg.GetValueChar
10021: (p_source_code => 'LEDGER_CATEGORY_CODE'
10022: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10025: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10026: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10027: )
10028: THEN
10029: xla_ae_lines_pkg.BflowUpgEntry
10030: (p_business_method_code => l_bflow_method_code
10031: ,p_business_class_code => l_bflow_class_code
10032: ,p_balance_type => l_balance_type_code);
10033: ELSE
10066: , x_value_type_code => l_adr_value_type_code
10067: , p_side => 'NA'
10068: );
10069:
10070: xla_ae_lines_pkg.set_ccid(
10071: p_code_combination_id => l_ccid
10072: , p_value_type_code => l_adr_value_type_code
10073: , p_transaction_coa_id => l_adr_transaction_coa_id
10074: , p_accounting_coa_id => l_adr_accounting_coa_id
10098: );
10099:
10100: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
10101:
10102: xla_ae_lines_pkg.set_segment(
10103: p_to_segment_code => 'GL_ACCOUNT'
10104: , p_segment_value => l_segment
10105: , p_from_segment_code => l_adr_value_segment_code
10106: , p_from_combination_id => l_adr_value_combination_id
10142: xla_accounting_err_pkg.build_message
10143: (p_appli_s_name => 'XLA'
10144: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10145: ,p_token_1 => 'LINE_NUMBER'
10146: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10147: ,p_token_2 => 'LINE_TYPE_NAME'
10148: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10149: l_component_type
10150: ,l_component_code
10178: --
10179: --
10180: ------------------------------------------------------------------------------------------------
10181: -- 4219869 Business Flow
10182: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10183: -- Prior Entry. Currently, the following code is always generated.
10184: ------------------------------------------------------------------------------------------------
10185: XLA_AE_LINES_PKG.ValidateCurrentLine;
10186:
10181: -- 4219869 Business Flow
10182: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10183: -- Prior Entry. Currently, the following code is always generated.
10184: ------------------------------------------------------------------------------------------------
10185: XLA_AE_LINES_PKG.ValidateCurrentLine;
10186:
10187: ------------------------------------------------------------------------------------
10188: -- 4219869 Business Flow
10189: -- Populated credit and debit amounts -- Need to generate this within IF
10187: ------------------------------------------------------------------------------------
10188: -- 4219869 Business Flow
10189: -- Populated credit and debit amounts -- Need to generate this within IF
10190: ------------------------------------------------------------------------------------
10191: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10192:
10193: ----------------------------------------------------------------------------------
10194: -- 4219869 Business Flow
10195: -- Update journal entry status -- Need to generate this within IF
10219: -- To allow MPA report to determine if it should generate report process
10220: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10221: ------------------------------------------------------------------------------------------
10222:
10223: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10224: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10225:
10226: --
10227: -- Update the line information that should be overwritten
10220: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10221: ------------------------------------------------------------------------------------------
10222:
10223: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10224: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10225:
10226: --
10227: -- Update the line information that should be overwritten
10228: --
10225:
10226: --
10227: -- Update the line information that should be overwritten
10228: --
10229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10230: p_header_num => 1);
10231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10232:
10233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10227: -- Update the line information that should be overwritten
10228: --
10229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10230: p_header_num => 1);
10231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10232:
10233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10234:
10235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10230: p_header_num => 1);
10231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10232:
10233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10234:
10235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10236: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10237: END IF;
10232:
10233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10234:
10235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10236: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10237: END IF;
10238:
10239: --
10240: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10239: --
10240: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10241: --
10242: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10243: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10244: ELSE
10245: ---------------------------------------------------------------------------------------------------
10246: -- 4262811a Switch Sign
10247: ---------------------------------------------------------------------------------------------------
10244: ELSE
10245: ---------------------------------------------------------------------------------------------------
10246: -- 4262811a Switch Sign
10247: ---------------------------------------------------------------------------------------------------
10248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10245: ---------------------------------------------------------------------------------------------------
10246: -- 4262811a Switch Sign
10247: ---------------------------------------------------------------------------------------------------
10248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10246: -- 4262811a Switch Sign
10247: ---------------------------------------------------------------------------------------------------
10248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10247: ---------------------------------------------------------------------------------------------------
10248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10256:
10250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10256:
10257: END IF;
10258:
10251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10253: -- 5132302
10254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10256:
10257: END IF;
10258:
10259: -- 4955764
10256:
10257: END IF;
10258:
10259: -- 4955764
10260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10262:
10263:
10264: XLA_AE_LINES_PKG.ValidateCurrentLine;
10260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10262:
10263:
10264: XLA_AE_LINES_PKG.ValidateCurrentLine;
10265: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10266:
10267: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10268: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10262:
10263:
10264: XLA_AE_LINES_PKG.ValidateCurrentLine;
10265: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10266:
10267: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10268: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10269: ,p_balance_type_code => l_balance_type_code);
10437: --
10438: -- bulk performance
10439: --
10440: l_balance_type_code VARCHAR2(1);
10441: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10442: l_log_module VARCHAR2(240);
10443:
10444: --
10445: -- Upgrade strategy
10505: ') = 'R'
10506: THEN
10507:
10508: --
10509: XLA_AE_LINES_PKG.SetNewLine;
10510:
10511: p_balance_type_code := l_balance_type_code;
10512: -- set the flag so later we will know whether the gain loss line needs to be created
10513:
10517:
10518: --
10519: -- bulk performance
10520: --
10521: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10522: p_header_num => 0); -- 4262811
10523: --
10524: -- set accounting line options
10525: --
10522: p_header_num => 0); -- 4262811
10523: --
10524: -- set accounting line options
10525: --
10526: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10527: p_natural_side_code => 'D'
10528: , p_gain_or_loss_flag => 'N'
10529: , p_gl_transfer_mode_code => 'S'
10530: , p_acct_entry_type_code => 'A'
10536: --
10537: --
10538: -- set accounting line type info
10539: --
10540: xla_ae_lines_pkg.SetAcctLineType
10541: (p_component_type => l_component_type
10542: ,p_event_type_code => l_event_type_code
10543: ,p_line_definition_owner_code => l_line_definition_owner_code
10544: ,p_line_definition_code => l_line_definition_code
10550: ,p_event_class_code => l_event_class_code);
10551: --
10552: -- set accounting class
10553: --
10554: xla_ae_lines_pkg.SetAcctClass(
10555: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
10556: , p_ae_header_id => l_ae_header_id
10557: );
10558:
10558:
10559: --
10560: -- set rounding class
10561: --
10562: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10563: 'FEDERAL_PROJECT_COST';
10564:
10565: --
10566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10562: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10563: 'FEDERAL_PROJECT_COST';
10564:
10565: --
10566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10568: --
10569: -- bulk performance
10570: --
10563: 'FEDERAL_PROJECT_COST';
10564:
10565: --
10566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10568: --
10569: -- bulk performance
10570: --
10571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10568: --
10569: -- bulk performance
10570: --
10571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10572:
10573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10575:
10569: -- bulk performance
10570: --
10571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10572:
10573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10575:
10576: -- 4955764
10577: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10575:
10576: -- 4955764
10577: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10578: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10579:
10580: -- 4458381 Public Sector Enh
10581:
10685: l_rec_acct_attrs.array_num_value(49) := p_source_62;
10686: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
10687: l_rec_acct_attrs.array_num_value(50) := p_source_63;
10688:
10689: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10690: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10691:
10692: ---------------------------------------------------------------------------------------------------------------
10693: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10686: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
10687: l_rec_acct_attrs.array_num_value(50) := p_source_63;
10688:
10689: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10690: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10691:
10692: ---------------------------------------------------------------------------------------------------------------
10693: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10694: ---------------------------------------------------------------------------------------------------------------
10689: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10690: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10691:
10692: ---------------------------------------------------------------------------------------------------------------
10693: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10694: ---------------------------------------------------------------------------------------------------------------
10695: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10696:
10697: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10691:
10692: ---------------------------------------------------------------------------------------------------------------
10693: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10694: ---------------------------------------------------------------------------------------------------------------
10695: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10696:
10697: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10698: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10699:
10693: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10694: ---------------------------------------------------------------------------------------------------------------
10695: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10696:
10697: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10698: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10699:
10700: IF xla_accounting_cache_pkg.GetValueChar
10701: (p_source_code => 'LEDGER_CATEGORY_CODE'
10694: ---------------------------------------------------------------------------------------------------------------
10695: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10696:
10697: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10698: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10699:
10700: IF xla_accounting_cache_pkg.GetValueChar
10701: (p_source_code => 'LEDGER_CATEGORY_CODE'
10702: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10705: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10706: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10707: )
10708: THEN
10709: xla_ae_lines_pkg.BflowUpgEntry
10710: (p_business_method_code => l_bflow_method_code
10711: ,p_business_class_code => l_bflow_class_code
10712: ,p_balance_type => l_balance_type_code);
10713: ELSE
10746: , x_value_type_code => l_adr_value_type_code
10747: , p_side => 'NA'
10748: );
10749:
10750: xla_ae_lines_pkg.set_ccid(
10751: p_code_combination_id => l_ccid
10752: , p_value_type_code => l_adr_value_type_code
10753: , p_transaction_coa_id => l_adr_transaction_coa_id
10754: , p_accounting_coa_id => l_adr_accounting_coa_id
10778: );
10779:
10780: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
10781:
10782: xla_ae_lines_pkg.set_segment(
10783: p_to_segment_code => 'GL_ACCOUNT'
10784: , p_segment_value => l_segment
10785: , p_from_segment_code => l_adr_value_segment_code
10786: , p_from_combination_id => l_adr_value_combination_id
10822: xla_accounting_err_pkg.build_message
10823: (p_appli_s_name => 'XLA'
10824: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10825: ,p_token_1 => 'LINE_NUMBER'
10826: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10827: ,p_token_2 => 'LINE_TYPE_NAME'
10828: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10829: l_component_type
10830: ,l_component_code
10858: --
10859: --
10860: ------------------------------------------------------------------------------------------------
10861: -- 4219869 Business Flow
10862: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10863: -- Prior Entry. Currently, the following code is always generated.
10864: ------------------------------------------------------------------------------------------------
10865: XLA_AE_LINES_PKG.ValidateCurrentLine;
10866:
10861: -- 4219869 Business Flow
10862: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10863: -- Prior Entry. Currently, the following code is always generated.
10864: ------------------------------------------------------------------------------------------------
10865: XLA_AE_LINES_PKG.ValidateCurrentLine;
10866:
10867: ------------------------------------------------------------------------------------
10868: -- 4219869 Business Flow
10869: -- Populated credit and debit amounts -- Need to generate this within IF
10867: ------------------------------------------------------------------------------------
10868: -- 4219869 Business Flow
10869: -- Populated credit and debit amounts -- Need to generate this within IF
10870: ------------------------------------------------------------------------------------
10871: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10872:
10873: ----------------------------------------------------------------------------------
10874: -- 4219869 Business Flow
10875: -- Update journal entry status -- Need to generate this within IF
10899: -- To allow MPA report to determine if it should generate report process
10900: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10901: ------------------------------------------------------------------------------------------
10902:
10903: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10904: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10905:
10906: --
10907: -- Update the line information that should be overwritten
10900: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10901: ------------------------------------------------------------------------------------------
10902:
10903: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10904: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10905:
10906: --
10907: -- Update the line information that should be overwritten
10908: --
10905:
10906: --
10907: -- Update the line information that should be overwritten
10908: --
10909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10910: p_header_num => 1);
10911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10912:
10913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10907: -- Update the line information that should be overwritten
10908: --
10909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10910: p_header_num => 1);
10911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10912:
10913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10914:
10915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10909: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10910: p_header_num => 1);
10911: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10912:
10913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10914:
10915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10916: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10917: END IF;
10912:
10913: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10914:
10915: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10916: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10917: END IF;
10918:
10919: --
10920: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10919: --
10920: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10921: --
10922: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10923: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10924: ELSE
10925: ---------------------------------------------------------------------------------------------------
10926: -- 4262811a Switch Sign
10927: ---------------------------------------------------------------------------------------------------
10924: ELSE
10925: ---------------------------------------------------------------------------------------------------
10926: -- 4262811a Switch Sign
10927: ---------------------------------------------------------------------------------------------------
10928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10925: ---------------------------------------------------------------------------------------------------
10926: -- 4262811a Switch Sign
10927: ---------------------------------------------------------------------------------------------------
10928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10926: -- 4262811a Switch Sign
10927: ---------------------------------------------------------------------------------------------------
10928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10927: ---------------------------------------------------------------------------------------------------
10928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10928: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10936:
10930: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10936:
10937: END IF;
10938:
10931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10932: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10933: -- 5132302
10934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10935: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10936:
10937: END IF;
10938:
10939: -- 4955764
10936:
10937: END IF;
10938:
10939: -- 4955764
10940: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10942:
10943:
10944: XLA_AE_LINES_PKG.ValidateCurrentLine;
10940: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10942:
10943:
10944: XLA_AE_LINES_PKG.ValidateCurrentLine;
10945: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10946:
10947: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10948: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10941: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10942:
10943:
10944: XLA_AE_LINES_PKG.ValidateCurrentLine;
10945: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10946:
10947: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10948: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10949: ,p_balance_type_code => l_balance_type_code);
11117: --
11118: -- bulk performance
11119: --
11120: l_balance_type_code VARCHAR2(1);
11121: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11122: l_log_module VARCHAR2(240);
11123:
11124: --
11125: -- Upgrade strategy
11185: ') = 'R'
11186: THEN
11187:
11188: --
11189: XLA_AE_LINES_PKG.SetNewLine;
11190:
11191: p_balance_type_code := l_balance_type_code;
11192: -- set the flag so later we will know whether the gain loss line needs to be created
11193:
11197:
11198: --
11199: -- bulk performance
11200: --
11201: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11202: p_header_num => 0); -- 4262811
11203: --
11204: -- set accounting line options
11205: --
11202: p_header_num => 0); -- 4262811
11203: --
11204: -- set accounting line options
11205: --
11206: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11207: p_natural_side_code => 'C'
11208: , p_gain_or_loss_flag => 'N'
11209: , p_gl_transfer_mode_code => 'S'
11210: , p_acct_entry_type_code => 'A'
11216: --
11217: --
11218: -- set accounting line type info
11219: --
11220: xla_ae_lines_pkg.SetAcctLineType
11221: (p_component_type => l_component_type
11222: ,p_event_type_code => l_event_type_code
11223: ,p_line_definition_owner_code => l_line_definition_owner_code
11224: ,p_line_definition_code => l_line_definition_code
11230: ,p_event_class_code => l_event_class_code);
11231: --
11232: -- set accounting class
11233: --
11234: xla_ae_lines_pkg.SetAcctClass(
11235: p_accounting_class_code => 'COST_CLEARING'
11236: , p_ae_header_id => l_ae_header_id
11237: );
11238:
11238:
11239: --
11240: -- set rounding class
11241: --
11242: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11243: 'COST_CLEARING';
11244:
11245: --
11246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11242: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11243: 'COST_CLEARING';
11244:
11245: --
11246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11248: --
11249: -- bulk performance
11250: --
11243: 'COST_CLEARING';
11244:
11245: --
11246: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11248: --
11249: -- bulk performance
11250: --
11251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11247: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11248: --
11249: -- bulk performance
11250: --
11251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11252:
11253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11255:
11249: -- bulk performance
11250: --
11251: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11252:
11253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11255:
11256: -- 4955764
11257: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11253: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11254: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11255:
11256: -- 4955764
11257: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11258: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11259:
11260: -- 4458381 Public Sector Enh
11261:
11365: l_rec_acct_attrs.array_num_value(49) := p_source_62;
11366: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
11367: l_rec_acct_attrs.array_num_value(50) := p_source_63;
11368:
11369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11371:
11372: ---------------------------------------------------------------------------------------------------------------
11373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11366: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
11367: l_rec_acct_attrs.array_num_value(50) := p_source_63;
11368:
11369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11371:
11372: ---------------------------------------------------------------------------------------------------------------
11373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11374: ---------------------------------------------------------------------------------------------------------------
11369: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11370: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11371:
11372: ---------------------------------------------------------------------------------------------------------------
11373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11374: ---------------------------------------------------------------------------------------------------------------
11375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11376:
11377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11371:
11372: ---------------------------------------------------------------------------------------------------------------
11373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11374: ---------------------------------------------------------------------------------------------------------------
11375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11376:
11377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11379:
11373: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11374: ---------------------------------------------------------------------------------------------------------------
11375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11376:
11377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11379:
11380: IF xla_accounting_cache_pkg.GetValueChar
11381: (p_source_code => 'LEDGER_CATEGORY_CODE'
11374: ---------------------------------------------------------------------------------------------------------------
11375: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11376:
11377: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11378: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11379:
11380: IF xla_accounting_cache_pkg.GetValueChar
11381: (p_source_code => 'LEDGER_CATEGORY_CODE'
11382: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11385: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11386: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11387: )
11388: THEN
11389: xla_ae_lines_pkg.BflowUpgEntry
11390: (p_business_method_code => l_bflow_method_code
11391: ,p_business_class_code => l_bflow_class_code
11392: ,p_balance_type => l_balance_type_code);
11393: ELSE
11427: , x_value_type_code => l_adr_value_type_code
11428: , p_side => 'NA'
11429: );
11430:
11431: xla_ae_lines_pkg.set_ccid(
11432: p_code_combination_id => l_ccid
11433: , p_value_type_code => l_adr_value_type_code
11434: , p_transaction_coa_id => l_adr_transaction_coa_id
11435: , p_accounting_coa_id => l_adr_accounting_coa_id
11463: xla_accounting_err_pkg.build_message
11464: (p_appli_s_name => 'XLA'
11465: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
11466: ,p_token_1 => 'LINE_NUMBER'
11467: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
11468: ,p_token_2 => 'LINE_TYPE_NAME'
11469: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
11470: l_component_type
11471: ,l_component_code
11499: --
11500: --
11501: ------------------------------------------------------------------------------------------------
11502: -- 4219869 Business Flow
11503: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11504: -- Prior Entry. Currently, the following code is always generated.
11505: ------------------------------------------------------------------------------------------------
11506: XLA_AE_LINES_PKG.ValidateCurrentLine;
11507:
11502: -- 4219869 Business Flow
11503: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11504: -- Prior Entry. Currently, the following code is always generated.
11505: ------------------------------------------------------------------------------------------------
11506: XLA_AE_LINES_PKG.ValidateCurrentLine;
11507:
11508: ------------------------------------------------------------------------------------
11509: -- 4219869 Business Flow
11510: -- Populated credit and debit amounts -- Need to generate this within IF
11508: ------------------------------------------------------------------------------------
11509: -- 4219869 Business Flow
11510: -- Populated credit and debit amounts -- Need to generate this within IF
11511: ------------------------------------------------------------------------------------
11512: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11513:
11514: ----------------------------------------------------------------------------------
11515: -- 4219869 Business Flow
11516: -- Update journal entry status -- Need to generate this within IF
11540: -- To allow MPA report to determine if it should generate report process
11541: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11542: ------------------------------------------------------------------------------------------
11543:
11544: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11545: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11546:
11547: --
11548: -- Update the line information that should be overwritten
11541: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11542: ------------------------------------------------------------------------------------------
11543:
11544: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11545: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11546:
11547: --
11548: -- Update the line information that should be overwritten
11549: --
11546:
11547: --
11548: -- Update the line information that should be overwritten
11549: --
11550: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11551: p_header_num => 1);
11552: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11553:
11554: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11548: -- Update the line information that should be overwritten
11549: --
11550: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11551: p_header_num => 1);
11552: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11553:
11554: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11555:
11556: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11550: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11551: p_header_num => 1);
11552: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11553:
11554: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11555:
11556: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11557: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11558: END IF;
11553:
11554: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11555:
11556: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11557: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11558: END IF;
11559:
11560: --
11561: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11560: --
11561: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11562: --
11563: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
11564: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
11565: ELSE
11566: ---------------------------------------------------------------------------------------------------
11567: -- 4262811a Switch Sign
11568: ---------------------------------------------------------------------------------------------------
11565: ELSE
11566: ---------------------------------------------------------------------------------------------------
11567: -- 4262811a Switch Sign
11568: ---------------------------------------------------------------------------------------------------
11569: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11566: ---------------------------------------------------------------------------------------------------
11567: -- 4262811a Switch Sign
11568: ---------------------------------------------------------------------------------------------------
11569: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11567: -- 4262811a Switch Sign
11568: ---------------------------------------------------------------------------------------------------
11569: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11568: ---------------------------------------------------------------------------------------------------
11569: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11576: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11569: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11570: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11576: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11577:
11571: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11576: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11577:
11578: END IF;
11579:
11572: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11573: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11574: -- 5132302
11575: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11576: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11577:
11578: END IF;
11579:
11580: -- 4955764
11577:
11578: END IF;
11579:
11580: -- 4955764
11581: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11582: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11583:
11584:
11585: XLA_AE_LINES_PKG.ValidateCurrentLine;
11581: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11582: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11583:
11584:
11585: XLA_AE_LINES_PKG.ValidateCurrentLine;
11586: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11587:
11588: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11589: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11582: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11583:
11584:
11585: XLA_AE_LINES_PKG.ValidateCurrentLine;
11586: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11587:
11588: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11589: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11590: ,p_balance_type_code => l_balance_type_code);
11758: --
11759: -- bulk performance
11760: --
11761: l_balance_type_code VARCHAR2(1);
11762: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11763: l_log_module VARCHAR2(240);
11764:
11765: --
11766: -- Upgrade strategy
11826: ') = 'R'
11827: THEN
11828:
11829: --
11830: XLA_AE_LINES_PKG.SetNewLine;
11831:
11832: p_balance_type_code := l_balance_type_code;
11833: -- set the flag so later we will know whether the gain loss line needs to be created
11834:
11838:
11839: --
11840: -- bulk performance
11841: --
11842: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11843: p_header_num => 0); -- 4262811
11844: --
11845: -- set accounting line options
11846: --
11843: p_header_num => 0); -- 4262811
11844: --
11845: -- set accounting line options
11846: --
11847: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11848: p_natural_side_code => 'C'
11849: , p_gain_or_loss_flag => 'N'
11850: , p_gl_transfer_mode_code => 'S'
11851: , p_acct_entry_type_code => 'A'
11857: --
11858: --
11859: -- set accounting line type info
11860: --
11861: xla_ae_lines_pkg.SetAcctLineType
11862: (p_component_type => l_component_type
11863: ,p_event_type_code => l_event_type_code
11864: ,p_line_definition_owner_code => l_line_definition_owner_code
11865: ,p_line_definition_code => l_line_definition_code
11871: ,p_event_class_code => l_event_class_code);
11872: --
11873: -- set accounting class
11874: --
11875: xla_ae_lines_pkg.SetAcctClass(
11876: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
11877: , p_ae_header_id => l_ae_header_id
11878: );
11879:
11879:
11880: --
11881: -- set rounding class
11882: --
11883: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11884: 'FEDERAL_PROJECT_COST_CLEARING';
11885:
11886: --
11887: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11883: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11884: 'FEDERAL_PROJECT_COST_CLEARING';
11885:
11886: --
11887: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11888: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11889: --
11890: -- bulk performance
11891: --
11884: 'FEDERAL_PROJECT_COST_CLEARING';
11885:
11886: --
11887: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11888: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11889: --
11890: -- bulk performance
11891: --
11892: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11888: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11889: --
11890: -- bulk performance
11891: --
11892: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11893:
11894: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11895: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11896:
11890: -- bulk performance
11891: --
11892: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11893:
11894: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11895: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11896:
11897: -- 4955764
11898: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11894: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11895: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11896:
11897: -- 4955764
11898: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11899: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11900:
11901: -- 4458381 Public Sector Enh
11902:
12004: l_rec_acct_attrs.array_num_value(48) := p_source_62;
12005: l_rec_acct_attrs.array_acct_attr_code(49) := 'UPG_DR_ENC_TYPE_ID';
12006: l_rec_acct_attrs.array_num_value(49) := p_source_63;
12007:
12008: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12009: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12010:
12011: ---------------------------------------------------------------------------------------------------------------
12012: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12005: l_rec_acct_attrs.array_acct_attr_code(49) := 'UPG_DR_ENC_TYPE_ID';
12006: l_rec_acct_attrs.array_num_value(49) := p_source_63;
12007:
12008: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12009: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12010:
12011: ---------------------------------------------------------------------------------------------------------------
12012: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12013: ---------------------------------------------------------------------------------------------------------------
12008: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12009: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12010:
12011: ---------------------------------------------------------------------------------------------------------------
12012: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12013: ---------------------------------------------------------------------------------------------------------------
12014: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12015:
12016: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12010:
12011: ---------------------------------------------------------------------------------------------------------------
12012: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12013: ---------------------------------------------------------------------------------------------------------------
12014: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12015:
12016: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12017: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12018:
12012: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12013: ---------------------------------------------------------------------------------------------------------------
12014: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12015:
12016: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12017: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12018:
12019: IF xla_accounting_cache_pkg.GetValueChar
12020: (p_source_code => 'LEDGER_CATEGORY_CODE'
12013: ---------------------------------------------------------------------------------------------------------------
12014: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12015:
12016: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12017: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12018:
12019: IF xla_accounting_cache_pkg.GetValueChar
12020: (p_source_code => 'LEDGER_CATEGORY_CODE'
12021: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12024: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12025: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12026: )
12027: THEN
12028: xla_ae_lines_pkg.BflowUpgEntry
12029: (p_business_method_code => l_bflow_method_code
12030: ,p_business_class_code => l_bflow_class_code
12031: ,p_balance_type => l_balance_type_code);
12032: ELSE
12066: , x_value_type_code => l_adr_value_type_code
12067: , p_side => 'NA'
12068: );
12069:
12070: xla_ae_lines_pkg.set_ccid(
12071: p_code_combination_id => l_ccid
12072: , p_value_type_code => l_adr_value_type_code
12073: , p_transaction_coa_id => l_adr_transaction_coa_id
12074: , p_accounting_coa_id => l_adr_accounting_coa_id
12098: );
12099:
12100: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
12101:
12102: xla_ae_lines_pkg.set_segment(
12103: p_to_segment_code => 'GL_ACCOUNT'
12104: , p_segment_value => l_segment
12105: , p_from_segment_code => l_adr_value_segment_code
12106: , p_from_combination_id => l_adr_value_combination_id
12142: xla_accounting_err_pkg.build_message
12143: (p_appli_s_name => 'XLA'
12144: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12145: ,p_token_1 => 'LINE_NUMBER'
12146: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12147: ,p_token_2 => 'LINE_TYPE_NAME'
12148: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12149: l_component_type
12150: ,l_component_code
12178: --
12179: --
12180: ------------------------------------------------------------------------------------------------
12181: -- 4219869 Business Flow
12182: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12183: -- Prior Entry. Currently, the following code is always generated.
12184: ------------------------------------------------------------------------------------------------
12185: XLA_AE_LINES_PKG.ValidateCurrentLine;
12186:
12181: -- 4219869 Business Flow
12182: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12183: -- Prior Entry. Currently, the following code is always generated.
12184: ------------------------------------------------------------------------------------------------
12185: XLA_AE_LINES_PKG.ValidateCurrentLine;
12186:
12187: ------------------------------------------------------------------------------------
12188: -- 4219869 Business Flow
12189: -- Populated credit and debit amounts -- Need to generate this within IF
12187: ------------------------------------------------------------------------------------
12188: -- 4219869 Business Flow
12189: -- Populated credit and debit amounts -- Need to generate this within IF
12190: ------------------------------------------------------------------------------------
12191: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12192:
12193: ----------------------------------------------------------------------------------
12194: -- 4219869 Business Flow
12195: -- Update journal entry status -- Need to generate this within IF
12219: -- To allow MPA report to determine if it should generate report process
12220: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12221: ------------------------------------------------------------------------------------------
12222:
12223: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12224: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12225:
12226: --
12227: -- Update the line information that should be overwritten
12220: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12221: ------------------------------------------------------------------------------------------
12222:
12223: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12224: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12225:
12226: --
12227: -- Update the line information that should be overwritten
12228: --
12225:
12226: --
12227: -- Update the line information that should be overwritten
12228: --
12229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12230: p_header_num => 1);
12231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12232:
12233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12227: -- Update the line information that should be overwritten
12228: --
12229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12230: p_header_num => 1);
12231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12232:
12233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12234:
12235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12229: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12230: p_header_num => 1);
12231: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12232:
12233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12234:
12235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12236: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12237: END IF;
12232:
12233: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12234:
12235: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12236: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12237: END IF;
12238:
12239: --
12240: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12239: --
12240: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12241: --
12242: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12243: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12244: ELSE
12245: ---------------------------------------------------------------------------------------------------
12246: -- 4262811a Switch Sign
12247: ---------------------------------------------------------------------------------------------------
12244: ELSE
12245: ---------------------------------------------------------------------------------------------------
12246: -- 4262811a Switch Sign
12247: ---------------------------------------------------------------------------------------------------
12248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12245: ---------------------------------------------------------------------------------------------------
12246: -- 4262811a Switch Sign
12247: ---------------------------------------------------------------------------------------------------
12248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12246: -- 4262811a Switch Sign
12247: ---------------------------------------------------------------------------------------------------
12248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12247: ---------------------------------------------------------------------------------------------------
12248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12248: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12249: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12256:
12250: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12256:
12257: END IF;
12258:
12251: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12252: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12253: -- 5132302
12254: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12255: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12256:
12257: END IF;
12258:
12259: -- 4955764
12256:
12257: END IF;
12258:
12259: -- 4955764
12260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12262:
12263:
12264: XLA_AE_LINES_PKG.ValidateCurrentLine;
12260: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12262:
12263:
12264: XLA_AE_LINES_PKG.ValidateCurrentLine;
12265: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12266:
12267: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12268: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12261: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12262:
12263:
12264: XLA_AE_LINES_PKG.ValidateCurrentLine;
12265: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12266:
12267: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12268: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12269: ,p_balance_type_code => l_balance_type_code);
12437: --
12438: -- bulk performance
12439: --
12440: l_balance_type_code VARCHAR2(1);
12441: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12442: l_log_module VARCHAR2(240);
12443:
12444: --
12445: -- Upgrade strategy
12505: ') = 'R'
12506: THEN
12507:
12508: --
12509: XLA_AE_LINES_PKG.SetNewLine;
12510:
12511: p_balance_type_code := l_balance_type_code;
12512: -- set the flag so later we will know whether the gain loss line needs to be created
12513:
12517:
12518: --
12519: -- bulk performance
12520: --
12521: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
12522: p_header_num => 0); -- 4262811
12523: --
12524: -- set accounting line options
12525: --
12522: p_header_num => 0); -- 4262811
12523: --
12524: -- set accounting line options
12525: --
12526: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
12527: p_natural_side_code => 'D'
12528: , p_gain_or_loss_flag => 'N'
12529: , p_gl_transfer_mode_code => 'S'
12530: , p_acct_entry_type_code => 'A'
12536: --
12537: --
12538: -- set accounting line type info
12539: --
12540: xla_ae_lines_pkg.SetAcctLineType
12541: (p_component_type => l_component_type
12542: ,p_event_type_code => l_event_type_code
12543: ,p_line_definition_owner_code => l_line_definition_owner_code
12544: ,p_line_definition_code => l_line_definition_code
12550: ,p_event_class_code => l_event_class_code);
12551: --
12552: -- set accounting class
12553: --
12554: xla_ae_lines_pkg.SetAcctClass(
12555: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
12556: , p_ae_header_id => l_ae_header_id
12557: );
12558:
12558:
12559: --
12560: -- set rounding class
12561: --
12562: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12563: 'FEDERAL_PROJECT_COST';
12564:
12565: --
12566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12562: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12563: 'FEDERAL_PROJECT_COST';
12564:
12565: --
12566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12568: --
12569: -- bulk performance
12570: --
12563: 'FEDERAL_PROJECT_COST';
12564:
12565: --
12566: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12568: --
12569: -- bulk performance
12570: --
12571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12567: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12568: --
12569: -- bulk performance
12570: --
12571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12572:
12573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12575:
12569: -- bulk performance
12570: --
12571: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12572:
12573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12575:
12576: -- 4955764
12577: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12574: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12575:
12576: -- 4955764
12577: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12578: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12579:
12580: -- 4458381 Public Sector Enh
12581:
12683: l_rec_acct_attrs.array_num_value(48) := p_source_62;
12684: l_rec_acct_attrs.array_acct_attr_code(49) := 'UPG_DR_ENC_TYPE_ID';
12685: l_rec_acct_attrs.array_num_value(49) := p_source_63;
12686:
12687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12689:
12690: ---------------------------------------------------------------------------------------------------------------
12691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12684: l_rec_acct_attrs.array_acct_attr_code(49) := 'UPG_DR_ENC_TYPE_ID';
12685: l_rec_acct_attrs.array_num_value(49) := p_source_63;
12686:
12687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12689:
12690: ---------------------------------------------------------------------------------------------------------------
12691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12692: ---------------------------------------------------------------------------------------------------------------
12687: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12688: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12689:
12690: ---------------------------------------------------------------------------------------------------------------
12691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12692: ---------------------------------------------------------------------------------------------------------------
12693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12694:
12695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12689:
12690: ---------------------------------------------------------------------------------------------------------------
12691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12692: ---------------------------------------------------------------------------------------------------------------
12693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12694:
12695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12697:
12691: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12692: ---------------------------------------------------------------------------------------------------------------
12693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12694:
12695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12697:
12698: IF xla_accounting_cache_pkg.GetValueChar
12699: (p_source_code => 'LEDGER_CATEGORY_CODE'
12692: ---------------------------------------------------------------------------------------------------------------
12693: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12694:
12695: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12696: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12697:
12698: IF xla_accounting_cache_pkg.GetValueChar
12699: (p_source_code => 'LEDGER_CATEGORY_CODE'
12700: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12703: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12704: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12705: )
12706: THEN
12707: xla_ae_lines_pkg.BflowUpgEntry
12708: (p_business_method_code => l_bflow_method_code
12709: ,p_business_class_code => l_bflow_class_code
12710: ,p_balance_type => l_balance_type_code);
12711: ELSE
12745: , x_value_type_code => l_adr_value_type_code
12746: , p_side => 'NA'
12747: );
12748:
12749: xla_ae_lines_pkg.set_ccid(
12750: p_code_combination_id => l_ccid
12751: , p_value_type_code => l_adr_value_type_code
12752: , p_transaction_coa_id => l_adr_transaction_coa_id
12753: , p_accounting_coa_id => l_adr_accounting_coa_id
12777: );
12778:
12779: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
12780:
12781: xla_ae_lines_pkg.set_segment(
12782: p_to_segment_code => 'GL_ACCOUNT'
12783: , p_segment_value => l_segment
12784: , p_from_segment_code => l_adr_value_segment_code
12785: , p_from_combination_id => l_adr_value_combination_id
12821: xla_accounting_err_pkg.build_message
12822: (p_appli_s_name => 'XLA'
12823: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12824: ,p_token_1 => 'LINE_NUMBER'
12825: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12826: ,p_token_2 => 'LINE_TYPE_NAME'
12827: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12828: l_component_type
12829: ,l_component_code
12857: --
12858: --
12859: ------------------------------------------------------------------------------------------------
12860: -- 4219869 Business Flow
12861: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12862: -- Prior Entry. Currently, the following code is always generated.
12863: ------------------------------------------------------------------------------------------------
12864: XLA_AE_LINES_PKG.ValidateCurrentLine;
12865:
12860: -- 4219869 Business Flow
12861: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12862: -- Prior Entry. Currently, the following code is always generated.
12863: ------------------------------------------------------------------------------------------------
12864: XLA_AE_LINES_PKG.ValidateCurrentLine;
12865:
12866: ------------------------------------------------------------------------------------
12867: -- 4219869 Business Flow
12868: -- Populated credit and debit amounts -- Need to generate this within IF
12866: ------------------------------------------------------------------------------------
12867: -- 4219869 Business Flow
12868: -- Populated credit and debit amounts -- Need to generate this within IF
12869: ------------------------------------------------------------------------------------
12870: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12871:
12872: ----------------------------------------------------------------------------------
12873: -- 4219869 Business Flow
12874: -- Update journal entry status -- Need to generate this within IF
12898: -- To allow MPA report to determine if it should generate report process
12899: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12900: ------------------------------------------------------------------------------------------
12901:
12902: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12903: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12904:
12905: --
12906: -- Update the line information that should be overwritten
12899: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12900: ------------------------------------------------------------------------------------------
12901:
12902: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12903: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12904:
12905: --
12906: -- Update the line information that should be overwritten
12907: --
12904:
12905: --
12906: -- Update the line information that should be overwritten
12907: --
12908: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12909: p_header_num => 1);
12910: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12911:
12912: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12906: -- Update the line information that should be overwritten
12907: --
12908: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12909: p_header_num => 1);
12910: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12911:
12912: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12913:
12914: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12908: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12909: p_header_num => 1);
12910: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12911:
12912: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12913:
12914: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12915: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12916: END IF;
12911:
12912: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12913:
12914: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12915: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12916: END IF;
12917:
12918: --
12919: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12918: --
12919: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12920: --
12921: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12922: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12923: ELSE
12924: ---------------------------------------------------------------------------------------------------
12925: -- 4262811a Switch Sign
12926: ---------------------------------------------------------------------------------------------------
12923: ELSE
12924: ---------------------------------------------------------------------------------------------------
12925: -- 4262811a Switch Sign
12926: ---------------------------------------------------------------------------------------------------
12927: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12928: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12924: ---------------------------------------------------------------------------------------------------
12925: -- 4262811a Switch Sign
12926: ---------------------------------------------------------------------------------------------------
12927: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12928: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12925: -- 4262811a Switch Sign
12926: ---------------------------------------------------------------------------------------------------
12927: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12928: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12933: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12926: ---------------------------------------------------------------------------------------------------
12927: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12928: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12933: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12927: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12928: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12933: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12935:
12929: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12933: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12935:
12936: END IF;
12937:
12930: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12931: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12932: -- 5132302
12933: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12934: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12935:
12936: END IF;
12937:
12938: -- 4955764
12935:
12936: END IF;
12937:
12938: -- 4955764
12939: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12940: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12941:
12942:
12943: XLA_AE_LINES_PKG.ValidateCurrentLine;
12939: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12940: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12941:
12942:
12943: XLA_AE_LINES_PKG.ValidateCurrentLine;
12944: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12945:
12946: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12947: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12940: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12941:
12942:
12943: XLA_AE_LINES_PKG.ValidateCurrentLine;
12944: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12945:
12946: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12947: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12948: ,p_balance_type_code => l_balance_type_code);
13099: --
13100: -- bulk performance
13101: --
13102: l_balance_type_code VARCHAR2(1);
13103: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13104: l_log_module VARCHAR2(240);
13105:
13106: --
13107: -- Upgrade strategy
13169: ') = 'Y'
13170: THEN
13171:
13172: --
13173: XLA_AE_LINES_PKG.SetNewLine;
13174:
13175: p_balance_type_code := l_balance_type_code;
13176: -- set the flag so later we will know whether the gain loss line needs to be created
13177:
13181:
13182: --
13183: -- bulk performance
13184: --
13185: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13186: p_header_num => 0); -- 4262811
13187: --
13188: -- set accounting line options
13189: --
13186: p_header_num => 0); -- 4262811
13187: --
13188: -- set accounting line options
13189: --
13190: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13191: p_natural_side_code => 'D'
13192: , p_gain_or_loss_flag => 'N'
13193: , p_gl_transfer_mode_code => 'S'
13194: , p_acct_entry_type_code => 'A'
13200: --
13201: --
13202: -- set accounting line type info
13203: --
13204: xla_ae_lines_pkg.SetAcctLineType
13205: (p_component_type => l_component_type
13206: ,p_event_type_code => l_event_type_code
13207: ,p_line_definition_owner_code => l_line_definition_owner_code
13208: ,p_line_definition_code => l_line_definition_code
13214: ,p_event_class_code => l_event_class_code);
13215: --
13216: -- set accounting class
13217: --
13218: xla_ae_lines_pkg.SetAcctClass(
13219: p_accounting_class_code => 'FEDERAL_REVENUE_ADJUSTMENT'
13220: , p_ae_header_id => l_ae_header_id
13221: );
13222:
13222:
13223: --
13224: -- set rounding class
13225: --
13226: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13227: 'FEDERAL_REVENUE_ADJUSTMENT';
13228:
13229: --
13230: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13226: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13227: 'FEDERAL_REVENUE_ADJUSTMENT';
13228:
13229: --
13230: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13231: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13232: --
13233: -- bulk performance
13234: --
13227: 'FEDERAL_REVENUE_ADJUSTMENT';
13228:
13229: --
13230: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13231: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13232: --
13233: -- bulk performance
13234: --
13235: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13231: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13232: --
13233: -- bulk performance
13234: --
13235: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13236:
13237: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13238: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13239:
13233: -- bulk performance
13234: --
13235: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13236:
13237: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13238: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13239:
13240: -- 4955764
13241: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13237: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13238: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13239:
13240: -- 4955764
13241: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13242: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13243:
13244: -- 4458381 Public Sector Enh
13245:
13311: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
13312: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
13313: l_rec_acct_attrs.array_num_value(31) := p_source_43;
13314:
13315: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13316: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13317:
13318: ---------------------------------------------------------------------------------------------------------------
13319: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13312: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
13313: l_rec_acct_attrs.array_num_value(31) := p_source_43;
13314:
13315: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13316: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13317:
13318: ---------------------------------------------------------------------------------------------------------------
13319: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13320: ---------------------------------------------------------------------------------------------------------------
13315: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13316: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13317:
13318: ---------------------------------------------------------------------------------------------------------------
13319: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13320: ---------------------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13322:
13323: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13317:
13318: ---------------------------------------------------------------------------------------------------------------
13319: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13320: ---------------------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13322:
13323: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13324: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13325:
13319: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13320: ---------------------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13322:
13323: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13324: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13325:
13326: IF xla_accounting_cache_pkg.GetValueChar
13327: (p_source_code => 'LEDGER_CATEGORY_CODE'
13320: ---------------------------------------------------------------------------------------------------------------
13321: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13322:
13323: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13324: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13325:
13326: IF xla_accounting_cache_pkg.GetValueChar
13327: (p_source_code => 'LEDGER_CATEGORY_CODE'
13328: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13331: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13332: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13333: )
13334: THEN
13335: xla_ae_lines_pkg.BflowUpgEntry
13336: (p_business_method_code => l_bflow_method_code
13337: ,p_business_class_code => l_bflow_class_code
13338: ,p_balance_type => l_balance_type_code);
13339: ELSE
13371: , x_value_type_code => l_adr_value_type_code
13372: , p_side => 'NA'
13373: );
13374:
13375: xla_ae_lines_pkg.set_ccid(
13376: p_code_combination_id => l_ccid
13377: , p_value_type_code => l_adr_value_type_code
13378: , p_transaction_coa_id => l_adr_transaction_coa_id
13379: , p_accounting_coa_id => l_adr_accounting_coa_id
13403: );
13404:
13405: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
13406:
13407: xla_ae_lines_pkg.set_segment(
13408: p_to_segment_code => 'GL_ACCOUNT'
13409: , p_segment_value => l_segment
13410: , p_from_segment_code => l_adr_value_segment_code
13411: , p_from_combination_id => l_adr_value_combination_id
13447: xla_accounting_err_pkg.build_message
13448: (p_appli_s_name => 'XLA'
13449: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13450: ,p_token_1 => 'LINE_NUMBER'
13451: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13452: ,p_token_2 => 'LINE_TYPE_NAME'
13453: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13454: l_component_type
13455: ,l_component_code
13483: --
13484: --
13485: ------------------------------------------------------------------------------------------------
13486: -- 4219869 Business Flow
13487: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13488: -- Prior Entry. Currently, the following code is always generated.
13489: ------------------------------------------------------------------------------------------------
13490: XLA_AE_LINES_PKG.ValidateCurrentLine;
13491:
13486: -- 4219869 Business Flow
13487: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13488: -- Prior Entry. Currently, the following code is always generated.
13489: ------------------------------------------------------------------------------------------------
13490: XLA_AE_LINES_PKG.ValidateCurrentLine;
13491:
13492: ------------------------------------------------------------------------------------
13493: -- 4219869 Business Flow
13494: -- Populated credit and debit amounts -- Need to generate this within IF
13492: ------------------------------------------------------------------------------------
13493: -- 4219869 Business Flow
13494: -- Populated credit and debit amounts -- Need to generate this within IF
13495: ------------------------------------------------------------------------------------
13496: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13497:
13498: ----------------------------------------------------------------------------------
13499: -- 4219869 Business Flow
13500: -- Update journal entry status -- Need to generate this within IF
13524: -- To allow MPA report to determine if it should generate report process
13525: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13526: ------------------------------------------------------------------------------------------
13527:
13528: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13529: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13530:
13531: --
13532: -- Update the line information that should be overwritten
13525: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13526: ------------------------------------------------------------------------------------------
13527:
13528: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13529: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13530:
13531: --
13532: -- Update the line information that should be overwritten
13533: --
13530:
13531: --
13532: -- Update the line information that should be overwritten
13533: --
13534: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13535: p_header_num => 1);
13536: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13537:
13538: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13532: -- Update the line information that should be overwritten
13533: --
13534: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13535: p_header_num => 1);
13536: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13537:
13538: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13539:
13540: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13534: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13535: p_header_num => 1);
13536: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13537:
13538: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13539:
13540: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13541: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13542: END IF;
13537:
13538: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13539:
13540: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13541: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13542: END IF;
13543:
13544: --
13545: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13544: --
13545: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13546: --
13547: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
13548: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
13549: ELSE
13550: ---------------------------------------------------------------------------------------------------
13551: -- 4262811a Switch Sign
13552: ---------------------------------------------------------------------------------------------------
13549: ELSE
13550: ---------------------------------------------------------------------------------------------------
13551: -- 4262811a Switch Sign
13552: ---------------------------------------------------------------------------------------------------
13553: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13554: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13550: ---------------------------------------------------------------------------------------------------
13551: -- 4262811a Switch Sign
13552: ---------------------------------------------------------------------------------------------------
13553: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13554: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13551: -- 4262811a Switch Sign
13552: ---------------------------------------------------------------------------------------------------
13553: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13554: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13559: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13552: ---------------------------------------------------------------------------------------------------
13553: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13554: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13559: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13560: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13553: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13554: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13559: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13560: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13561:
13555: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13559: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13560: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13561:
13562: END IF;
13563:
13556: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13557: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13558: -- 5132302
13559: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13560: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13561:
13562: END IF;
13563:
13564: -- 4955764
13561:
13562: END IF;
13563:
13564: -- 4955764
13565: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13566: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13567:
13568:
13569: XLA_AE_LINES_PKG.ValidateCurrentLine;
13565: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13566: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13567:
13568:
13569: XLA_AE_LINES_PKG.ValidateCurrentLine;
13570: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13571:
13572: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13573: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13566: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13567:
13568:
13569: XLA_AE_LINES_PKG.ValidateCurrentLine;
13570: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13571:
13572: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13573: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13574: ,p_balance_type_code => l_balance_type_code);
13697: --
13698: -- bulk performance
13699: --
13700: l_balance_type_code VARCHAR2(1);
13701: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13702: l_log_module VARCHAR2(240);
13703:
13704: --
13705: -- Upgrade strategy
13767: ') = 'N'
13768: THEN
13769:
13770: --
13771: XLA_AE_LINES_PKG.SetNewLine;
13772:
13773: p_balance_type_code := l_balance_type_code;
13774: -- set the flag so later we will know whether the gain loss line needs to be created
13775:
13779:
13780: --
13781: -- bulk performance
13782: --
13783: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13784: p_header_num => 0); -- 4262811
13785: --
13786: -- set accounting line options
13787: --
13784: p_header_num => 0); -- 4262811
13785: --
13786: -- set accounting line options
13787: --
13788: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13789: p_natural_side_code => 'C'
13790: , p_gain_or_loss_flag => 'N'
13791: , p_gl_transfer_mode_code => 'S'
13792: , p_acct_entry_type_code => 'A'
13798: --
13799: --
13800: -- set accounting line type info
13801: --
13802: xla_ae_lines_pkg.SetAcctLineType
13803: (p_component_type => l_component_type
13804: ,p_event_type_code => l_event_type_code
13805: ,p_line_definition_owner_code => l_line_definition_owner_code
13806: ,p_line_definition_code => l_line_definition_code
13812: ,p_event_class_code => l_event_class_code);
13813: --
13814: -- set accounting class
13815: --
13816: xla_ae_lines_pkg.SetAcctClass(
13817: p_accounting_class_code => 'FEDERAL_REVENUE'
13818: , p_ae_header_id => l_ae_header_id
13819: );
13820:
13820:
13821: --
13822: -- set rounding class
13823: --
13824: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13825: 'FEDERAL_REVENUE';
13826:
13827: --
13828: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13824: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13825: 'FEDERAL_REVENUE';
13826:
13827: --
13828: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13829: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13830: --
13831: -- bulk performance
13832: --
13825: 'FEDERAL_REVENUE';
13826:
13827: --
13828: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13829: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13830: --
13831: -- bulk performance
13832: --
13833: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13829: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13830: --
13831: -- bulk performance
13832: --
13833: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13834:
13835: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13836: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13837:
13831: -- bulk performance
13832: --
13833: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13834:
13835: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13836: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13837:
13838: -- 4955764
13839: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13835: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13836: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13837:
13838: -- 4955764
13839: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13840: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13841:
13842: -- 4458381 Public Sector Enh
13843:
13861: l_rec_acct_attrs.array_num_value(6) := to_char(p_source_51);
13862: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
13863: l_rec_acct_attrs.array_num_value(7) := p_source_43;
13864:
13865: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13866: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13867:
13868: ---------------------------------------------------------------------------------------------------------------
13869: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13862: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
13863: l_rec_acct_attrs.array_num_value(7) := p_source_43;
13864:
13865: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13866: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13867:
13868: ---------------------------------------------------------------------------------------------------------------
13869: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13870: ---------------------------------------------------------------------------------------------------------------
13865: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13866: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13867:
13868: ---------------------------------------------------------------------------------------------------------------
13869: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13870: ---------------------------------------------------------------------------------------------------------------
13871: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13872:
13873: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13867:
13868: ---------------------------------------------------------------------------------------------------------------
13869: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13870: ---------------------------------------------------------------------------------------------------------------
13871: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13872:
13873: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13874: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13875:
13869: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13870: ---------------------------------------------------------------------------------------------------------------
13871: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13872:
13873: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13874: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13875:
13876: IF xla_accounting_cache_pkg.GetValueChar
13877: (p_source_code => 'LEDGER_CATEGORY_CODE'
13870: ---------------------------------------------------------------------------------------------------------------
13871: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13872:
13873: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13874: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13875:
13876: IF xla_accounting_cache_pkg.GetValueChar
13877: (p_source_code => 'LEDGER_CATEGORY_CODE'
13878: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13881: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13882: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13883: )
13884: THEN
13885: xla_ae_lines_pkg.BflowUpgEntry
13886: (p_business_method_code => l_bflow_method_code
13887: ,p_business_class_code => l_bflow_class_code
13888: ,p_balance_type => l_balance_type_code);
13889: ELSE
13921: , x_value_type_code => l_adr_value_type_code
13922: , p_side => 'NA'
13923: );
13924:
13925: xla_ae_lines_pkg.set_ccid(
13926: p_code_combination_id => l_ccid
13927: , p_value_type_code => l_adr_value_type_code
13928: , p_transaction_coa_id => l_adr_transaction_coa_id
13929: , p_accounting_coa_id => l_adr_accounting_coa_id
13953: );
13954:
13955: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
13956:
13957: xla_ae_lines_pkg.set_segment(
13958: p_to_segment_code => 'GL_ACCOUNT'
13959: , p_segment_value => l_segment
13960: , p_from_segment_code => l_adr_value_segment_code
13961: , p_from_combination_id => l_adr_value_combination_id
13997: xla_accounting_err_pkg.build_message
13998: (p_appli_s_name => 'XLA'
13999: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
14000: ,p_token_1 => 'LINE_NUMBER'
14001: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
14002: ,p_token_2 => 'LINE_TYPE_NAME'
14003: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
14004: l_component_type
14005: ,l_component_code
14033: --
14034: --
14035: ------------------------------------------------------------------------------------------------
14036: -- 4219869 Business Flow
14037: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14038: -- Prior Entry. Currently, the following code is always generated.
14039: ------------------------------------------------------------------------------------------------
14040: XLA_AE_LINES_PKG.ValidateCurrentLine;
14041:
14036: -- 4219869 Business Flow
14037: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14038: -- Prior Entry. Currently, the following code is always generated.
14039: ------------------------------------------------------------------------------------------------
14040: XLA_AE_LINES_PKG.ValidateCurrentLine;
14041:
14042: ------------------------------------------------------------------------------------
14043: -- 4219869 Business Flow
14044: -- Populated credit and debit amounts -- Need to generate this within IF
14042: ------------------------------------------------------------------------------------
14043: -- 4219869 Business Flow
14044: -- Populated credit and debit amounts -- Need to generate this within IF
14045: ------------------------------------------------------------------------------------
14046: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14047:
14048: ----------------------------------------------------------------------------------
14049: -- 4219869 Business Flow
14050: -- Update journal entry status -- Need to generate this within IF
14074: -- To allow MPA report to determine if it should generate report process
14075: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14076: ------------------------------------------------------------------------------------------
14077:
14078: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14079: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14080:
14081: --
14082: -- Update the line information that should be overwritten
14075: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14076: ------------------------------------------------------------------------------------------
14077:
14078: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14079: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14080:
14081: --
14082: -- Update the line information that should be overwritten
14083: --
14080:
14081: --
14082: -- Update the line information that should be overwritten
14083: --
14084: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14085: p_header_num => 1);
14086: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14087:
14088: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14082: -- Update the line information that should be overwritten
14083: --
14084: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14085: p_header_num => 1);
14086: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14087:
14088: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14089:
14090: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14084: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14085: p_header_num => 1);
14086: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14087:
14088: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14089:
14090: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14091: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14092: END IF;
14087:
14088: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14089:
14090: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14091: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14092: END IF;
14093:
14094: --
14095: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14094: --
14095: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14096: --
14097: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14098: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14099: ELSE
14100: ---------------------------------------------------------------------------------------------------
14101: -- 4262811a Switch Sign
14102: ---------------------------------------------------------------------------------------------------
14099: ELSE
14100: ---------------------------------------------------------------------------------------------------
14101: -- 4262811a Switch Sign
14102: ---------------------------------------------------------------------------------------------------
14103: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14104: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14100: ---------------------------------------------------------------------------------------------------
14101: -- 4262811a Switch Sign
14102: ---------------------------------------------------------------------------------------------------
14103: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14104: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14101: -- 4262811a Switch Sign
14102: ---------------------------------------------------------------------------------------------------
14103: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14104: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14109: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14102: ---------------------------------------------------------------------------------------------------
14103: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14104: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14109: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14103: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14104: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14109: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14111:
14105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14109: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14111:
14112: END IF;
14113:
14106: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14108: -- 5132302
14109: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14111:
14112: END IF;
14113:
14114: -- 4955764
14111:
14112: END IF;
14113:
14114: -- 4955764
14115: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14116: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14117:
14118:
14119: XLA_AE_LINES_PKG.ValidateCurrentLine;
14115: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14116: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14117:
14118:
14119: XLA_AE_LINES_PKG.ValidateCurrentLine;
14120: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14121:
14122: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14123: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14116: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14117:
14118:
14119: XLA_AE_LINES_PKG.ValidateCurrentLine;
14120: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14121:
14122: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14123: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14124: ,p_balance_type_code => l_balance_type_code);
14255: --
14256: -- bulk performance
14257: --
14258: l_balance_type_code VARCHAR2(1);
14259: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14260: l_log_module VARCHAR2(240);
14261:
14262: --
14263: -- Upgrade strategy
14327: ') = 'N'
14328: THEN
14329:
14330: --
14331: XLA_AE_LINES_PKG.SetNewLine;
14332:
14333: p_balance_type_code := l_balance_type_code;
14334: -- set the flag so later we will know whether the gain loss line needs to be created
14335:
14339:
14340: --
14341: -- bulk performance
14342: --
14343: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14344: p_header_num => 0); -- 4262811
14345: --
14346: -- set accounting line options
14347: --
14344: p_header_num => 0); -- 4262811
14345: --
14346: -- set accounting line options
14347: --
14348: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14349: p_natural_side_code => 'C'
14350: , p_gain_or_loss_flag => 'N'
14351: , p_gl_transfer_mode_code => 'S'
14352: , p_acct_entry_type_code => 'A'
14358: --
14359: --
14360: -- set accounting line type info
14361: --
14362: xla_ae_lines_pkg.SetAcctLineType
14363: (p_component_type => l_component_type
14364: ,p_event_type_code => l_event_type_code
14365: ,p_line_definition_owner_code => l_line_definition_owner_code
14366: ,p_line_definition_code => l_line_definition_code
14372: ,p_event_class_code => l_event_class_code);
14373: --
14374: -- set accounting class
14375: --
14376: xla_ae_lines_pkg.SetAcctClass(
14377: p_accounting_class_code => 'REVENUE'
14378: , p_ae_header_id => l_ae_header_id
14379: );
14380:
14380:
14381: --
14382: -- set rounding class
14383: --
14384: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14385: 'REVENUE';
14386:
14387: --
14388: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14384: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14385: 'REVENUE';
14386:
14387: --
14388: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14389: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14390: --
14391: -- bulk performance
14392: --
14385: 'REVENUE';
14386:
14387: --
14388: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14389: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14390: --
14391: -- bulk performance
14392: --
14393: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14389: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14390: --
14391: -- bulk performance
14392: --
14393: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14394:
14395: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14396: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14397:
14391: -- bulk performance
14392: --
14393: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14394:
14395: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14396: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14397:
14398: -- 4955764
14399: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14395: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14396: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14397:
14398: -- 4955764
14399: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14400: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
14401:
14402: -- 4458381 Public Sector Enh
14403:
14427: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
14428: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
14429: l_rec_acct_attrs.array_num_value(10) := p_source_43;
14430:
14431: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14432: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14433:
14434: ---------------------------------------------------------------------------------------------------------------
14435: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14428: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
14429: l_rec_acct_attrs.array_num_value(10) := p_source_43;
14430:
14431: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14432: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14433:
14434: ---------------------------------------------------------------------------------------------------------------
14435: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14436: ---------------------------------------------------------------------------------------------------------------
14431: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14432: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14433:
14434: ---------------------------------------------------------------------------------------------------------------
14435: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14436: ---------------------------------------------------------------------------------------------------------------
14437: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14438:
14439: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14433:
14434: ---------------------------------------------------------------------------------------------------------------
14435: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14436: ---------------------------------------------------------------------------------------------------------------
14437: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14438:
14439: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14440: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14441:
14435: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14436: ---------------------------------------------------------------------------------------------------------------
14437: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14438:
14439: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14440: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14441:
14442: IF xla_accounting_cache_pkg.GetValueChar
14443: (p_source_code => 'LEDGER_CATEGORY_CODE'
14436: ---------------------------------------------------------------------------------------------------------------
14437: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14438:
14439: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14440: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14441:
14442: IF xla_accounting_cache_pkg.GetValueChar
14443: (p_source_code => 'LEDGER_CATEGORY_CODE'
14444: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
14447: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
14448: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
14449: )
14450: THEN
14451: xla_ae_lines_pkg.BflowUpgEntry
14452: (p_business_method_code => l_bflow_method_code
14453: ,p_business_class_code => l_bflow_class_code
14454: ,p_balance_type => l_balance_type_code);
14455: ELSE
14487: , x_value_type_code => l_adr_value_type_code
14488: , p_side => 'NA'
14489: );
14490:
14491: xla_ae_lines_pkg.set_ccid(
14492: p_code_combination_id => l_ccid
14493: , p_value_type_code => l_adr_value_type_code
14494: , p_transaction_coa_id => l_adr_transaction_coa_id
14495: , p_accounting_coa_id => l_adr_accounting_coa_id
14523: xla_accounting_err_pkg.build_message
14524: (p_appli_s_name => 'XLA'
14525: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
14526: ,p_token_1 => 'LINE_NUMBER'
14527: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
14528: ,p_token_2 => 'LINE_TYPE_NAME'
14529: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
14530: l_component_type
14531: ,l_component_code
14559: --
14560: --
14561: ------------------------------------------------------------------------------------------------
14562: -- 4219869 Business Flow
14563: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14564: -- Prior Entry. Currently, the following code is always generated.
14565: ------------------------------------------------------------------------------------------------
14566: XLA_AE_LINES_PKG.ValidateCurrentLine;
14567:
14562: -- 4219869 Business Flow
14563: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14564: -- Prior Entry. Currently, the following code is always generated.
14565: ------------------------------------------------------------------------------------------------
14566: XLA_AE_LINES_PKG.ValidateCurrentLine;
14567:
14568: ------------------------------------------------------------------------------------
14569: -- 4219869 Business Flow
14570: -- Populated credit and debit amounts -- Need to generate this within IF
14568: ------------------------------------------------------------------------------------
14569: -- 4219869 Business Flow
14570: -- Populated credit and debit amounts -- Need to generate this within IF
14571: ------------------------------------------------------------------------------------
14572: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14573:
14574: ----------------------------------------------------------------------------------
14575: -- 4219869 Business Flow
14576: -- Update journal entry status -- Need to generate this within IF
14600: -- To allow MPA report to determine if it should generate report process
14601: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14602: ------------------------------------------------------------------------------------------
14603:
14604: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14605: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14606:
14607: --
14608: -- Update the line information that should be overwritten
14601: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14602: ------------------------------------------------------------------------------------------
14603:
14604: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14605: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14606:
14607: --
14608: -- Update the line information that should be overwritten
14609: --
14606:
14607: --
14608: -- Update the line information that should be overwritten
14609: --
14610: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14611: p_header_num => 1);
14612: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14613:
14614: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14608: -- Update the line information that should be overwritten
14609: --
14610: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14611: p_header_num => 1);
14612: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14613:
14614: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14615:
14616: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14610: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14611: p_header_num => 1);
14612: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14613:
14614: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14615:
14616: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14617: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14618: END IF;
14613:
14614: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14615:
14616: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14617: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14618: END IF;
14619:
14620: --
14621: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14620: --
14621: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14622: --
14623: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14624: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14625: ELSE
14626: ---------------------------------------------------------------------------------------------------
14627: -- 4262811a Switch Sign
14628: ---------------------------------------------------------------------------------------------------
14625: ELSE
14626: ---------------------------------------------------------------------------------------------------
14627: -- 4262811a Switch Sign
14628: ---------------------------------------------------------------------------------------------------
14629: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14630: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14626: ---------------------------------------------------------------------------------------------------
14627: -- 4262811a Switch Sign
14628: ---------------------------------------------------------------------------------------------------
14629: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14630: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14627: -- 4262811a Switch Sign
14628: ---------------------------------------------------------------------------------------------------
14629: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14630: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14635: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14628: ---------------------------------------------------------------------------------------------------
14629: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14630: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14635: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14636: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14629: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14630: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14635: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14636: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14637:
14631: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14635: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14636: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14637:
14638: END IF;
14639:
14632: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14633: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14634: -- 5132302
14635: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14636: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14637:
14638: END IF;
14639:
14640: -- 4955764
14637:
14638: END IF;
14639:
14640: -- 4955764
14641: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14642: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14643:
14644:
14645: XLA_AE_LINES_PKG.ValidateCurrentLine;
14641: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14642: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14643:
14644:
14645: XLA_AE_LINES_PKG.ValidateCurrentLine;
14646: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14647:
14648: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14649: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14642: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14643:
14644:
14645: XLA_AE_LINES_PKG.ValidateCurrentLine;
14646: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14647:
14648: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14649: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14650: ,p_balance_type_code => l_balance_type_code);
14782: --
14783: -- bulk performance
14784: --
14785: l_balance_type_code VARCHAR2(1);
14786: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14787: l_log_module VARCHAR2(240);
14788:
14789: --
14790: -- Upgrade strategy
14854: ') = 'N'
14855: THEN
14856:
14857: --
14858: XLA_AE_LINES_PKG.SetNewLine;
14859:
14860: p_balance_type_code := l_balance_type_code;
14861: -- set the flag so later we will know whether the gain loss line needs to be created
14862:
14866:
14867: --
14868: -- bulk performance
14869: --
14870: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14871: p_header_num => 0); -- 4262811
14872: --
14873: -- set accounting line options
14874: --
14871: p_header_num => 0); -- 4262811
14872: --
14873: -- set accounting line options
14874: --
14875: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14876: p_natural_side_code => 'C'
14877: , p_gain_or_loss_flag => 'N'
14878: , p_gl_transfer_mode_code => 'S'
14879: , p_acct_entry_type_code => 'A'
14885: --
14886: --
14887: -- set accounting line type info
14888: --
14889: xla_ae_lines_pkg.SetAcctLineType
14890: (p_component_type => l_component_type
14891: ,p_event_type_code => l_event_type_code
14892: ,p_line_definition_owner_code => l_line_definition_owner_code
14893: ,p_line_definition_code => l_line_definition_code
14899: ,p_event_class_code => l_event_class_code);
14900: --
14901: -- set accounting class
14902: --
14903: xla_ae_lines_pkg.SetAcctClass(
14904: p_accounting_class_code => 'REVENUE'
14905: , p_ae_header_id => l_ae_header_id
14906: );
14907:
14907:
14908: --
14909: -- set rounding class
14910: --
14911: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14912: 'REVENUE';
14913:
14914: --
14915: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14911: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14912: 'REVENUE';
14913:
14914: --
14915: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14916: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14917: --
14918: -- bulk performance
14919: --
14912: 'REVENUE';
14913:
14914: --
14915: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14916: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14917: --
14918: -- bulk performance
14919: --
14920: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14916: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14917: --
14918: -- bulk performance
14919: --
14920: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14921:
14922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14923: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14924:
14918: -- bulk performance
14919: --
14920: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14921:
14922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14923: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14924:
14925: -- 4955764
14926: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14922: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14923: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14924:
14925: -- 4955764
14926: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14927: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
14928:
14929: -- 4458381 Public Sector Enh
14930:
14954: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
14955: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
14956: l_rec_acct_attrs.array_num_value(10) := p_source_43;
14957:
14958: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14959: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14960:
14961: ---------------------------------------------------------------------------------------------------------------
14962: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14955: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
14956: l_rec_acct_attrs.array_num_value(10) := p_source_43;
14957:
14958: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14959: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14960:
14961: ---------------------------------------------------------------------------------------------------------------
14962: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14963: ---------------------------------------------------------------------------------------------------------------
14958: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14959: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14960:
14961: ---------------------------------------------------------------------------------------------------------------
14962: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14963: ---------------------------------------------------------------------------------------------------------------
14964: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14965:
14966: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14960:
14961: ---------------------------------------------------------------------------------------------------------------
14962: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14963: ---------------------------------------------------------------------------------------------------------------
14964: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14965:
14966: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14967: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14968:
14962: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14963: ---------------------------------------------------------------------------------------------------------------
14964: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14965:
14966: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14967: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14968:
14969: IF xla_accounting_cache_pkg.GetValueChar
14970: (p_source_code => 'LEDGER_CATEGORY_CODE'
14963: ---------------------------------------------------------------------------------------------------------------
14964: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14965:
14966: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14967: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14968:
14969: IF xla_accounting_cache_pkg.GetValueChar
14970: (p_source_code => 'LEDGER_CATEGORY_CODE'
14971: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
14974: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
14975: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
14976: )
14977: THEN
14978: xla_ae_lines_pkg.BflowUpgEntry
14979: (p_business_method_code => l_bflow_method_code
14980: ,p_business_class_code => l_bflow_class_code
14981: ,p_balance_type => l_balance_type_code);
14982: ELSE
15014: , x_value_type_code => l_adr_value_type_code
15015: , p_side => 'NA'
15016: );
15017:
15018: xla_ae_lines_pkg.set_ccid(
15019: p_code_combination_id => l_ccid
15020: , p_value_type_code => l_adr_value_type_code
15021: , p_transaction_coa_id => l_adr_transaction_coa_id
15022: , p_accounting_coa_id => l_adr_accounting_coa_id
15050: xla_accounting_err_pkg.build_message
15051: (p_appli_s_name => 'XLA'
15052: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15053: ,p_token_1 => 'LINE_NUMBER'
15054: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15055: ,p_token_2 => 'LINE_TYPE_NAME'
15056: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15057: l_component_type
15058: ,l_component_code
15086: --
15087: --
15088: ------------------------------------------------------------------------------------------------
15089: -- 4219869 Business Flow
15090: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15091: -- Prior Entry. Currently, the following code is always generated.
15092: ------------------------------------------------------------------------------------------------
15093: XLA_AE_LINES_PKG.ValidateCurrentLine;
15094:
15089: -- 4219869 Business Flow
15090: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15091: -- Prior Entry. Currently, the following code is always generated.
15092: ------------------------------------------------------------------------------------------------
15093: XLA_AE_LINES_PKG.ValidateCurrentLine;
15094:
15095: ------------------------------------------------------------------------------------
15096: -- 4219869 Business Flow
15097: -- Populated credit and debit amounts -- Need to generate this within IF
15095: ------------------------------------------------------------------------------------
15096: -- 4219869 Business Flow
15097: -- Populated credit and debit amounts -- Need to generate this within IF
15098: ------------------------------------------------------------------------------------
15099: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15100:
15101: ----------------------------------------------------------------------------------
15102: -- 4219869 Business Flow
15103: -- Update journal entry status -- Need to generate this within IF
15127: -- To allow MPA report to determine if it should generate report process
15128: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15129: ------------------------------------------------------------------------------------------
15130:
15131: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15132: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15133:
15134: --
15135: -- Update the line information that should be overwritten
15128: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15129: ------------------------------------------------------------------------------------------
15130:
15131: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15132: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15133:
15134: --
15135: -- Update the line information that should be overwritten
15136: --
15133:
15134: --
15135: -- Update the line information that should be overwritten
15136: --
15137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15138: p_header_num => 1);
15139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15140:
15141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15135: -- Update the line information that should be overwritten
15136: --
15137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15138: p_header_num => 1);
15139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15140:
15141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15142:
15143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15137: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15138: p_header_num => 1);
15139: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15140:
15141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15142:
15143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15144: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15145: END IF;
15140:
15141: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15142:
15143: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15144: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15145: END IF;
15146:
15147: --
15148: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15147: --
15148: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15149: --
15150: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15151: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15152: ELSE
15153: ---------------------------------------------------------------------------------------------------
15154: -- 4262811a Switch Sign
15155: ---------------------------------------------------------------------------------------------------
15152: ELSE
15153: ---------------------------------------------------------------------------------------------------
15154: -- 4262811a Switch Sign
15155: ---------------------------------------------------------------------------------------------------
15156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15153: ---------------------------------------------------------------------------------------------------
15154: -- 4262811a Switch Sign
15155: ---------------------------------------------------------------------------------------------------
15156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15154: -- 4262811a Switch Sign
15155: ---------------------------------------------------------------------------------------------------
15156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15155: ---------------------------------------------------------------------------------------------------
15156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15156: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15164:
15158: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15164:
15165: END IF;
15166:
15159: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15160: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15161: -- 5132302
15162: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15163: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15164:
15165: END IF;
15166:
15167: -- 4955764
15164:
15165: END IF;
15166:
15167: -- 4955764
15168: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15170:
15171:
15172: XLA_AE_LINES_PKG.ValidateCurrentLine;
15168: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15170:
15171:
15172: XLA_AE_LINES_PKG.ValidateCurrentLine;
15173: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15174:
15175: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15176: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15169: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15170:
15171:
15172: XLA_AE_LINES_PKG.ValidateCurrentLine;
15173: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15174:
15175: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15176: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15177: ,p_balance_type_code => l_balance_type_code);
15329: --
15330: -- bulk performance
15331: --
15332: l_balance_type_code VARCHAR2(1);
15333: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
15334: l_log_module VARCHAR2(240);
15335:
15336: --
15337: -- Upgrade strategy
15401: ') = 'Y'
15402: THEN
15403:
15404: --
15405: XLA_AE_LINES_PKG.SetNewLine;
15406:
15407: p_balance_type_code := l_balance_type_code;
15408: -- set the flag so later we will know whether the gain loss line needs to be created
15409:
15413:
15414: --
15415: -- bulk performance
15416: --
15417: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
15418: p_header_num => 0); -- 4262811
15419: --
15420: -- set accounting line options
15421: --
15418: p_header_num => 0); -- 4262811
15419: --
15420: -- set accounting line options
15421: --
15422: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
15423: p_natural_side_code => 'D'
15424: , p_gain_or_loss_flag => 'N'
15425: , p_gl_transfer_mode_code => 'S'
15426: , p_acct_entry_type_code => 'A'
15432: --
15433: --
15434: -- set accounting line type info
15435: --
15436: xla_ae_lines_pkg.SetAcctLineType
15437: (p_component_type => l_component_type
15438: ,p_event_type_code => l_event_type_code
15439: ,p_line_definition_owner_code => l_line_definition_owner_code
15440: ,p_line_definition_code => l_line_definition_code
15446: ,p_event_class_code => l_event_class_code);
15447: --
15448: -- set accounting class
15449: --
15450: xla_ae_lines_pkg.SetAcctClass(
15451: p_accounting_class_code => 'REVENUE'
15452: , p_ae_header_id => l_ae_header_id
15453: );
15454:
15454:
15455: --
15456: -- set rounding class
15457: --
15458: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15459: 'REVENUE';
15460:
15461: --
15462: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15458: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15459: 'REVENUE';
15460:
15461: --
15462: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15463: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15464: --
15465: -- bulk performance
15466: --
15459: 'REVENUE';
15460:
15461: --
15462: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15463: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15464: --
15465: -- bulk performance
15466: --
15467: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15463: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15464: --
15465: -- bulk performance
15466: --
15467: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15468:
15469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15470: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15471:
15465: -- bulk performance
15466: --
15467: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15468:
15469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15470: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15471:
15472: -- 4955764
15473: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15470: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15471:
15472: -- 4955764
15473: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15474: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
15475:
15476: -- 4458381 Public Sector Enh
15477:
15543: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
15544: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
15545: l_rec_acct_attrs.array_num_value(31) := p_source_43;
15546:
15547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15549:
15550: ---------------------------------------------------------------------------------------------------------------
15551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15544: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
15545: l_rec_acct_attrs.array_num_value(31) := p_source_43;
15546:
15547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15549:
15550: ---------------------------------------------------------------------------------------------------------------
15551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15552: ---------------------------------------------------------------------------------------------------------------
15547: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15548: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15549:
15550: ---------------------------------------------------------------------------------------------------------------
15551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15552: ---------------------------------------------------------------------------------------------------------------
15553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15554:
15555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15549:
15550: ---------------------------------------------------------------------------------------------------------------
15551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15552: ---------------------------------------------------------------------------------------------------------------
15553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15554:
15555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15557:
15551: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15552: ---------------------------------------------------------------------------------------------------------------
15553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15554:
15555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15557:
15558: IF xla_accounting_cache_pkg.GetValueChar
15559: (p_source_code => 'LEDGER_CATEGORY_CODE'
15552: ---------------------------------------------------------------------------------------------------------------
15553: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15554:
15555: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15556: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15557:
15558: IF xla_accounting_cache_pkg.GetValueChar
15559: (p_source_code => 'LEDGER_CATEGORY_CODE'
15560: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
15563: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
15564: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
15565: )
15566: THEN
15567: xla_ae_lines_pkg.BflowUpgEntry
15568: (p_business_method_code => l_bflow_method_code
15569: ,p_business_class_code => l_bflow_class_code
15570: ,p_balance_type => l_balance_type_code);
15571: ELSE
15569: ,p_business_class_code => l_bflow_class_code
15570: ,p_balance_type => l_balance_type_code);
15571: ELSE
15572: NULL;
15573: XLA_AE_LINES_PKG.business_flow_validation(
15574: p_business_method_code => l_bflow_method_code
15575: ,p_business_class_code => l_bflow_class_code
15576: ,p_inherit_description_flag => l_inherit_desc_flag);
15577: END IF;
15616: xla_accounting_err_pkg.build_message
15617: (p_appli_s_name => 'XLA'
15618: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15619: ,p_token_1 => 'LINE_NUMBER'
15620: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15621: ,p_token_2 => 'LINE_TYPE_NAME'
15622: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15623: l_component_type
15624: ,l_component_code
15652: --
15653: --
15654: ------------------------------------------------------------------------------------------------
15655: -- 4219869 Business Flow
15656: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15657: -- Prior Entry. Currently, the following code is always generated.
15658: ------------------------------------------------------------------------------------------------
15659: -- No ValidateCurrentLine for business flow method of Prior Entry
15660:
15661: ------------------------------------------------------------------------------------
15662: -- 4219869 Business Flow
15663: -- Populated credit and debit amounts -- Need to generate this within IF
15664: ------------------------------------------------------------------------------------
15665: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15666:
15667: ----------------------------------------------------------------------------------
15668: -- 4219869 Business Flow
15669: -- Update journal entry status -- Need to generate this within IF
15693: -- To allow MPA report to determine if it should generate report process
15694: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15695: ------------------------------------------------------------------------------------------
15696:
15697: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15698: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15699:
15700: --
15701: -- Update the line information that should be overwritten
15694: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15695: ------------------------------------------------------------------------------------------
15696:
15697: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15698: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15699:
15700: --
15701: -- Update the line information that should be overwritten
15702: --
15699:
15700: --
15701: -- Update the line information that should be overwritten
15702: --
15703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15704: p_header_num => 1);
15705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15706:
15707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15701: -- Update the line information that should be overwritten
15702: --
15703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15704: p_header_num => 1);
15705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15706:
15707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15708:
15709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15703: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15704: p_header_num => 1);
15705: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15706:
15707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15708:
15709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15710: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15711: END IF;
15706:
15707: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15708:
15709: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15710: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15711: END IF;
15712:
15713: --
15714: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15713: --
15714: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15715: --
15716: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15717: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15718: ELSE
15719: ---------------------------------------------------------------------------------------------------
15720: -- 4262811a Switch Sign
15721: ---------------------------------------------------------------------------------------------------
15718: ELSE
15719: ---------------------------------------------------------------------------------------------------
15720: -- 4262811a Switch Sign
15721: ---------------------------------------------------------------------------------------------------
15722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15719: ---------------------------------------------------------------------------------------------------
15720: -- 4262811a Switch Sign
15721: ---------------------------------------------------------------------------------------------------
15722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15720: -- 4262811a Switch Sign
15721: ---------------------------------------------------------------------------------------------------
15722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15721: ---------------------------------------------------------------------------------------------------
15722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15722: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15723: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15730:
15724: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15730:
15731: END IF;
15732:
15725: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15726: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15727: -- 5132302
15728: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15729: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15730:
15731: END IF;
15732:
15733: -- 4955764
15730:
15731: END IF;
15732:
15733: -- 4955764
15734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15736:
15737:
15738: XLA_AE_LINES_PKG.ValidateCurrentLine;
15734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15736:
15737:
15738: XLA_AE_LINES_PKG.ValidateCurrentLine;
15739: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15740:
15741: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15742: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15736:
15737:
15738: XLA_AE_LINES_PKG.ValidateCurrentLine;
15739: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15740:
15741: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15742: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15743: ,p_balance_type_code => l_balance_type_code);
15897: --
15898: -- bulk performance
15899: --
15900: l_balance_type_code VARCHAR2(1);
15901: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
15902: l_log_module VARCHAR2(240);
15903:
15904: --
15905: -- Upgrade strategy
15969: ') = 'Y'
15970: THEN
15971:
15972: --
15973: XLA_AE_LINES_PKG.SetNewLine;
15974:
15975: p_balance_type_code := l_balance_type_code;
15976: -- set the flag so later we will know whether the gain loss line needs to be created
15977:
15981:
15982: --
15983: -- bulk performance
15984: --
15985: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
15986: p_header_num => 0); -- 4262811
15987: --
15988: -- set accounting line options
15989: --
15986: p_header_num => 0); -- 4262811
15987: --
15988: -- set accounting line options
15989: --
15990: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
15991: p_natural_side_code => 'D'
15992: , p_gain_or_loss_flag => 'N'
15993: , p_gl_transfer_mode_code => 'S'
15994: , p_acct_entry_type_code => 'A'
16000: --
16001: --
16002: -- set accounting line type info
16003: --
16004: xla_ae_lines_pkg.SetAcctLineType
16005: (p_component_type => l_component_type
16006: ,p_event_type_code => l_event_type_code
16007: ,p_line_definition_owner_code => l_line_definition_owner_code
16008: ,p_line_definition_code => l_line_definition_code
16014: ,p_event_class_code => l_event_class_code);
16015: --
16016: -- set accounting class
16017: --
16018: xla_ae_lines_pkg.SetAcctClass(
16019: p_accounting_class_code => 'FEDERAL_REVENUE_ADJUSTMENT'
16020: , p_ae_header_id => l_ae_header_id
16021: );
16022:
16022:
16023: --
16024: -- set rounding class
16025: --
16026: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16027: 'FEDERAL_REVENUE_ADJUSTMENT';
16028:
16029: --
16030: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16026: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16027: 'FEDERAL_REVENUE_ADJUSTMENT';
16028:
16029: --
16030: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16031: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16032: --
16033: -- bulk performance
16034: --
16027: 'FEDERAL_REVENUE_ADJUSTMENT';
16028:
16029: --
16030: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16031: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16032: --
16033: -- bulk performance
16034: --
16035: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16031: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16032: --
16033: -- bulk performance
16034: --
16035: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16036:
16037: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16038: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16039:
16033: -- bulk performance
16034: --
16035: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16036:
16037: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16038: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16039:
16040: -- 4955764
16041: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16037: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16038: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16039:
16040: -- 4955764
16041: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16042: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16043:
16044: -- 4458381 Public Sector Enh
16045:
16111: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
16112: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
16113: l_rec_acct_attrs.array_num_value(31) := p_source_43;
16114:
16115: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16116: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16117:
16118: ---------------------------------------------------------------------------------------------------------------
16119: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16112: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
16113: l_rec_acct_attrs.array_num_value(31) := p_source_43;
16114:
16115: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16116: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16117:
16118: ---------------------------------------------------------------------------------------------------------------
16119: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16120: ---------------------------------------------------------------------------------------------------------------
16115: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16116: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16117:
16118: ---------------------------------------------------------------------------------------------------------------
16119: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16120: ---------------------------------------------------------------------------------------------------------------
16121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16122:
16123: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16117:
16118: ---------------------------------------------------------------------------------------------------------------
16119: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16120: ---------------------------------------------------------------------------------------------------------------
16121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16122:
16123: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16124: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16125:
16119: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16120: ---------------------------------------------------------------------------------------------------------------
16121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16122:
16123: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16124: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16125:
16126: IF xla_accounting_cache_pkg.GetValueChar
16127: (p_source_code => 'LEDGER_CATEGORY_CODE'
16120: ---------------------------------------------------------------------------------------------------------------
16121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16122:
16123: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16124: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16125:
16126: IF xla_accounting_cache_pkg.GetValueChar
16127: (p_source_code => 'LEDGER_CATEGORY_CODE'
16128: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16131: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16132: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16133: )
16134: THEN
16135: xla_ae_lines_pkg.BflowUpgEntry
16136: (p_business_method_code => l_bflow_method_code
16137: ,p_business_class_code => l_bflow_class_code
16138: ,p_balance_type => l_balance_type_code);
16139: ELSE
16171: , x_value_type_code => l_adr_value_type_code
16172: , p_side => 'NA'
16173: );
16174:
16175: xla_ae_lines_pkg.set_ccid(
16176: p_code_combination_id => l_ccid
16177: , p_value_type_code => l_adr_value_type_code
16178: , p_transaction_coa_id => l_adr_transaction_coa_id
16179: , p_accounting_coa_id => l_adr_accounting_coa_id
16203: );
16204:
16205: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
16206:
16207: xla_ae_lines_pkg.set_segment(
16208: p_to_segment_code => 'GL_ACCOUNT'
16209: , p_segment_value => l_segment
16210: , p_from_segment_code => l_adr_value_segment_code
16211: , p_from_combination_id => l_adr_value_combination_id
16247: xla_accounting_err_pkg.build_message
16248: (p_appli_s_name => 'XLA'
16249: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
16250: ,p_token_1 => 'LINE_NUMBER'
16251: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
16252: ,p_token_2 => 'LINE_TYPE_NAME'
16253: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
16254: l_component_type
16255: ,l_component_code
16283: --
16284: --
16285: ------------------------------------------------------------------------------------------------
16286: -- 4219869 Business Flow
16287: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16288: -- Prior Entry. Currently, the following code is always generated.
16289: ------------------------------------------------------------------------------------------------
16290: XLA_AE_LINES_PKG.ValidateCurrentLine;
16291:
16286: -- 4219869 Business Flow
16287: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16288: -- Prior Entry. Currently, the following code is always generated.
16289: ------------------------------------------------------------------------------------------------
16290: XLA_AE_LINES_PKG.ValidateCurrentLine;
16291:
16292: ------------------------------------------------------------------------------------
16293: -- 4219869 Business Flow
16294: -- Populated credit and debit amounts -- Need to generate this within IF
16292: ------------------------------------------------------------------------------------
16293: -- 4219869 Business Flow
16294: -- Populated credit and debit amounts -- Need to generate this within IF
16295: ------------------------------------------------------------------------------------
16296: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16297:
16298: ----------------------------------------------------------------------------------
16299: -- 4219869 Business Flow
16300: -- Update journal entry status -- Need to generate this within IF
16324: -- To allow MPA report to determine if it should generate report process
16325: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16326: ------------------------------------------------------------------------------------------
16327:
16328: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16329: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16330:
16331: --
16332: -- Update the line information that should be overwritten
16325: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16326: ------------------------------------------------------------------------------------------
16327:
16328: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16329: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16330:
16331: --
16332: -- Update the line information that should be overwritten
16333: --
16330:
16331: --
16332: -- Update the line information that should be overwritten
16333: --
16334: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16335: p_header_num => 1);
16336: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16337:
16338: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16332: -- Update the line information that should be overwritten
16333: --
16334: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16335: p_header_num => 1);
16336: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16337:
16338: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16339:
16340: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16334: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16335: p_header_num => 1);
16336: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16337:
16338: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16339:
16340: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16341: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16342: END IF;
16337:
16338: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16339:
16340: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16341: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16342: END IF;
16343:
16344: --
16345: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16344: --
16345: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16346: --
16347: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
16348: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
16349: ELSE
16350: ---------------------------------------------------------------------------------------------------
16351: -- 4262811a Switch Sign
16352: ---------------------------------------------------------------------------------------------------
16349: ELSE
16350: ---------------------------------------------------------------------------------------------------
16351: -- 4262811a Switch Sign
16352: ---------------------------------------------------------------------------------------------------
16353: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16354: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16350: ---------------------------------------------------------------------------------------------------
16351: -- 4262811a Switch Sign
16352: ---------------------------------------------------------------------------------------------------
16353: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16354: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16351: -- 4262811a Switch Sign
16352: ---------------------------------------------------------------------------------------------------
16353: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16354: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16359: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16352: ---------------------------------------------------------------------------------------------------
16353: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16354: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16359: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16360: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16353: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16354: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16359: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16360: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16361:
16355: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16359: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16360: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16361:
16362: END IF;
16363:
16356: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16357: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16358: -- 5132302
16359: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16360: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16361:
16362: END IF;
16363:
16364: -- 4955764
16361:
16362: END IF;
16363:
16364: -- 4955764
16365: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16366: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16367:
16368:
16369: XLA_AE_LINES_PKG.ValidateCurrentLine;
16365: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16366: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16367:
16368:
16369: XLA_AE_LINES_PKG.ValidateCurrentLine;
16370: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16371:
16372: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16373: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16366: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16367:
16368:
16369: XLA_AE_LINES_PKG.ValidateCurrentLine;
16370: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16371:
16372: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16373: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16374: ,p_balance_type_code => l_balance_type_code);
16500: --
16501: -- bulk performance
16502: --
16503: l_balance_type_code VARCHAR2(1);
16504: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16505: l_log_module VARCHAR2(240);
16506:
16507: --
16508: -- Upgrade strategy
16572: ') = 'N'
16573: THEN
16574:
16575: --
16576: XLA_AE_LINES_PKG.SetNewLine;
16577:
16578: p_balance_type_code := l_balance_type_code;
16579: -- set the flag so later we will know whether the gain loss line needs to be created
16580:
16584:
16585: --
16586: -- bulk performance
16587: --
16588: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
16589: p_header_num => 0); -- 4262811
16590: --
16591: -- set accounting line options
16592: --
16589: p_header_num => 0); -- 4262811
16590: --
16591: -- set accounting line options
16592: --
16593: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
16594: p_natural_side_code => 'C'
16595: , p_gain_or_loss_flag => 'N'
16596: , p_gl_transfer_mode_code => 'S'
16597: , p_acct_entry_type_code => 'A'
16603: --
16604: --
16605: -- set accounting line type info
16606: --
16607: xla_ae_lines_pkg.SetAcctLineType
16608: (p_component_type => l_component_type
16609: ,p_event_type_code => l_event_type_code
16610: ,p_line_definition_owner_code => l_line_definition_owner_code
16611: ,p_line_definition_code => l_line_definition_code
16617: ,p_event_class_code => l_event_class_code);
16618: --
16619: -- set accounting class
16620: --
16621: xla_ae_lines_pkg.SetAcctClass(
16622: p_accounting_class_code => 'FEDERAL_REVENUE'
16623: , p_ae_header_id => l_ae_header_id
16624: );
16625:
16625:
16626: --
16627: -- set rounding class
16628: --
16629: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16630: 'FEDERAL_REVENUE';
16631:
16632: --
16633: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16629: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16630: 'FEDERAL_REVENUE';
16631:
16632: --
16633: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16634: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16635: --
16636: -- bulk performance
16637: --
16630: 'FEDERAL_REVENUE';
16631:
16632: --
16633: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16634: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16635: --
16636: -- bulk performance
16637: --
16638: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16634: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16635: --
16636: -- bulk performance
16637: --
16638: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16639:
16640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16641: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16642:
16636: -- bulk performance
16637: --
16638: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16639:
16640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16641: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16642:
16643: -- 4955764
16644: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16641: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16642:
16643: -- 4955764
16644: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16645: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16646:
16647: -- 4458381 Public Sector Enh
16648:
16666: l_rec_acct_attrs.array_num_value(6) := to_char(p_source_51);
16667: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
16668: l_rec_acct_attrs.array_num_value(7) := p_source_43;
16669:
16670: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16671: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16672:
16673: ---------------------------------------------------------------------------------------------------------------
16674: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16667: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
16668: l_rec_acct_attrs.array_num_value(7) := p_source_43;
16669:
16670: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16671: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16672:
16673: ---------------------------------------------------------------------------------------------------------------
16674: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16675: ---------------------------------------------------------------------------------------------------------------
16670: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16671: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16672:
16673: ---------------------------------------------------------------------------------------------------------------
16674: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16675: ---------------------------------------------------------------------------------------------------------------
16676: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16677:
16678: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16672:
16673: ---------------------------------------------------------------------------------------------------------------
16674: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16675: ---------------------------------------------------------------------------------------------------------------
16676: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16677:
16678: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16679: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16680:
16674: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16675: ---------------------------------------------------------------------------------------------------------------
16676: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16677:
16678: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16679: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16680:
16681: IF xla_accounting_cache_pkg.GetValueChar
16682: (p_source_code => 'LEDGER_CATEGORY_CODE'
16675: ---------------------------------------------------------------------------------------------------------------
16676: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16677:
16678: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16679: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16680:
16681: IF xla_accounting_cache_pkg.GetValueChar
16682: (p_source_code => 'LEDGER_CATEGORY_CODE'
16683: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16686: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16687: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16688: )
16689: THEN
16690: xla_ae_lines_pkg.BflowUpgEntry
16691: (p_business_method_code => l_bflow_method_code
16692: ,p_business_class_code => l_bflow_class_code
16693: ,p_balance_type => l_balance_type_code);
16694: ELSE
16726: , x_value_type_code => l_adr_value_type_code
16727: , p_side => 'NA'
16728: );
16729:
16730: xla_ae_lines_pkg.set_ccid(
16731: p_code_combination_id => l_ccid
16732: , p_value_type_code => l_adr_value_type_code
16733: , p_transaction_coa_id => l_adr_transaction_coa_id
16734: , p_accounting_coa_id => l_adr_accounting_coa_id
16758: );
16759:
16760: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
16761:
16762: xla_ae_lines_pkg.set_segment(
16763: p_to_segment_code => 'GL_ACCOUNT'
16764: , p_segment_value => l_segment
16765: , p_from_segment_code => l_adr_value_segment_code
16766: , p_from_combination_id => l_adr_value_combination_id
16802: xla_accounting_err_pkg.build_message
16803: (p_appli_s_name => 'XLA'
16804: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
16805: ,p_token_1 => 'LINE_NUMBER'
16806: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
16807: ,p_token_2 => 'LINE_TYPE_NAME'
16808: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
16809: l_component_type
16810: ,l_component_code
16838: --
16839: --
16840: ------------------------------------------------------------------------------------------------
16841: -- 4219869 Business Flow
16842: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16843: -- Prior Entry. Currently, the following code is always generated.
16844: ------------------------------------------------------------------------------------------------
16845: XLA_AE_LINES_PKG.ValidateCurrentLine;
16846:
16841: -- 4219869 Business Flow
16842: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16843: -- Prior Entry. Currently, the following code is always generated.
16844: ------------------------------------------------------------------------------------------------
16845: XLA_AE_LINES_PKG.ValidateCurrentLine;
16846:
16847: ------------------------------------------------------------------------------------
16848: -- 4219869 Business Flow
16849: -- Populated credit and debit amounts -- Need to generate this within IF
16847: ------------------------------------------------------------------------------------
16848: -- 4219869 Business Flow
16849: -- Populated credit and debit amounts -- Need to generate this within IF
16850: ------------------------------------------------------------------------------------
16851: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16852:
16853: ----------------------------------------------------------------------------------
16854: -- 4219869 Business Flow
16855: -- Update journal entry status -- Need to generate this within IF
16879: -- To allow MPA report to determine if it should generate report process
16880: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16881: ------------------------------------------------------------------------------------------
16882:
16883: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16884: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16885:
16886: --
16887: -- Update the line information that should be overwritten
16880: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16881: ------------------------------------------------------------------------------------------
16882:
16883: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16884: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16885:
16886: --
16887: -- Update the line information that should be overwritten
16888: --
16885:
16886: --
16887: -- Update the line information that should be overwritten
16888: --
16889: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16890: p_header_num => 1);
16891: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16892:
16893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16887: -- Update the line information that should be overwritten
16888: --
16889: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16890: p_header_num => 1);
16891: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16892:
16893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16894:
16895: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16889: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16890: p_header_num => 1);
16891: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16892:
16893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16894:
16895: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16896: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16897: END IF;
16892:
16893: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16894:
16895: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16896: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16897: END IF;
16898:
16899: --
16900: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16899: --
16900: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16901: --
16902: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
16903: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
16904: ELSE
16905: ---------------------------------------------------------------------------------------------------
16906: -- 4262811a Switch Sign
16907: ---------------------------------------------------------------------------------------------------
16904: ELSE
16905: ---------------------------------------------------------------------------------------------------
16906: -- 4262811a Switch Sign
16907: ---------------------------------------------------------------------------------------------------
16908: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16905: ---------------------------------------------------------------------------------------------------
16906: -- 4262811a Switch Sign
16907: ---------------------------------------------------------------------------------------------------
16908: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16906: -- 4262811a Switch Sign
16907: ---------------------------------------------------------------------------------------------------
16908: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16914: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16907: ---------------------------------------------------------------------------------------------------
16908: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16914: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16915: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16908: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16909: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16914: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16915: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16916:
16910: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16914: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16915: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16916:
16917: END IF;
16918:
16911: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16912: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16913: -- 5132302
16914: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16915: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16916:
16917: END IF;
16918:
16919: -- 4955764
16916:
16917: END IF;
16918:
16919: -- 4955764
16920: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16921: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16922:
16923:
16924: XLA_AE_LINES_PKG.ValidateCurrentLine;
16920: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16921: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16922:
16923:
16924: XLA_AE_LINES_PKG.ValidateCurrentLine;
16925: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16926:
16927: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16928: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16921: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16922:
16923:
16924: XLA_AE_LINES_PKG.ValidateCurrentLine;
16925: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16926:
16927: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16928: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16929: ,p_balance_type_code => l_balance_type_code);
17061: --
17062: -- bulk performance
17063: --
17064: l_balance_type_code VARCHAR2(1);
17065: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
17066: l_log_module VARCHAR2(240);
17067:
17068: --
17069: -- Upgrade strategy
17133: ') = 'N'
17134: THEN
17135:
17136: --
17137: XLA_AE_LINES_PKG.SetNewLine;
17138:
17139: p_balance_type_code := l_balance_type_code;
17140: -- set the flag so later we will know whether the gain loss line needs to be created
17141:
17145:
17146: --
17147: -- bulk performance
17148: --
17149: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
17150: p_header_num => 0); -- 4262811
17151: --
17152: -- set accounting line options
17153: --
17150: p_header_num => 0); -- 4262811
17151: --
17152: -- set accounting line options
17153: --
17154: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
17155: p_natural_side_code => 'D'
17156: , p_gain_or_loss_flag => 'N'
17157: , p_gl_transfer_mode_code => 'S'
17158: , p_acct_entry_type_code => 'A'
17164: --
17165: --
17166: -- set accounting line type info
17167: --
17168: xla_ae_lines_pkg.SetAcctLineType
17169: (p_component_type => l_component_type
17170: ,p_event_type_code => l_event_type_code
17171: ,p_line_definition_owner_code => l_line_definition_owner_code
17172: ,p_line_definition_code => l_line_definition_code
17178: ,p_event_class_code => l_event_class_code);
17179: --
17180: -- set accounting class
17181: --
17182: xla_ae_lines_pkg.SetAcctClass(
17183: p_accounting_class_code => 'EVENT_WO_REVENUE'
17184: , p_ae_header_id => l_ae_header_id
17185: );
17186:
17186:
17187: --
17188: -- set rounding class
17189: --
17190: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17191: 'EVENT_WO_REVENUE';
17192:
17193: --
17194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17190: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17191: 'EVENT_WO_REVENUE';
17192:
17193: --
17194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17196: --
17197: -- bulk performance
17198: --
17191: 'EVENT_WO_REVENUE';
17192:
17193: --
17194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17196: --
17197: -- bulk performance
17198: --
17199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17196: --
17197: -- bulk performance
17198: --
17199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17200:
17201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17203:
17197: -- bulk performance
17198: --
17199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17200:
17201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17203:
17204: -- 4955764
17205: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17203:
17204: -- 4955764
17205: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17206: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
17207:
17208: -- 4458381 Public Sector Enh
17209:
17233: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
17234: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
17235: l_rec_acct_attrs.array_num_value(10) := p_source_43;
17236:
17237: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17238: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17239:
17240: ---------------------------------------------------------------------------------------------------------------
17241: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17234: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
17235: l_rec_acct_attrs.array_num_value(10) := p_source_43;
17236:
17237: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17238: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17239:
17240: ---------------------------------------------------------------------------------------------------------------
17241: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17242: ---------------------------------------------------------------------------------------------------------------
17237: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17238: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17239:
17240: ---------------------------------------------------------------------------------------------------------------
17241: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17242: ---------------------------------------------------------------------------------------------------------------
17243: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17244:
17245: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17239:
17240: ---------------------------------------------------------------------------------------------------------------
17241: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17242: ---------------------------------------------------------------------------------------------------------------
17243: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17244:
17245: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17246: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17247:
17241: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17242: ---------------------------------------------------------------------------------------------------------------
17243: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17244:
17245: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17246: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17247:
17248: IF xla_accounting_cache_pkg.GetValueChar
17249: (p_source_code => 'LEDGER_CATEGORY_CODE'
17242: ---------------------------------------------------------------------------------------------------------------
17243: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17244:
17245: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17246: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17247:
17248: IF xla_accounting_cache_pkg.GetValueChar
17249: (p_source_code => 'LEDGER_CATEGORY_CODE'
17250: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
17253: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
17254: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
17255: )
17256: THEN
17257: xla_ae_lines_pkg.BflowUpgEntry
17258: (p_business_method_code => l_bflow_method_code
17259: ,p_business_class_code => l_bflow_class_code
17260: ,p_balance_type => l_balance_type_code);
17261: ELSE
17293: , x_value_type_code => l_adr_value_type_code
17294: , p_side => 'NA'
17295: );
17296:
17297: xla_ae_lines_pkg.set_ccid(
17298: p_code_combination_id => l_ccid
17299: , p_value_type_code => l_adr_value_type_code
17300: , p_transaction_coa_id => l_adr_transaction_coa_id
17301: , p_accounting_coa_id => l_adr_accounting_coa_id
17329: xla_accounting_err_pkg.build_message
17330: (p_appli_s_name => 'XLA'
17331: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
17332: ,p_token_1 => 'LINE_NUMBER'
17333: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
17334: ,p_token_2 => 'LINE_TYPE_NAME'
17335: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
17336: l_component_type
17337: ,l_component_code
17365: --
17366: --
17367: ------------------------------------------------------------------------------------------------
17368: -- 4219869 Business Flow
17369: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17370: -- Prior Entry. Currently, the following code is always generated.
17371: ------------------------------------------------------------------------------------------------
17372: XLA_AE_LINES_PKG.ValidateCurrentLine;
17373:
17368: -- 4219869 Business Flow
17369: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17370: -- Prior Entry. Currently, the following code is always generated.
17371: ------------------------------------------------------------------------------------------------
17372: XLA_AE_LINES_PKG.ValidateCurrentLine;
17373:
17374: ------------------------------------------------------------------------------------
17375: -- 4219869 Business Flow
17376: -- Populated credit and debit amounts -- Need to generate this within IF
17374: ------------------------------------------------------------------------------------
17375: -- 4219869 Business Flow
17376: -- Populated credit and debit amounts -- Need to generate this within IF
17377: ------------------------------------------------------------------------------------
17378: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17379:
17380: ----------------------------------------------------------------------------------
17381: -- 4219869 Business Flow
17382: -- Update journal entry status -- Need to generate this within IF
17406: -- To allow MPA report to determine if it should generate report process
17407: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17408: ------------------------------------------------------------------------------------------
17409:
17410: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17411: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17412:
17413: --
17414: -- Update the line information that should be overwritten
17407: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17408: ------------------------------------------------------------------------------------------
17409:
17410: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17411: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17412:
17413: --
17414: -- Update the line information that should be overwritten
17415: --
17412:
17413: --
17414: -- Update the line information that should be overwritten
17415: --
17416: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17417: p_header_num => 1);
17418: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17419:
17420: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17414: -- Update the line information that should be overwritten
17415: --
17416: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17417: p_header_num => 1);
17418: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17419:
17420: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17421:
17422: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17416: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17417: p_header_num => 1);
17418: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17419:
17420: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17421:
17422: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17423: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17424: END IF;
17419:
17420: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17421:
17422: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17423: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17424: END IF;
17425:
17426: --
17427: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17426: --
17427: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17428: --
17429: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17430: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17431: ELSE
17432: ---------------------------------------------------------------------------------------------------
17433: -- 4262811a Switch Sign
17434: ---------------------------------------------------------------------------------------------------
17431: ELSE
17432: ---------------------------------------------------------------------------------------------------
17433: -- 4262811a Switch Sign
17434: ---------------------------------------------------------------------------------------------------
17435: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17432: ---------------------------------------------------------------------------------------------------
17433: -- 4262811a Switch Sign
17434: ---------------------------------------------------------------------------------------------------
17435: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17433: -- 4262811a Switch Sign
17434: ---------------------------------------------------------------------------------------------------
17435: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17434: ---------------------------------------------------------------------------------------------------
17435: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17442: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17435: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17442: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17443:
17437: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17442: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17443:
17444: END IF;
17445:
17438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17439: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17440: -- 5132302
17441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17442: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17443:
17444: END IF;
17445:
17446: -- 4955764
17443:
17444: END IF;
17445:
17446: -- 4955764
17447: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17448: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17449:
17450:
17451: XLA_AE_LINES_PKG.ValidateCurrentLine;
17447: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17448: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17449:
17450:
17451: XLA_AE_LINES_PKG.ValidateCurrentLine;
17452: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17453:
17454: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17455: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17448: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17449:
17450:
17451: XLA_AE_LINES_PKG.ValidateCurrentLine;
17452: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17453:
17454: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17455: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17456: ,p_balance_type_code => l_balance_type_code);
17608: --
17609: -- bulk performance
17610: --
17611: l_balance_type_code VARCHAR2(1);
17612: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
17613: l_log_module VARCHAR2(240);
17614:
17615: --
17616: -- Upgrade strategy
17680: ') = 'Y'
17681: THEN
17682:
17683: --
17684: XLA_AE_LINES_PKG.SetNewLine;
17685:
17686: p_balance_type_code := l_balance_type_code;
17687: -- set the flag so later we will know whether the gain loss line needs to be created
17688:
17692:
17693: --
17694: -- bulk performance
17695: --
17696: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
17697: p_header_num => 0); -- 4262811
17698: --
17699: -- set accounting line options
17700: --
17697: p_header_num => 0); -- 4262811
17698: --
17699: -- set accounting line options
17700: --
17701: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
17702: p_natural_side_code => 'C'
17703: , p_gain_or_loss_flag => 'N'
17704: , p_gl_transfer_mode_code => 'S'
17705: , p_acct_entry_type_code => 'A'
17711: --
17712: --
17713: -- set accounting line type info
17714: --
17715: xla_ae_lines_pkg.SetAcctLineType
17716: (p_component_type => l_component_type
17717: ,p_event_type_code => l_event_type_code
17718: ,p_line_definition_owner_code => l_line_definition_owner_code
17719: ,p_line_definition_code => l_line_definition_code
17725: ,p_event_class_code => l_event_class_code);
17726: --
17727: -- set accounting class
17728: --
17729: xla_ae_lines_pkg.SetAcctClass(
17730: p_accounting_class_code => 'EVENT_WO_REVENUE'
17731: , p_ae_header_id => l_ae_header_id
17732: );
17733:
17733:
17734: --
17735: -- set rounding class
17736: --
17737: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17738: 'EVENT_WO_REVENUE';
17739:
17740: --
17741: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17737: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17738: 'EVENT_WO_REVENUE';
17739:
17740: --
17741: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17742: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17743: --
17744: -- bulk performance
17745: --
17738: 'EVENT_WO_REVENUE';
17739:
17740: --
17741: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17742: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17743: --
17744: -- bulk performance
17745: --
17746: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17742: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17743: --
17744: -- bulk performance
17745: --
17746: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17747:
17748: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17749: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17750:
17744: -- bulk performance
17745: --
17746: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17747:
17748: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17749: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17750:
17751: -- 4955764
17752: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17748: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17749: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17750:
17751: -- 4955764
17752: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17753: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
17754:
17755: -- 4458381 Public Sector Enh
17756:
17822: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
17823: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
17824: l_rec_acct_attrs.array_num_value(31) := p_source_43;
17825:
17826: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17827: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17828:
17829: ---------------------------------------------------------------------------------------------------------------
17830: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17823: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
17824: l_rec_acct_attrs.array_num_value(31) := p_source_43;
17825:
17826: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17827: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17828:
17829: ---------------------------------------------------------------------------------------------------------------
17830: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17831: ---------------------------------------------------------------------------------------------------------------
17826: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17827: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17828:
17829: ---------------------------------------------------------------------------------------------------------------
17830: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17831: ---------------------------------------------------------------------------------------------------------------
17832: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17833:
17834: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17828:
17829: ---------------------------------------------------------------------------------------------------------------
17830: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17831: ---------------------------------------------------------------------------------------------------------------
17832: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17833:
17834: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17835: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17836:
17830: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17831: ---------------------------------------------------------------------------------------------------------------
17832: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17833:
17834: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17835: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17836:
17837: IF xla_accounting_cache_pkg.GetValueChar
17838: (p_source_code => 'LEDGER_CATEGORY_CODE'
17831: ---------------------------------------------------------------------------------------------------------------
17832: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17833:
17834: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17835: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17836:
17837: IF xla_accounting_cache_pkg.GetValueChar
17838: (p_source_code => 'LEDGER_CATEGORY_CODE'
17839: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
17842: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
17843: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
17844: )
17845: THEN
17846: xla_ae_lines_pkg.BflowUpgEntry
17847: (p_business_method_code => l_bflow_method_code
17848: ,p_business_class_code => l_bflow_class_code
17849: ,p_balance_type => l_balance_type_code);
17850: ELSE
17848: ,p_business_class_code => l_bflow_class_code
17849: ,p_balance_type => l_balance_type_code);
17850: ELSE
17851: NULL;
17852: XLA_AE_LINES_PKG.business_flow_validation(
17853: p_business_method_code => l_bflow_method_code
17854: ,p_business_class_code => l_bflow_class_code
17855: ,p_inherit_description_flag => l_inherit_desc_flag);
17856: END IF;
17895: xla_accounting_err_pkg.build_message
17896: (p_appli_s_name => 'XLA'
17897: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
17898: ,p_token_1 => 'LINE_NUMBER'
17899: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
17900: ,p_token_2 => 'LINE_TYPE_NAME'
17901: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
17902: l_component_type
17903: ,l_component_code
17931: --
17932: --
17933: ------------------------------------------------------------------------------------------------
17934: -- 4219869 Business Flow
17935: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17936: -- Prior Entry. Currently, the following code is always generated.
17937: ------------------------------------------------------------------------------------------------
17938: -- No ValidateCurrentLine for business flow method of Prior Entry
17939:
17940: ------------------------------------------------------------------------------------
17941: -- 4219869 Business Flow
17942: -- Populated credit and debit amounts -- Need to generate this within IF
17943: ------------------------------------------------------------------------------------
17944: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17945:
17946: ----------------------------------------------------------------------------------
17947: -- 4219869 Business Flow
17948: -- Update journal entry status -- Need to generate this within IF
17972: -- To allow MPA report to determine if it should generate report process
17973: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17974: ------------------------------------------------------------------------------------------
17975:
17976: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17977: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17978:
17979: --
17980: -- Update the line information that should be overwritten
17973: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17974: ------------------------------------------------------------------------------------------
17975:
17976: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17977: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17978:
17979: --
17980: -- Update the line information that should be overwritten
17981: --
17978:
17979: --
17980: -- Update the line information that should be overwritten
17981: --
17982: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17983: p_header_num => 1);
17984: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17985:
17986: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17980: -- Update the line information that should be overwritten
17981: --
17982: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17983: p_header_num => 1);
17984: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17985:
17986: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17987:
17988: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17982: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17983: p_header_num => 1);
17984: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17985:
17986: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17987:
17988: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17989: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17990: END IF;
17985:
17986: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17987:
17988: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17989: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17990: END IF;
17991:
17992: --
17993: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17992: --
17993: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17994: --
17995: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17996: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17997: ELSE
17998: ---------------------------------------------------------------------------------------------------
17999: -- 4262811a Switch Sign
18000: ---------------------------------------------------------------------------------------------------
17997: ELSE
17998: ---------------------------------------------------------------------------------------------------
17999: -- 4262811a Switch Sign
18000: ---------------------------------------------------------------------------------------------------
18001: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18002: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17998: ---------------------------------------------------------------------------------------------------
17999: -- 4262811a Switch Sign
18000: ---------------------------------------------------------------------------------------------------
18001: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18002: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
17999: -- 4262811a Switch Sign
18000: ---------------------------------------------------------------------------------------------------
18001: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18002: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
18007: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18000: ---------------------------------------------------------------------------------------------------
18001: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18002: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
18007: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18008: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18001: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18002: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
18007: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18008: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18009:
18003: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
18007: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18008: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18009:
18010: END IF;
18011:
18004: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18005: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18006: -- 5132302
18007: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18008: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18009:
18010: END IF;
18011:
18012: -- 4955764
18009:
18010: END IF;
18011:
18012: -- 4955764
18013: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18014: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18015:
18016:
18017: XLA_AE_LINES_PKG.ValidateCurrentLine;
18013: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18014: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18015:
18016:
18017: XLA_AE_LINES_PKG.ValidateCurrentLine;
18018: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18019:
18020: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18021: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18014: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18015:
18016:
18017: XLA_AE_LINES_PKG.ValidateCurrentLine;
18018: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18019:
18020: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18021: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18022: ,p_balance_type_code => l_balance_type_code);
18176: --
18177: -- bulk performance
18178: --
18179: l_balance_type_code VARCHAR2(1);
18180: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18181: l_log_module VARCHAR2(240);
18182:
18183: --
18184: -- Upgrade strategy
18248: ') = 'Y'
18249: THEN
18250:
18251: --
18252: XLA_AE_LINES_PKG.SetNewLine;
18253:
18254: p_balance_type_code := l_balance_type_code;
18255: -- set the flag so later we will know whether the gain loss line needs to be created
18256:
18260:
18261: --
18262: -- bulk performance
18263: --
18264: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
18265: p_header_num => 0); -- 4262811
18266: --
18267: -- set accounting line options
18268: --
18265: p_header_num => 0); -- 4262811
18266: --
18267: -- set accounting line options
18268: --
18269: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
18270: p_natural_side_code => 'C'
18271: , p_gain_or_loss_flag => 'N'
18272: , p_gl_transfer_mode_code => 'S'
18273: , p_acct_entry_type_code => 'A'
18279: --
18280: --
18281: -- set accounting line type info
18282: --
18283: xla_ae_lines_pkg.SetAcctLineType
18284: (p_component_type => l_component_type
18285: ,p_event_type_code => l_event_type_code
18286: ,p_line_definition_owner_code => l_line_definition_owner_code
18287: ,p_line_definition_code => l_line_definition_code
18293: ,p_event_class_code => l_event_class_code);
18294: --
18295: -- set accounting class
18296: --
18297: xla_ae_lines_pkg.SetAcctClass(
18298: p_accounting_class_code => 'FEDERAL_REVENUE_ADJUSTMENT'
18299: , p_ae_header_id => l_ae_header_id
18300: );
18301:
18301:
18302: --
18303: -- set rounding class
18304: --
18305: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18306: 'FEDERAL_REVENUE_ADJUSTMENT';
18307:
18308: --
18309: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18305: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18306: 'FEDERAL_REVENUE_ADJUSTMENT';
18307:
18308: --
18309: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18310: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18311: --
18312: -- bulk performance
18313: --
18306: 'FEDERAL_REVENUE_ADJUSTMENT';
18307:
18308: --
18309: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18310: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18311: --
18312: -- bulk performance
18313: --
18314: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18310: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18311: --
18312: -- bulk performance
18313: --
18314: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18315:
18316: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18317: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18318:
18312: -- bulk performance
18313: --
18314: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18315:
18316: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18317: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18318:
18319: -- 4955764
18320: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18316: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18317: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18318:
18319: -- 4955764
18320: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18321: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18322:
18323: -- 4458381 Public Sector Enh
18324:
18390: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
18391: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
18392: l_rec_acct_attrs.array_num_value(31) := p_source_43;
18393:
18394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18396:
18397: ---------------------------------------------------------------------------------------------------------------
18398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18391: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
18392: l_rec_acct_attrs.array_num_value(31) := p_source_43;
18393:
18394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18396:
18397: ---------------------------------------------------------------------------------------------------------------
18398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18399: ---------------------------------------------------------------------------------------------------------------
18394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18396:
18397: ---------------------------------------------------------------------------------------------------------------
18398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18399: ---------------------------------------------------------------------------------------------------------------
18400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18401:
18402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18396:
18397: ---------------------------------------------------------------------------------------------------------------
18398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18399: ---------------------------------------------------------------------------------------------------------------
18400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18401:
18402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18404:
18398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18399: ---------------------------------------------------------------------------------------------------------------
18400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18401:
18402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18404:
18405: IF xla_accounting_cache_pkg.GetValueChar
18406: (p_source_code => 'LEDGER_CATEGORY_CODE'
18399: ---------------------------------------------------------------------------------------------------------------
18400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18401:
18402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18404:
18405: IF xla_accounting_cache_pkg.GetValueChar
18406: (p_source_code => 'LEDGER_CATEGORY_CODE'
18407: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18410: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18411: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18412: )
18413: THEN
18414: xla_ae_lines_pkg.BflowUpgEntry
18415: (p_business_method_code => l_bflow_method_code
18416: ,p_business_class_code => l_bflow_class_code
18417: ,p_balance_type => l_balance_type_code);
18418: ELSE
18450: , x_value_type_code => l_adr_value_type_code
18451: , p_side => 'NA'
18452: );
18453:
18454: xla_ae_lines_pkg.set_ccid(
18455: p_code_combination_id => l_ccid
18456: , p_value_type_code => l_adr_value_type_code
18457: , p_transaction_coa_id => l_adr_transaction_coa_id
18458: , p_accounting_coa_id => l_adr_accounting_coa_id
18482: );
18483:
18484: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
18485:
18486: xla_ae_lines_pkg.set_segment(
18487: p_to_segment_code => 'GL_ACCOUNT'
18488: , p_segment_value => l_segment
18489: , p_from_segment_code => l_adr_value_segment_code
18490: , p_from_combination_id => l_adr_value_combination_id
18526: xla_accounting_err_pkg.build_message
18527: (p_appli_s_name => 'XLA'
18528: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
18529: ,p_token_1 => 'LINE_NUMBER'
18530: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
18531: ,p_token_2 => 'LINE_TYPE_NAME'
18532: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
18533: l_component_type
18534: ,l_component_code
18562: --
18563: --
18564: ------------------------------------------------------------------------------------------------
18565: -- 4219869 Business Flow
18566: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18567: -- Prior Entry. Currently, the following code is always generated.
18568: ------------------------------------------------------------------------------------------------
18569: XLA_AE_LINES_PKG.ValidateCurrentLine;
18570:
18565: -- 4219869 Business Flow
18566: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18567: -- Prior Entry. Currently, the following code is always generated.
18568: ------------------------------------------------------------------------------------------------
18569: XLA_AE_LINES_PKG.ValidateCurrentLine;
18570:
18571: ------------------------------------------------------------------------------------
18572: -- 4219869 Business Flow
18573: -- Populated credit and debit amounts -- Need to generate this within IF
18571: ------------------------------------------------------------------------------------
18572: -- 4219869 Business Flow
18573: -- Populated credit and debit amounts -- Need to generate this within IF
18574: ------------------------------------------------------------------------------------
18575: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18576:
18577: ----------------------------------------------------------------------------------
18578: -- 4219869 Business Flow
18579: -- Update journal entry status -- Need to generate this within IF
18603: -- To allow MPA report to determine if it should generate report process
18604: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18605: ------------------------------------------------------------------------------------------
18606:
18607: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18608: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18609:
18610: --
18611: -- Update the line information that should be overwritten
18604: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18605: ------------------------------------------------------------------------------------------
18606:
18607: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18608: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18609:
18610: --
18611: -- Update the line information that should be overwritten
18612: --
18609:
18610: --
18611: -- Update the line information that should be overwritten
18612: --
18613: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18614: p_header_num => 1);
18615: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18616:
18617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18611: -- Update the line information that should be overwritten
18612: --
18613: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18614: p_header_num => 1);
18615: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18616:
18617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18618:
18619: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18613: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18614: p_header_num => 1);
18615: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18616:
18617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18618:
18619: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18620: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18621: END IF;
18616:
18617: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18618:
18619: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18620: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18621: END IF;
18622:
18623: --
18624: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18623: --
18624: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18625: --
18626: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
18627: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
18628: ELSE
18629: ---------------------------------------------------------------------------------------------------
18630: -- 4262811a Switch Sign
18631: ---------------------------------------------------------------------------------------------------
18628: ELSE
18629: ---------------------------------------------------------------------------------------------------
18630: -- 4262811a Switch Sign
18631: ---------------------------------------------------------------------------------------------------
18632: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18633: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18629: ---------------------------------------------------------------------------------------------------
18630: -- 4262811a Switch Sign
18631: ---------------------------------------------------------------------------------------------------
18632: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18633: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18630: -- 4262811a Switch Sign
18631: ---------------------------------------------------------------------------------------------------
18632: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18633: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18638: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18631: ---------------------------------------------------------------------------------------------------
18632: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18633: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18638: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18639: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18632: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18633: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18638: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18639: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18640:
18634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18638: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18639: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18640:
18641: END IF;
18642:
18635: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18636: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18637: -- 5132302
18638: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18639: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18640:
18641: END IF;
18642:
18643: -- 4955764
18640:
18641: END IF;
18642:
18643: -- 4955764
18644: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18645: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18646:
18647:
18648: XLA_AE_LINES_PKG.ValidateCurrentLine;
18644: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18645: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18646:
18647:
18648: XLA_AE_LINES_PKG.ValidateCurrentLine;
18649: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18650:
18651: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18652: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18645: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18646:
18647:
18648: XLA_AE_LINES_PKG.ValidateCurrentLine;
18649: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18650:
18651: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18652: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18653: ,p_balance_type_code => l_balance_type_code);
18779: --
18780: -- bulk performance
18781: --
18782: l_balance_type_code VARCHAR2(1);
18783: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18784: l_log_module VARCHAR2(240);
18785:
18786: --
18787: -- Upgrade strategy
18851: ') = 'N'
18852: THEN
18853:
18854: --
18855: XLA_AE_LINES_PKG.SetNewLine;
18856:
18857: p_balance_type_code := l_balance_type_code;
18858: -- set the flag so later we will know whether the gain loss line needs to be created
18859:
18863:
18864: --
18865: -- bulk performance
18866: --
18867: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
18868: p_header_num => 0); -- 4262811
18869: --
18870: -- set accounting line options
18871: --
18868: p_header_num => 0); -- 4262811
18869: --
18870: -- set accounting line options
18871: --
18872: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
18873: p_natural_side_code => 'D'
18874: , p_gain_or_loss_flag => 'N'
18875: , p_gl_transfer_mode_code => 'S'
18876: , p_acct_entry_type_code => 'A'
18882: --
18883: --
18884: -- set accounting line type info
18885: --
18886: xla_ae_lines_pkg.SetAcctLineType
18887: (p_component_type => l_component_type
18888: ,p_event_type_code => l_event_type_code
18889: ,p_line_definition_owner_code => l_line_definition_owner_code
18890: ,p_line_definition_code => l_line_definition_code
18896: ,p_event_class_code => l_event_class_code);
18897: --
18898: -- set accounting class
18899: --
18900: xla_ae_lines_pkg.SetAcctClass(
18901: p_accounting_class_code => 'FEDERAL_REVENUE'
18902: , p_ae_header_id => l_ae_header_id
18903: );
18904:
18904:
18905: --
18906: -- set rounding class
18907: --
18908: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18909: 'FEDERAL_REVENUE';
18910:
18911: --
18912: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18908: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18909: 'FEDERAL_REVENUE';
18910:
18911: --
18912: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18913: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18914: --
18915: -- bulk performance
18916: --
18909: 'FEDERAL_REVENUE';
18910:
18911: --
18912: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18913: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18914: --
18915: -- bulk performance
18916: --
18917: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18913: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18914: --
18915: -- bulk performance
18916: --
18917: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18918:
18919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18920: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18921:
18915: -- bulk performance
18916: --
18917: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18918:
18919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18920: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18921:
18922: -- 4955764
18923: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18919: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18920: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18921:
18922: -- 4955764
18923: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18924: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18925:
18926: -- 4458381 Public Sector Enh
18927:
18945: l_rec_acct_attrs.array_num_value(6) := to_char(p_source_51);
18946: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
18947: l_rec_acct_attrs.array_num_value(7) := p_source_43;
18948:
18949: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18950: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18951:
18952: ---------------------------------------------------------------------------------------------------------------
18953: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18946: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
18947: l_rec_acct_attrs.array_num_value(7) := p_source_43;
18948:
18949: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18950: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18951:
18952: ---------------------------------------------------------------------------------------------------------------
18953: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18954: ---------------------------------------------------------------------------------------------------------------
18949: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18950: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18951:
18952: ---------------------------------------------------------------------------------------------------------------
18953: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18954: ---------------------------------------------------------------------------------------------------------------
18955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18956:
18957: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18951:
18952: ---------------------------------------------------------------------------------------------------------------
18953: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18954: ---------------------------------------------------------------------------------------------------------------
18955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18956:
18957: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18958: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18959:
18953: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18954: ---------------------------------------------------------------------------------------------------------------
18955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18956:
18957: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18958: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18959:
18960: IF xla_accounting_cache_pkg.GetValueChar
18961: (p_source_code => 'LEDGER_CATEGORY_CODE'
18954: ---------------------------------------------------------------------------------------------------------------
18955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18956:
18957: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18958: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18959:
18960: IF xla_accounting_cache_pkg.GetValueChar
18961: (p_source_code => 'LEDGER_CATEGORY_CODE'
18962: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18965: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18966: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18967: )
18968: THEN
18969: xla_ae_lines_pkg.BflowUpgEntry
18970: (p_business_method_code => l_bflow_method_code
18971: ,p_business_class_code => l_bflow_class_code
18972: ,p_balance_type => l_balance_type_code);
18973: ELSE
19005: , x_value_type_code => l_adr_value_type_code
19006: , p_side => 'NA'
19007: );
19008:
19009: xla_ae_lines_pkg.set_ccid(
19010: p_code_combination_id => l_ccid
19011: , p_value_type_code => l_adr_value_type_code
19012: , p_transaction_coa_id => l_adr_transaction_coa_id
19013: , p_accounting_coa_id => l_adr_accounting_coa_id
19037: );
19038:
19039: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
19040:
19041: xla_ae_lines_pkg.set_segment(
19042: p_to_segment_code => 'GL_ACCOUNT'
19043: , p_segment_value => l_segment
19044: , p_from_segment_code => l_adr_value_segment_code
19045: , p_from_combination_id => l_adr_value_combination_id
19081: xla_accounting_err_pkg.build_message
19082: (p_appli_s_name => 'XLA'
19083: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19084: ,p_token_1 => 'LINE_NUMBER'
19085: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19086: ,p_token_2 => 'LINE_TYPE_NAME'
19087: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19088: l_component_type
19089: ,l_component_code
19117: --
19118: --
19119: ------------------------------------------------------------------------------------------------
19120: -- 4219869 Business Flow
19121: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19122: -- Prior Entry. Currently, the following code is always generated.
19123: ------------------------------------------------------------------------------------------------
19124: XLA_AE_LINES_PKG.ValidateCurrentLine;
19125:
19120: -- 4219869 Business Flow
19121: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19122: -- Prior Entry. Currently, the following code is always generated.
19123: ------------------------------------------------------------------------------------------------
19124: XLA_AE_LINES_PKG.ValidateCurrentLine;
19125:
19126: ------------------------------------------------------------------------------------
19127: -- 4219869 Business Flow
19128: -- Populated credit and debit amounts -- Need to generate this within IF
19126: ------------------------------------------------------------------------------------
19127: -- 4219869 Business Flow
19128: -- Populated credit and debit amounts -- Need to generate this within IF
19129: ------------------------------------------------------------------------------------
19130: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19131:
19132: ----------------------------------------------------------------------------------
19133: -- 4219869 Business Flow
19134: -- Update journal entry status -- Need to generate this within IF
19158: -- To allow MPA report to determine if it should generate report process
19159: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19160: ------------------------------------------------------------------------------------------
19161:
19162: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19163: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19164:
19165: --
19166: -- Update the line information that should be overwritten
19159: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19160: ------------------------------------------------------------------------------------------
19161:
19162: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19163: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19164:
19165: --
19166: -- Update the line information that should be overwritten
19167: --
19164:
19165: --
19166: -- Update the line information that should be overwritten
19167: --
19168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19169: p_header_num => 1);
19170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19171:
19172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19166: -- Update the line information that should be overwritten
19167: --
19168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19169: p_header_num => 1);
19170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19171:
19172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19173:
19174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19168: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19169: p_header_num => 1);
19170: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19171:
19172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19173:
19174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19175: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19176: END IF;
19171:
19172: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19173:
19174: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19175: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19176: END IF;
19177:
19178: --
19179: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19178: --
19179: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19180: --
19181: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
19182: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
19183: ELSE
19184: ---------------------------------------------------------------------------------------------------
19185: -- 4262811a Switch Sign
19186: ---------------------------------------------------------------------------------------------------
19183: ELSE
19184: ---------------------------------------------------------------------------------------------------
19185: -- 4262811a Switch Sign
19186: ---------------------------------------------------------------------------------------------------
19187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19184: ---------------------------------------------------------------------------------------------------
19185: -- 4262811a Switch Sign
19186: ---------------------------------------------------------------------------------------------------
19187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19185: -- 4262811a Switch Sign
19186: ---------------------------------------------------------------------------------------------------
19187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19186: ---------------------------------------------------------------------------------------------------
19187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19187: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19188: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19195:
19189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19195:
19196: END IF;
19197:
19190: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19191: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19192: -- 5132302
19193: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19194: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19195:
19196: END IF;
19197:
19198: -- 4955764
19195:
19196: END IF;
19197:
19198: -- 4955764
19199: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19201:
19202:
19203: XLA_AE_LINES_PKG.ValidateCurrentLine;
19199: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19201:
19202:
19203: XLA_AE_LINES_PKG.ValidateCurrentLine;
19204: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19205:
19206: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19207: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19200: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19201:
19202:
19203: XLA_AE_LINES_PKG.ValidateCurrentLine;
19204: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19205:
19206: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19207: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19208: ,p_balance_type_code => l_balance_type_code);
19354: --
19355: -- bulk performance
19356: --
19357: l_balance_type_code VARCHAR2(1);
19358: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19359: l_log_module VARCHAR2(240);
19360:
19361: --
19362: -- Upgrade strategy
19426: ') = 'Y'
19427: THEN
19428:
19429: --
19430: XLA_AE_LINES_PKG.SetNewLine;
19431:
19432: p_balance_type_code := l_balance_type_code;
19433: -- set the flag so later we will know whether the gain loss line needs to be created
19434:
19438:
19439: --
19440: -- bulk performance
19441: --
19442: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
19443: p_header_num => 0); -- 4262811
19444: --
19445: -- set accounting line options
19446: --
19443: p_header_num => 0); -- 4262811
19444: --
19445: -- set accounting line options
19446: --
19447: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
19448: p_natural_side_code => 'D'
19449: , p_gain_or_loss_flag => 'Y'
19450: , p_gl_transfer_mode_code => 'S'
19451: , p_acct_entry_type_code => 'A'
19457: --
19458: --
19459: -- set accounting line type info
19460: --
19461: xla_ae_lines_pkg.SetAcctLineType
19462: (p_component_type => l_component_type
19463: ,p_event_type_code => l_event_type_code
19464: ,p_line_definition_owner_code => l_line_definition_owner_code
19465: ,p_line_definition_code => l_line_definition_code
19471: ,p_event_class_code => l_event_class_code);
19472: --
19473: -- set accounting class
19474: --
19475: xla_ae_lines_pkg.SetAcctClass(
19476: p_accounting_class_code => 'EXCHANGE_RATE_VARIANCE'
19477: , p_ae_header_id => l_ae_header_id
19478: );
19479:
19479:
19480: --
19481: -- set rounding class
19482: --
19483: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19484: 'EXCHANGE_RATE_VARIANCE';
19485:
19486: --
19487: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19483: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19484: 'EXCHANGE_RATE_VARIANCE';
19485:
19486: --
19487: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19488: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19489: --
19490: -- bulk performance
19491: --
19484: 'EXCHANGE_RATE_VARIANCE';
19485:
19486: --
19487: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19488: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19489: --
19490: -- bulk performance
19491: --
19492: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19488: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19489: --
19490: -- bulk performance
19491: --
19492: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19493:
19494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19495: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19496:
19490: -- bulk performance
19491: --
19492: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19493:
19494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19495: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19496:
19497: -- 4955764
19498: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19494: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19495: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19496:
19497: -- 4955764
19498: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19499: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
19500:
19501: -- 4458381 Public Sector Enh
19502:
19566: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
19567: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
19568: l_rec_acct_attrs.array_char_value(30) := p_source_35;
19569:
19570: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19571: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19572:
19573: ---------------------------------------------------------------------------------------------------------------
19574: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19567: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
19568: l_rec_acct_attrs.array_char_value(30) := p_source_35;
19569:
19570: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19571: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19572:
19573: ---------------------------------------------------------------------------------------------------------------
19574: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19575: ---------------------------------------------------------------------------------------------------------------
19570: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19571: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19572:
19573: ---------------------------------------------------------------------------------------------------------------
19574: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19575: ---------------------------------------------------------------------------------------------------------------
19576: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19577:
19578: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19572:
19573: ---------------------------------------------------------------------------------------------------------------
19574: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19575: ---------------------------------------------------------------------------------------------------------------
19576: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19577:
19578: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19579: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19580:
19574: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19575: ---------------------------------------------------------------------------------------------------------------
19576: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19577:
19578: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19579: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19580:
19581: IF xla_accounting_cache_pkg.GetValueChar
19582: (p_source_code => 'LEDGER_CATEGORY_CODE'
19575: ---------------------------------------------------------------------------------------------------------------
19576: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19577:
19578: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19579: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19580:
19581: IF xla_accounting_cache_pkg.GetValueChar
19582: (p_source_code => 'LEDGER_CATEGORY_CODE'
19583: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
19586: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
19587: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
19588: )
19589: THEN
19590: xla_ae_lines_pkg.BflowUpgEntry
19591: (p_business_method_code => l_bflow_method_code
19592: ,p_business_class_code => l_bflow_class_code
19593: ,p_balance_type => l_balance_type_code);
19594: ELSE
19628: , x_value_type_code => l_adr_value_type_code
19629: , p_side => 'NA'
19630: );
19631:
19632: xla_ae_lines_pkg.set_ccid(
19633: p_code_combination_id => l_ccid
19634: , p_value_type_code => l_adr_value_type_code
19635: , p_transaction_coa_id => l_adr_transaction_coa_id
19636: , p_accounting_coa_id => l_adr_accounting_coa_id
19661: );
19662:
19663: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
19664:
19665: xla_ae_lines_pkg.set_segment(
19666: p_to_segment_code => 'GL_ACCOUNT'
19667: , p_segment_value => l_segment
19668: , p_from_segment_code => l_adr_value_segment_code
19669: , p_from_combination_id => l_adr_value_combination_id
19705: xla_accounting_err_pkg.build_message
19706: (p_appli_s_name => 'XLA'
19707: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19708: ,p_token_1 => 'LINE_NUMBER'
19709: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19710: ,p_token_2 => 'LINE_TYPE_NAME'
19711: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19712: l_component_type
19713: ,l_component_code
19741: --
19742: --
19743: ------------------------------------------------------------------------------------------------
19744: -- 4219869 Business Flow
19745: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19746: -- Prior Entry. Currently, the following code is always generated.
19747: ------------------------------------------------------------------------------------------------
19748: XLA_AE_LINES_PKG.ValidateCurrentLine;
19749:
19744: -- 4219869 Business Flow
19745: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19746: -- Prior Entry. Currently, the following code is always generated.
19747: ------------------------------------------------------------------------------------------------
19748: XLA_AE_LINES_PKG.ValidateCurrentLine;
19749:
19750: ------------------------------------------------------------------------------------
19751: -- 4219869 Business Flow
19752: -- Populated credit and debit amounts -- Need to generate this within IF
19750: ------------------------------------------------------------------------------------
19751: -- 4219869 Business Flow
19752: -- Populated credit and debit amounts -- Need to generate this within IF
19753: ------------------------------------------------------------------------------------
19754: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19755:
19756: ----------------------------------------------------------------------------------
19757: -- 4219869 Business Flow
19758: -- Update journal entry status -- Need to generate this within IF
19782: -- To allow MPA report to determine if it should generate report process
19783: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19784: ------------------------------------------------------------------------------------------
19785:
19786: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19787: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19788:
19789: --
19790: -- Update the line information that should be overwritten
19783: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19784: ------------------------------------------------------------------------------------------
19785:
19786: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19787: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19788:
19789: --
19790: -- Update the line information that should be overwritten
19791: --
19788:
19789: --
19790: -- Update the line information that should be overwritten
19791: --
19792: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19793: p_header_num => 1);
19794: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19795:
19796: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19790: -- Update the line information that should be overwritten
19791: --
19792: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19793: p_header_num => 1);
19794: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19795:
19796: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19797:
19798: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19792: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19793: p_header_num => 1);
19794: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19795:
19796: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19797:
19798: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19799: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19800: END IF;
19795:
19796: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19797:
19798: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19799: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19800: END IF;
19801:
19802: --
19803: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19802: --
19803: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19804: --
19805: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
19806: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
19807: ELSE
19808: ---------------------------------------------------------------------------------------------------
19809: -- 4262811a Switch Sign
19810: ---------------------------------------------------------------------------------------------------
19807: ELSE
19808: ---------------------------------------------------------------------------------------------------
19809: -- 4262811a Switch Sign
19810: ---------------------------------------------------------------------------------------------------
19811: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19812: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19808: ---------------------------------------------------------------------------------------------------
19809: -- 4262811a Switch Sign
19810: ---------------------------------------------------------------------------------------------------
19811: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19812: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19809: -- 4262811a Switch Sign
19810: ---------------------------------------------------------------------------------------------------
19811: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19812: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19817: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19810: ---------------------------------------------------------------------------------------------------
19811: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19812: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19817: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19811: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19812: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19817: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19819:
19813: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19817: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19819:
19820: END IF;
19821:
19814: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19815: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19816: -- 5132302
19817: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19818: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19819:
19820: END IF;
19821:
19822: -- 4955764
19819:
19820: END IF;
19821:
19822: -- 4955764
19823: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19824: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19825:
19826:
19827: XLA_AE_LINES_PKG.ValidateCurrentLine;
19823: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19824: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19825:
19826:
19827: XLA_AE_LINES_PKG.ValidateCurrentLine;
19828: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19829:
19830: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19831: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19824: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19825:
19826:
19827: XLA_AE_LINES_PKG.ValidateCurrentLine;
19828: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19829:
19830: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19831: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19832: ,p_balance_type_code => l_balance_type_code);
19978: --
19979: -- bulk performance
19980: --
19981: l_balance_type_code VARCHAR2(1);
19982: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19983: l_log_module VARCHAR2(240);
19984:
19985: --
19986: -- Upgrade strategy
20050: ') = 'Y'
20051: THEN
20052:
20053: --
20054: XLA_AE_LINES_PKG.SetNewLine;
20055:
20056: p_balance_type_code := l_balance_type_code;
20057: -- set the flag so later we will know whether the gain loss line needs to be created
20058:
20062:
20063: --
20064: -- bulk performance
20065: --
20066: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
20067: p_header_num => 0); -- 4262811
20068: --
20069: -- set accounting line options
20070: --
20067: p_header_num => 0); -- 4262811
20068: --
20069: -- set accounting line options
20070: --
20071: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
20072: p_natural_side_code => 'D'
20073: , p_gain_or_loss_flag => 'Y'
20074: , p_gl_transfer_mode_code => 'S'
20075: , p_acct_entry_type_code => 'A'
20081: --
20082: --
20083: -- set accounting line type info
20084: --
20085: xla_ae_lines_pkg.SetAcctLineType
20086: (p_component_type => l_component_type
20087: ,p_event_type_code => l_event_type_code
20088: ,p_line_definition_owner_code => l_line_definition_owner_code
20089: ,p_line_definition_code => l_line_definition_code
20095: ,p_event_class_code => l_event_class_code);
20096: --
20097: -- set accounting class
20098: --
20099: xla_ae_lines_pkg.SetAcctClass(
20100: p_accounting_class_code => 'EXCHANGE_RATE_VARIANCE'
20101: , p_ae_header_id => l_ae_header_id
20102: );
20103:
20103:
20104: --
20105: -- set rounding class
20106: --
20107: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20108: 'EXCHANGE_RATE_VARIANCE';
20109:
20110: --
20111: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20107: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20108: 'EXCHANGE_RATE_VARIANCE';
20109:
20110: --
20111: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20112: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20113: --
20114: -- bulk performance
20115: --
20108: 'EXCHANGE_RATE_VARIANCE';
20109:
20110: --
20111: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20112: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20113: --
20114: -- bulk performance
20115: --
20116: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20112: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20113: --
20114: -- bulk performance
20115: --
20116: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20117:
20118: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20119: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20120:
20114: -- bulk performance
20115: --
20116: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20117:
20118: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20119: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20120:
20121: -- 4955764
20122: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20118: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20119: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20120:
20121: -- 4955764
20122: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20123: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
20124:
20125: -- 4458381 Public Sector Enh
20126:
20190: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
20191: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
20192: l_rec_acct_attrs.array_char_value(30) := p_source_35;
20193:
20194: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20195: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20196:
20197: ---------------------------------------------------------------------------------------------------------------
20198: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20191: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
20192: l_rec_acct_attrs.array_char_value(30) := p_source_35;
20193:
20194: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20195: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20196:
20197: ---------------------------------------------------------------------------------------------------------------
20198: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20199: ---------------------------------------------------------------------------------------------------------------
20194: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20195: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20196:
20197: ---------------------------------------------------------------------------------------------------------------
20198: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20199: ---------------------------------------------------------------------------------------------------------------
20200: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20201:
20202: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20196:
20197: ---------------------------------------------------------------------------------------------------------------
20198: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20199: ---------------------------------------------------------------------------------------------------------------
20200: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20201:
20202: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20203: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20204:
20198: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20199: ---------------------------------------------------------------------------------------------------------------
20200: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20201:
20202: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20203: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20204:
20205: IF xla_accounting_cache_pkg.GetValueChar
20206: (p_source_code => 'LEDGER_CATEGORY_CODE'
20199: ---------------------------------------------------------------------------------------------------------------
20200: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20201:
20202: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20203: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20204:
20205: IF xla_accounting_cache_pkg.GetValueChar
20206: (p_source_code => 'LEDGER_CATEGORY_CODE'
20207: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
20210: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
20211: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
20212: )
20213: THEN
20214: xla_ae_lines_pkg.BflowUpgEntry
20215: (p_business_method_code => l_bflow_method_code
20216: ,p_business_class_code => l_bflow_class_code
20217: ,p_balance_type => l_balance_type_code);
20218: ELSE
20251: , x_value_type_code => l_adr_value_type_code
20252: , p_side => 'NA'
20253: );
20254:
20255: xla_ae_lines_pkg.set_ccid(
20256: p_code_combination_id => l_ccid
20257: , p_value_type_code => l_adr_value_type_code
20258: , p_transaction_coa_id => l_adr_transaction_coa_id
20259: , p_accounting_coa_id => l_adr_accounting_coa_id
20284: );
20285:
20286: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
20287:
20288: xla_ae_lines_pkg.set_segment(
20289: p_to_segment_code => 'GL_ACCOUNT'
20290: , p_segment_value => l_segment
20291: , p_from_segment_code => l_adr_value_segment_code
20292: , p_from_combination_id => l_adr_value_combination_id
20328: xla_accounting_err_pkg.build_message
20329: (p_appli_s_name => 'XLA'
20330: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
20331: ,p_token_1 => 'LINE_NUMBER'
20332: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
20333: ,p_token_2 => 'LINE_TYPE_NAME'
20334: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
20335: l_component_type
20336: ,l_component_code
20364: --
20365: --
20366: ------------------------------------------------------------------------------------------------
20367: -- 4219869 Business Flow
20368: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20369: -- Prior Entry. Currently, the following code is always generated.
20370: ------------------------------------------------------------------------------------------------
20371: XLA_AE_LINES_PKG.ValidateCurrentLine;
20372:
20367: -- 4219869 Business Flow
20368: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20369: -- Prior Entry. Currently, the following code is always generated.
20370: ------------------------------------------------------------------------------------------------
20371: XLA_AE_LINES_PKG.ValidateCurrentLine;
20372:
20373: ------------------------------------------------------------------------------------
20374: -- 4219869 Business Flow
20375: -- Populated credit and debit amounts -- Need to generate this within IF
20373: ------------------------------------------------------------------------------------
20374: -- 4219869 Business Flow
20375: -- Populated credit and debit amounts -- Need to generate this within IF
20376: ------------------------------------------------------------------------------------
20377: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20378:
20379: ----------------------------------------------------------------------------------
20380: -- 4219869 Business Flow
20381: -- Update journal entry status -- Need to generate this within IF
20405: -- To allow MPA report to determine if it should generate report process
20406: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20407: ------------------------------------------------------------------------------------------
20408:
20409: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20410: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20411:
20412: --
20413: -- Update the line information that should be overwritten
20406: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20407: ------------------------------------------------------------------------------------------
20408:
20409: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20410: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20411:
20412: --
20413: -- Update the line information that should be overwritten
20414: --
20411:
20412: --
20413: -- Update the line information that should be overwritten
20414: --
20415: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20416: p_header_num => 1);
20417: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20418:
20419: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20413: -- Update the line information that should be overwritten
20414: --
20415: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20416: p_header_num => 1);
20417: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20418:
20419: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20420:
20421: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20415: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20416: p_header_num => 1);
20417: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20418:
20419: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20420:
20421: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20422: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20423: END IF;
20418:
20419: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20420:
20421: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20422: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20423: END IF;
20424:
20425: --
20426: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20425: --
20426: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20427: --
20428: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
20429: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
20430: ELSE
20431: ---------------------------------------------------------------------------------------------------
20432: -- 4262811a Switch Sign
20433: ---------------------------------------------------------------------------------------------------
20430: ELSE
20431: ---------------------------------------------------------------------------------------------------
20432: -- 4262811a Switch Sign
20433: ---------------------------------------------------------------------------------------------------
20434: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20431: ---------------------------------------------------------------------------------------------------
20432: -- 4262811a Switch Sign
20433: ---------------------------------------------------------------------------------------------------
20434: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20432: -- 4262811a Switch Sign
20433: ---------------------------------------------------------------------------------------------------
20434: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20433: ---------------------------------------------------------------------------------------------------
20434: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20434: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20442:
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20442:
20443: END IF;
20444:
20437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20438: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20439: -- 5132302
20440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20441: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20442:
20443: END IF;
20444:
20445: -- 4955764
20442:
20443: END IF;
20444:
20445: -- 4955764
20446: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20447: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20448:
20449:
20450: XLA_AE_LINES_PKG.ValidateCurrentLine;
20446: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20447: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20448:
20449:
20450: XLA_AE_LINES_PKG.ValidateCurrentLine;
20451: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20452:
20453: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20454: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20447: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20448:
20449:
20450: XLA_AE_LINES_PKG.ValidateCurrentLine;
20451: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20452:
20453: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20454: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20455: ,p_balance_type_code => l_balance_type_code);
20599: --
20600: -- bulk performance
20601: --
20602: l_balance_type_code VARCHAR2(1);
20603: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
20604: l_log_module VARCHAR2(240);
20605:
20606: --
20607: -- Upgrade strategy
20671: ') = 'Y'
20672: THEN
20673:
20674: --
20675: XLA_AE_LINES_PKG.SetNewLine;
20676:
20677: p_balance_type_code := l_balance_type_code;
20678: -- set the flag so later we will know whether the gain loss line needs to be created
20679:
20683:
20684: --
20685: -- bulk performance
20686: --
20687: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
20688: p_header_num => 0); -- 4262811
20689: --
20690: -- set accounting line options
20691: --
20688: p_header_num => 0); -- 4262811
20689: --
20690: -- set accounting line options
20691: --
20692: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
20693: p_natural_side_code => 'C'
20694: , p_gain_or_loss_flag => 'Y'
20695: , p_gl_transfer_mode_code => 'S'
20696: , p_acct_entry_type_code => 'A'
20702: --
20703: --
20704: -- set accounting line type info
20705: --
20706: xla_ae_lines_pkg.SetAcctLineType
20707: (p_component_type => l_component_type
20708: ,p_event_type_code => l_event_type_code
20709: ,p_line_definition_owner_code => l_line_definition_owner_code
20710: ,p_line_definition_code => l_line_definition_code
20716: ,p_event_class_code => l_event_class_code);
20717: --
20718: -- set accounting class
20719: --
20720: xla_ae_lines_pkg.SetAcctClass(
20721: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
20722: , p_ae_header_id => l_ae_header_id
20723: );
20724:
20724:
20725: --
20726: -- set rounding class
20727: --
20728: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20729: 'FEDERAL_PROJECT_COST_CLEARING';
20730:
20731: --
20732: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20728: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20729: 'FEDERAL_PROJECT_COST_CLEARING';
20730:
20731: --
20732: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20733: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20734: --
20735: -- bulk performance
20736: --
20729: 'FEDERAL_PROJECT_COST_CLEARING';
20730:
20731: --
20732: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20733: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20734: --
20735: -- bulk performance
20736: --
20737: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20733: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20734: --
20735: -- bulk performance
20736: --
20737: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20738:
20739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20740: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20741:
20735: -- bulk performance
20736: --
20737: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20738:
20739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20740: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20741:
20742: -- 4955764
20743: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20739: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20740: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20741:
20742: -- 4955764
20743: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20744: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
20745:
20746: -- 4458381 Public Sector Enh
20747:
20811: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
20812: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
20813: l_rec_acct_attrs.array_char_value(30) := p_source_35;
20814:
20815: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20816: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20817:
20818: ---------------------------------------------------------------------------------------------------------------
20819: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20812: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
20813: l_rec_acct_attrs.array_char_value(30) := p_source_35;
20814:
20815: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20816: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20817:
20818: ---------------------------------------------------------------------------------------------------------------
20819: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20820: ---------------------------------------------------------------------------------------------------------------
20815: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20816: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20817:
20818: ---------------------------------------------------------------------------------------------------------------
20819: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20820: ---------------------------------------------------------------------------------------------------------------
20821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20822:
20823: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20817:
20818: ---------------------------------------------------------------------------------------------------------------
20819: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20820: ---------------------------------------------------------------------------------------------------------------
20821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20822:
20823: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20824: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20825:
20819: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20820: ---------------------------------------------------------------------------------------------------------------
20821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20822:
20823: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20824: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20825:
20826: IF xla_accounting_cache_pkg.GetValueChar
20827: (p_source_code => 'LEDGER_CATEGORY_CODE'
20820: ---------------------------------------------------------------------------------------------------------------
20821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20822:
20823: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20824: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20825:
20826: IF xla_accounting_cache_pkg.GetValueChar
20827: (p_source_code => 'LEDGER_CATEGORY_CODE'
20828: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
20831: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
20832: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
20833: )
20834: THEN
20835: xla_ae_lines_pkg.BflowUpgEntry
20836: (p_business_method_code => l_bflow_method_code
20837: ,p_business_class_code => l_bflow_class_code
20838: ,p_balance_type => l_balance_type_code);
20839: ELSE
20873: , x_value_type_code => l_adr_value_type_code
20874: , p_side => 'NA'
20875: );
20876:
20877: xla_ae_lines_pkg.set_ccid(
20878: p_code_combination_id => l_ccid
20879: , p_value_type_code => l_adr_value_type_code
20880: , p_transaction_coa_id => l_adr_transaction_coa_id
20881: , p_accounting_coa_id => l_adr_accounting_coa_id
20905: );
20906:
20907: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
20908:
20909: xla_ae_lines_pkg.set_segment(
20910: p_to_segment_code => 'GL_ACCOUNT'
20911: , p_segment_value => l_segment
20912: , p_from_segment_code => l_adr_value_segment_code
20913: , p_from_combination_id => l_adr_value_combination_id
20949: xla_accounting_err_pkg.build_message
20950: (p_appli_s_name => 'XLA'
20951: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
20952: ,p_token_1 => 'LINE_NUMBER'
20953: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
20954: ,p_token_2 => 'LINE_TYPE_NAME'
20955: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
20956: l_component_type
20957: ,l_component_code
20985: --
20986: --
20987: ------------------------------------------------------------------------------------------------
20988: -- 4219869 Business Flow
20989: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20990: -- Prior Entry. Currently, the following code is always generated.
20991: ------------------------------------------------------------------------------------------------
20992: XLA_AE_LINES_PKG.ValidateCurrentLine;
20993:
20988: -- 4219869 Business Flow
20989: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20990: -- Prior Entry. Currently, the following code is always generated.
20991: ------------------------------------------------------------------------------------------------
20992: XLA_AE_LINES_PKG.ValidateCurrentLine;
20993:
20994: ------------------------------------------------------------------------------------
20995: -- 4219869 Business Flow
20996: -- Populated credit and debit amounts -- Need to generate this within IF
20994: ------------------------------------------------------------------------------------
20995: -- 4219869 Business Flow
20996: -- Populated credit and debit amounts -- Need to generate this within IF
20997: ------------------------------------------------------------------------------------
20998: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20999:
21000: ----------------------------------------------------------------------------------
21001: -- 4219869 Business Flow
21002: -- Update journal entry status -- Need to generate this within IF
21026: -- To allow MPA report to determine if it should generate report process
21027: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21028: ------------------------------------------------------------------------------------------
21029:
21030: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21031: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21032:
21033: --
21034: -- Update the line information that should be overwritten
21027: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21028: ------------------------------------------------------------------------------------------
21029:
21030: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21031: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21032:
21033: --
21034: -- Update the line information that should be overwritten
21035: --
21032:
21033: --
21034: -- Update the line information that should be overwritten
21035: --
21036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21037: p_header_num => 1);
21038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21039:
21040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21034: -- Update the line information that should be overwritten
21035: --
21036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21037: p_header_num => 1);
21038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21039:
21040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21041:
21042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21036: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21037: p_header_num => 1);
21038: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21039:
21040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21041:
21042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21043: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21044: END IF;
21039:
21040: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21041:
21042: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21043: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21044: END IF;
21045:
21046: --
21047: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21046: --
21047: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21048: --
21049: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
21050: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
21051: ELSE
21052: ---------------------------------------------------------------------------------------------------
21053: -- 4262811a Switch Sign
21054: ---------------------------------------------------------------------------------------------------
21051: ELSE
21052: ---------------------------------------------------------------------------------------------------
21053: -- 4262811a Switch Sign
21054: ---------------------------------------------------------------------------------------------------
21055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21052: ---------------------------------------------------------------------------------------------------
21053: -- 4262811a Switch Sign
21054: ---------------------------------------------------------------------------------------------------
21055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21053: -- 4262811a Switch Sign
21054: ---------------------------------------------------------------------------------------------------
21055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21054: ---------------------------------------------------------------------------------------------------
21055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21055: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21056: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21063:
21057: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21063:
21064: END IF;
21065:
21058: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21059: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21060: -- 5132302
21061: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21062: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21063:
21064: END IF;
21065:
21066: -- 4955764
21063:
21064: END IF;
21065:
21066: -- 4955764
21067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21069:
21070:
21071: XLA_AE_LINES_PKG.ValidateCurrentLine;
21067: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21069:
21070:
21071: XLA_AE_LINES_PKG.ValidateCurrentLine;
21072: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21073:
21074: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21075: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21068: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21069:
21070:
21071: XLA_AE_LINES_PKG.ValidateCurrentLine;
21072: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21073:
21074: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21075: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21076: ,p_balance_type_code => l_balance_type_code);
21220: --
21221: -- bulk performance
21222: --
21223: l_balance_type_code VARCHAR2(1);
21224: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21225: l_log_module VARCHAR2(240);
21226:
21227: --
21228: -- Upgrade strategy
21292: ') = 'Y'
21293: THEN
21294:
21295: --
21296: XLA_AE_LINES_PKG.SetNewLine;
21297:
21298: p_balance_type_code := l_balance_type_code;
21299: -- set the flag so later we will know whether the gain loss line needs to be created
21300:
21304:
21305: --
21306: -- bulk performance
21307: --
21308: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
21309: p_header_num => 0); -- 4262811
21310: --
21311: -- set accounting line options
21312: --
21309: p_header_num => 0); -- 4262811
21310: --
21311: -- set accounting line options
21312: --
21313: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
21314: p_natural_side_code => 'C'
21315: , p_gain_or_loss_flag => 'Y'
21316: , p_gl_transfer_mode_code => 'S'
21317: , p_acct_entry_type_code => 'A'
21323: --
21324: --
21325: -- set accounting line type info
21326: --
21327: xla_ae_lines_pkg.SetAcctLineType
21328: (p_component_type => l_component_type
21329: ,p_event_type_code => l_event_type_code
21330: ,p_line_definition_owner_code => l_line_definition_owner_code
21331: ,p_line_definition_code => l_line_definition_code
21337: ,p_event_class_code => l_event_class_code);
21338: --
21339: -- set accounting class
21340: --
21341: xla_ae_lines_pkg.SetAcctClass(
21342: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
21343: , p_ae_header_id => l_ae_header_id
21344: );
21345:
21345:
21346: --
21347: -- set rounding class
21348: --
21349: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21350: 'FEDERAL_PROJECT_COST_CLEARING';
21351:
21352: --
21353: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21349: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21350: 'FEDERAL_PROJECT_COST_CLEARING';
21351:
21352: --
21353: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21354: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21355: --
21356: -- bulk performance
21357: --
21350: 'FEDERAL_PROJECT_COST_CLEARING';
21351:
21352: --
21353: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21354: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21355: --
21356: -- bulk performance
21357: --
21358: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21354: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21355: --
21356: -- bulk performance
21357: --
21358: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21359:
21360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21361: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21362:
21356: -- bulk performance
21357: --
21358: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21359:
21360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21361: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21362:
21363: -- 4955764
21364: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21361: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21362:
21363: -- 4955764
21364: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21365: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
21366:
21367: -- 4458381 Public Sector Enh
21368:
21432: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
21433: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
21434: l_rec_acct_attrs.array_char_value(30) := p_source_35;
21435:
21436: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21437: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21438:
21439: ---------------------------------------------------------------------------------------------------------------
21440: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21433: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
21434: l_rec_acct_attrs.array_char_value(30) := p_source_35;
21435:
21436: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21437: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21438:
21439: ---------------------------------------------------------------------------------------------------------------
21440: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21441: ---------------------------------------------------------------------------------------------------------------
21436: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
21437: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
21438:
21439: ---------------------------------------------------------------------------------------------------------------
21440: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21441: ---------------------------------------------------------------------------------------------------------------
21442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21443:
21444: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21438:
21439: ---------------------------------------------------------------------------------------------------------------
21440: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21441: ---------------------------------------------------------------------------------------------------------------
21442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21443:
21444: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21445: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21446:
21440: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
21441: ---------------------------------------------------------------------------------------------------------------
21442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21443:
21444: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21445: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21446:
21447: IF xla_accounting_cache_pkg.GetValueChar
21448: (p_source_code => 'LEDGER_CATEGORY_CODE'
21441: ---------------------------------------------------------------------------------------------------------------
21442: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
21443:
21444: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21445: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
21446:
21447: IF xla_accounting_cache_pkg.GetValueChar
21448: (p_source_code => 'LEDGER_CATEGORY_CODE'
21449: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
21452: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
21453: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
21454: )
21455: THEN
21456: xla_ae_lines_pkg.BflowUpgEntry
21457: (p_business_method_code => l_bflow_method_code
21458: ,p_business_class_code => l_bflow_class_code
21459: ,p_balance_type => l_balance_type_code);
21460: ELSE
21493: , x_value_type_code => l_adr_value_type_code
21494: , p_side => 'NA'
21495: );
21496:
21497: xla_ae_lines_pkg.set_ccid(
21498: p_code_combination_id => l_ccid
21499: , p_value_type_code => l_adr_value_type_code
21500: , p_transaction_coa_id => l_adr_transaction_coa_id
21501: , p_accounting_coa_id => l_adr_accounting_coa_id
21525: );
21526:
21527: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
21528:
21529: xla_ae_lines_pkg.set_segment(
21530: p_to_segment_code => 'GL_ACCOUNT'
21531: , p_segment_value => l_segment
21532: , p_from_segment_code => l_adr_value_segment_code
21533: , p_from_combination_id => l_adr_value_combination_id
21569: xla_accounting_err_pkg.build_message
21570: (p_appli_s_name => 'XLA'
21571: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
21572: ,p_token_1 => 'LINE_NUMBER'
21573: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
21574: ,p_token_2 => 'LINE_TYPE_NAME'
21575: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
21576: l_component_type
21577: ,l_component_code
21605: --
21606: --
21607: ------------------------------------------------------------------------------------------------
21608: -- 4219869 Business Flow
21609: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
21610: -- Prior Entry. Currently, the following code is always generated.
21611: ------------------------------------------------------------------------------------------------
21612: XLA_AE_LINES_PKG.ValidateCurrentLine;
21613:
21608: -- 4219869 Business Flow
21609: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
21610: -- Prior Entry. Currently, the following code is always generated.
21611: ------------------------------------------------------------------------------------------------
21612: XLA_AE_LINES_PKG.ValidateCurrentLine;
21613:
21614: ------------------------------------------------------------------------------------
21615: -- 4219869 Business Flow
21616: -- Populated credit and debit amounts -- Need to generate this within IF
21614: ------------------------------------------------------------------------------------
21615: -- 4219869 Business Flow
21616: -- Populated credit and debit amounts -- Need to generate this within IF
21617: ------------------------------------------------------------------------------------
21618: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21619:
21620: ----------------------------------------------------------------------------------
21621: -- 4219869 Business Flow
21622: -- Update journal entry status -- Need to generate this within IF
21646: -- To allow MPA report to determine if it should generate report process
21647: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21648: ------------------------------------------------------------------------------------------
21649:
21650: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21651: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21652:
21653: --
21654: -- Update the line information that should be overwritten
21647: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
21648: ------------------------------------------------------------------------------------------
21649:
21650: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
21651: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
21652:
21653: --
21654: -- Update the line information that should be overwritten
21655: --
21652:
21653: --
21654: -- Update the line information that should be overwritten
21655: --
21656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21657: p_header_num => 1);
21658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21659:
21660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21654: -- Update the line information that should be overwritten
21655: --
21656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21657: p_header_num => 1);
21658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21659:
21660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21661:
21662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21656: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
21657: p_header_num => 1);
21658: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
21659:
21660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21661:
21662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21663: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21664: END IF;
21659:
21660: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
21661:
21662: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
21663: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
21664: END IF;
21665:
21666: --
21667: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21666: --
21667: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
21668: --
21669: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
21670: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
21671: ELSE
21672: ---------------------------------------------------------------------------------------------------
21673: -- 4262811a Switch Sign
21674: ---------------------------------------------------------------------------------------------------
21671: ELSE
21672: ---------------------------------------------------------------------------------------------------
21673: -- 4262811a Switch Sign
21674: ---------------------------------------------------------------------------------------------------
21675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21672: ---------------------------------------------------------------------------------------------------
21673: -- 4262811a Switch Sign
21674: ---------------------------------------------------------------------------------------------------
21675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21673: -- 4262811a Switch Sign
21674: ---------------------------------------------------------------------------------------------------
21675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21674: ---------------------------------------------------------------------------------------------------
21675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21675: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
21676: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21683:
21677: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21683:
21684: END IF;
21685:
21678: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
21679: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21680: -- 5132302
21681: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
21682: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
21683:
21684: END IF;
21685:
21686: -- 4955764
21683:
21684: END IF;
21685:
21686: -- 4955764
21687: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21689:
21690:
21691: XLA_AE_LINES_PKG.ValidateCurrentLine;
21687: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21689:
21690:
21691: XLA_AE_LINES_PKG.ValidateCurrentLine;
21692: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21693:
21694: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21695: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21688: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
21689:
21690:
21691: XLA_AE_LINES_PKG.ValidateCurrentLine;
21692: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
21693:
21694: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
21695: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
21696: ,p_balance_type_code => l_balance_type_code);
21827: --
21828: -- bulk performance
21829: --
21830: l_balance_type_code VARCHAR2(1);
21831: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21832: l_log_module VARCHAR2(240);
21833:
21834: --
21835: -- Upgrade strategy
21899: ') = 'N'
21900: THEN
21901:
21902: --
21903: XLA_AE_LINES_PKG.SetNewLine;
21904:
21905: p_balance_type_code := l_balance_type_code;
21906: -- set the flag so later we will know whether the gain loss line needs to be created
21907:
21911:
21912: --
21913: -- bulk performance
21914: --
21915: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
21916: p_header_num => 0); -- 4262811
21917: --
21918: -- set accounting line options
21919: --
21916: p_header_num => 0); -- 4262811
21917: --
21918: -- set accounting line options
21919: --
21920: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
21921: p_natural_side_code => 'C'
21922: , p_gain_or_loss_flag => 'N'
21923: , p_gl_transfer_mode_code => 'S'
21924: , p_acct_entry_type_code => 'A'
21930: --
21931: --
21932: -- set accounting line type info
21933: --
21934: xla_ae_lines_pkg.SetAcctLineType
21935: (p_component_type => l_component_type
21936: ,p_event_type_code => l_event_type_code
21937: ,p_line_definition_owner_code => l_line_definition_owner_code
21938: ,p_line_definition_code => l_line_definition_code
21944: ,p_event_class_code => l_event_class_code);
21945: --
21946: -- set accounting class
21947: --
21948: xla_ae_lines_pkg.SetAcctClass(
21949: p_accounting_class_code => 'REVENUE'
21950: , p_ae_header_id => l_ae_header_id
21951: );
21952:
21952:
21953: --
21954: -- set rounding class
21955: --
21956: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21957: 'REVENUE';
21958:
21959: --
21960: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21956: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
21957: 'REVENUE';
21958:
21959: --
21960: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21961: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21962: --
21963: -- bulk performance
21964: --
21957: 'REVENUE';
21958:
21959: --
21960: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
21961: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21962: --
21963: -- bulk performance
21964: --
21965: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21961: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
21962: --
21963: -- bulk performance
21964: --
21965: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21966:
21967: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21968: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21969:
21963: -- bulk performance
21964: --
21965: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
21966:
21967: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21968: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21969:
21970: -- 4955764
21971: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21967: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
21968: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
21969:
21970: -- 4955764
21971: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
21972: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
21973:
21974: -- 4458381 Public Sector Enh
21975:
21999: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
22000: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
22001: l_rec_acct_attrs.array_num_value(10) := p_source_43;
22002:
22003: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22004: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22005:
22006: ---------------------------------------------------------------------------------------------------------------
22007: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22000: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
22001: l_rec_acct_attrs.array_num_value(10) := p_source_43;
22002:
22003: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22004: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22005:
22006: ---------------------------------------------------------------------------------------------------------------
22007: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22008: ---------------------------------------------------------------------------------------------------------------
22003: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22004: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22005:
22006: ---------------------------------------------------------------------------------------------------------------
22007: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22008: ---------------------------------------------------------------------------------------------------------------
22009: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22010:
22011: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22005:
22006: ---------------------------------------------------------------------------------------------------------------
22007: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22008: ---------------------------------------------------------------------------------------------------------------
22009: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22010:
22011: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22012: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22013:
22007: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22008: ---------------------------------------------------------------------------------------------------------------
22009: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22010:
22011: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22012: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22013:
22014: IF xla_accounting_cache_pkg.GetValueChar
22015: (p_source_code => 'LEDGER_CATEGORY_CODE'
22008: ---------------------------------------------------------------------------------------------------------------
22009: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22010:
22011: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22012: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22013:
22014: IF xla_accounting_cache_pkg.GetValueChar
22015: (p_source_code => 'LEDGER_CATEGORY_CODE'
22016: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
22019: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
22020: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
22021: )
22022: THEN
22023: xla_ae_lines_pkg.BflowUpgEntry
22024: (p_business_method_code => l_bflow_method_code
22025: ,p_business_class_code => l_bflow_class_code
22026: ,p_balance_type => l_balance_type_code);
22027: ELSE
22059: , x_value_type_code => l_adr_value_type_code
22060: , p_side => 'NA'
22061: );
22062:
22063: xla_ae_lines_pkg.set_ccid(
22064: p_code_combination_id => l_ccid
22065: , p_value_type_code => l_adr_value_type_code
22066: , p_transaction_coa_id => l_adr_transaction_coa_id
22067: , p_accounting_coa_id => l_adr_accounting_coa_id
22095: xla_accounting_err_pkg.build_message
22096: (p_appli_s_name => 'XLA'
22097: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
22098: ,p_token_1 => 'LINE_NUMBER'
22099: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
22100: ,p_token_2 => 'LINE_TYPE_NAME'
22101: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
22102: l_component_type
22103: ,l_component_code
22131: --
22132: --
22133: ------------------------------------------------------------------------------------------------
22134: -- 4219869 Business Flow
22135: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22136: -- Prior Entry. Currently, the following code is always generated.
22137: ------------------------------------------------------------------------------------------------
22138: XLA_AE_LINES_PKG.ValidateCurrentLine;
22139:
22134: -- 4219869 Business Flow
22135: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22136: -- Prior Entry. Currently, the following code is always generated.
22137: ------------------------------------------------------------------------------------------------
22138: XLA_AE_LINES_PKG.ValidateCurrentLine;
22139:
22140: ------------------------------------------------------------------------------------
22141: -- 4219869 Business Flow
22142: -- Populated credit and debit amounts -- Need to generate this within IF
22140: ------------------------------------------------------------------------------------
22141: -- 4219869 Business Flow
22142: -- Populated credit and debit amounts -- Need to generate this within IF
22143: ------------------------------------------------------------------------------------
22144: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22145:
22146: ----------------------------------------------------------------------------------
22147: -- 4219869 Business Flow
22148: -- Update journal entry status -- Need to generate this within IF
22172: -- To allow MPA report to determine if it should generate report process
22173: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22174: ------------------------------------------------------------------------------------------
22175:
22176: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22177: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22178:
22179: --
22180: -- Update the line information that should be overwritten
22173: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22174: ------------------------------------------------------------------------------------------
22175:
22176: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22177: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22178:
22179: --
22180: -- Update the line information that should be overwritten
22181: --
22178:
22179: --
22180: -- Update the line information that should be overwritten
22181: --
22182: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22183: p_header_num => 1);
22184: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22185:
22186: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22180: -- Update the line information that should be overwritten
22181: --
22182: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22183: p_header_num => 1);
22184: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22185:
22186: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22187:
22188: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22182: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22183: p_header_num => 1);
22184: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22185:
22186: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22187:
22188: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22189: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22190: END IF;
22185:
22186: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22187:
22188: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22189: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22190: END IF;
22191:
22192: --
22193: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22192: --
22193: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22194: --
22195: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
22196: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
22197: ELSE
22198: ---------------------------------------------------------------------------------------------------
22199: -- 4262811a Switch Sign
22200: ---------------------------------------------------------------------------------------------------
22197: ELSE
22198: ---------------------------------------------------------------------------------------------------
22199: -- 4262811a Switch Sign
22200: ---------------------------------------------------------------------------------------------------
22201: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22198: ---------------------------------------------------------------------------------------------------
22199: -- 4262811a Switch Sign
22200: ---------------------------------------------------------------------------------------------------
22201: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22199: -- 4262811a Switch Sign
22200: ---------------------------------------------------------------------------------------------------
22201: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22207: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22200: ---------------------------------------------------------------------------------------------------
22201: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22207: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22208: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22201: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22202: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22207: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22208: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22209:
22203: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22207: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22208: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22209:
22210: END IF;
22211:
22204: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22205: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22206: -- 5132302
22207: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22208: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22209:
22210: END IF;
22211:
22212: -- 4955764
22209:
22210: END IF;
22211:
22212: -- 4955764
22213: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22214: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22215:
22216:
22217: XLA_AE_LINES_PKG.ValidateCurrentLine;
22213: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22214: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22215:
22216:
22217: XLA_AE_LINES_PKG.ValidateCurrentLine;
22218: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22219:
22220: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22221: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22214: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22215:
22216:
22217: XLA_AE_LINES_PKG.ValidateCurrentLine;
22218: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22219:
22220: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22221: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22222: ,p_balance_type_code => l_balance_type_code);
22353: --
22354: -- bulk performance
22355: --
22356: l_balance_type_code VARCHAR2(1);
22357: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
22358: l_log_module VARCHAR2(240);
22359:
22360: --
22361: -- Upgrade strategy
22427: ') = 'N'
22428: THEN
22429:
22430: --
22431: XLA_AE_LINES_PKG.SetNewLine;
22432:
22433: p_balance_type_code := l_balance_type_code;
22434: -- set the flag so later we will know whether the gain loss line needs to be created
22435:
22439:
22440: --
22441: -- bulk performance
22442: --
22443: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
22444: p_header_num => 0); -- 4262811
22445: --
22446: -- set accounting line options
22447: --
22444: p_header_num => 0); -- 4262811
22445: --
22446: -- set accounting line options
22447: --
22448: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
22449: p_natural_side_code => 'C'
22450: , p_gain_or_loss_flag => 'N'
22451: , p_gl_transfer_mode_code => 'S'
22452: , p_acct_entry_type_code => 'A'
22458: --
22459: --
22460: -- set accounting line type info
22461: --
22462: xla_ae_lines_pkg.SetAcctLineType
22463: (p_component_type => l_component_type
22464: ,p_event_type_code => l_event_type_code
22465: ,p_line_definition_owner_code => l_line_definition_owner_code
22466: ,p_line_definition_code => l_line_definition_code
22472: ,p_event_class_code => l_event_class_code);
22473: --
22474: -- set accounting class
22475: --
22476: xla_ae_lines_pkg.SetAcctClass(
22477: p_accounting_class_code => 'REVENUE'
22478: , p_ae_header_id => l_ae_header_id
22479: );
22480:
22480:
22481: --
22482: -- set rounding class
22483: --
22484: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
22485: 'REVENUE';
22486:
22487: --
22488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22484: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
22485: 'REVENUE';
22486:
22487: --
22488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22490: --
22491: -- bulk performance
22492: --
22485: 'REVENUE';
22486:
22487: --
22488: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
22489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22490: --
22491: -- bulk performance
22492: --
22493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22489: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
22490: --
22491: -- bulk performance
22492: --
22493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22494:
22495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22497:
22491: -- bulk performance
22492: --
22493: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
22494:
22495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22497:
22498: -- 4955764
22499: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22495: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
22496: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
22497:
22498: -- 4955764
22499: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22500: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
22501:
22502: -- 4458381 Public Sector Enh
22503:
22527: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
22528: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
22529: l_rec_acct_attrs.array_num_value(10) := p_source_43;
22530:
22531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22533:
22534: ---------------------------------------------------------------------------------------------------------------
22535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22528: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
22529: l_rec_acct_attrs.array_num_value(10) := p_source_43;
22530:
22531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22533:
22534: ---------------------------------------------------------------------------------------------------------------
22535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22536: ---------------------------------------------------------------------------------------------------------------
22531: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
22532: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
22533:
22534: ---------------------------------------------------------------------------------------------------------------
22535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22536: ---------------------------------------------------------------------------------------------------------------
22537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22538:
22539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22533:
22534: ---------------------------------------------------------------------------------------------------------------
22535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22536: ---------------------------------------------------------------------------------------------------------------
22537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22538:
22539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22541:
22535: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
22536: ---------------------------------------------------------------------------------------------------------------
22537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22538:
22539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22541:
22542: IF xla_accounting_cache_pkg.GetValueChar
22543: (p_source_code => 'LEDGER_CATEGORY_CODE'
22536: ---------------------------------------------------------------------------------------------------------------
22537: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
22538:
22539: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22540: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
22541:
22542: IF xla_accounting_cache_pkg.GetValueChar
22543: (p_source_code => 'LEDGER_CATEGORY_CODE'
22544: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
22547: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
22548: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
22549: )
22550: THEN
22551: xla_ae_lines_pkg.BflowUpgEntry
22552: (p_business_method_code => l_bflow_method_code
22553: ,p_business_class_code => l_bflow_class_code
22554: ,p_balance_type => l_balance_type_code);
22555: ELSE
22587: , x_value_type_code => l_adr_value_type_code
22588: , p_side => 'NA'
22589: );
22590:
22591: xla_ae_lines_pkg.set_ccid(
22592: p_code_combination_id => l_ccid
22593: , p_value_type_code => l_adr_value_type_code
22594: , p_transaction_coa_id => l_adr_transaction_coa_id
22595: , p_accounting_coa_id => l_adr_accounting_coa_id
22623: xla_accounting_err_pkg.build_message
22624: (p_appli_s_name => 'XLA'
22625: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
22626: ,p_token_1 => 'LINE_NUMBER'
22627: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
22628: ,p_token_2 => 'LINE_TYPE_NAME'
22629: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
22630: l_component_type
22631: ,l_component_code
22659: --
22660: --
22661: ------------------------------------------------------------------------------------------------
22662: -- 4219869 Business Flow
22663: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22664: -- Prior Entry. Currently, the following code is always generated.
22665: ------------------------------------------------------------------------------------------------
22666: XLA_AE_LINES_PKG.ValidateCurrentLine;
22667:
22662: -- 4219869 Business Flow
22663: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
22664: -- Prior Entry. Currently, the following code is always generated.
22665: ------------------------------------------------------------------------------------------------
22666: XLA_AE_LINES_PKG.ValidateCurrentLine;
22667:
22668: ------------------------------------------------------------------------------------
22669: -- 4219869 Business Flow
22670: -- Populated credit and debit amounts -- Need to generate this within IF
22668: ------------------------------------------------------------------------------------
22669: -- 4219869 Business Flow
22670: -- Populated credit and debit amounts -- Need to generate this within IF
22671: ------------------------------------------------------------------------------------
22672: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22673:
22674: ----------------------------------------------------------------------------------
22675: -- 4219869 Business Flow
22676: -- Update journal entry status -- Need to generate this within IF
22700: -- To allow MPA report to determine if it should generate report process
22701: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22702: ------------------------------------------------------------------------------------------
22703:
22704: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22705: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22706:
22707: --
22708: -- Update the line information that should be overwritten
22701: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
22702: ------------------------------------------------------------------------------------------
22703:
22704: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
22705: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
22706:
22707: --
22708: -- Update the line information that should be overwritten
22709: --
22706:
22707: --
22708: -- Update the line information that should be overwritten
22709: --
22710: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22711: p_header_num => 1);
22712: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22713:
22714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22708: -- Update the line information that should be overwritten
22709: --
22710: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22711: p_header_num => 1);
22712: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22713:
22714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22715:
22716: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22710: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
22711: p_header_num => 1);
22712: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
22713:
22714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22715:
22716: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22717: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22718: END IF;
22713:
22714: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
22715:
22716: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
22717: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
22718: END IF;
22719:
22720: --
22721: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22720: --
22721: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
22722: --
22723: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
22724: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
22725: ELSE
22726: ---------------------------------------------------------------------------------------------------
22727: -- 4262811a Switch Sign
22728: ---------------------------------------------------------------------------------------------------
22725: ELSE
22726: ---------------------------------------------------------------------------------------------------
22727: -- 4262811a Switch Sign
22728: ---------------------------------------------------------------------------------------------------
22729: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22726: ---------------------------------------------------------------------------------------------------
22727: -- 4262811a Switch Sign
22728: ---------------------------------------------------------------------------------------------------
22729: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22727: -- 4262811a Switch Sign
22728: ---------------------------------------------------------------------------------------------------
22729: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22735: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22728: ---------------------------------------------------------------------------------------------------
22729: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22735: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22736: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22729: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
22730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22735: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22736: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22737:
22731: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22735: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22736: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22737:
22738: END IF;
22739:
22732: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
22733: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22734: -- 5132302
22735: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
22736: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
22737:
22738: END IF;
22739:
22740: -- 4955764
22737:
22738: END IF;
22739:
22740: -- 4955764
22741: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22742: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22743:
22744:
22745: XLA_AE_LINES_PKG.ValidateCurrentLine;
22741: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
22742: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22743:
22744:
22745: XLA_AE_LINES_PKG.ValidateCurrentLine;
22746: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22747:
22748: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22749: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22742: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
22743:
22744:
22745: XLA_AE_LINES_PKG.ValidateCurrentLine;
22746: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
22747:
22748: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
22749: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
22750: ,p_balance_type_code => l_balance_type_code);
22881: --
22882: -- bulk performance
22883: --
22884: l_balance_type_code VARCHAR2(1);
22885: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
22886: l_log_module VARCHAR2(240);
22887:
22888: --
22889: -- Upgrade strategy
22953: ') = 'N'
22954: THEN
22955:
22956: --
22957: XLA_AE_LINES_PKG.SetNewLine;
22958:
22959: p_balance_type_code := l_balance_type_code;
22960: -- set the flag so later we will know whether the gain loss line needs to be created
22961:
22965:
22966: --
22967: -- bulk performance
22968: --
22969: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
22970: p_header_num => 0); -- 4262811
22971: --
22972: -- set accounting line options
22973: --
22970: p_header_num => 0); -- 4262811
22971: --
22972: -- set accounting line options
22973: --
22974: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
22975: p_natural_side_code => 'C'
22976: , p_gain_or_loss_flag => 'N'
22977: , p_gl_transfer_mode_code => 'S'
22978: , p_acct_entry_type_code => 'A'
22984: --
22985: --
22986: -- set accounting line type info
22987: --
22988: xla_ae_lines_pkg.SetAcctLineType
22989: (p_component_type => l_component_type
22990: ,p_event_type_code => l_event_type_code
22991: ,p_line_definition_owner_code => l_line_definition_owner_code
22992: ,p_line_definition_code => l_line_definition_code
22998: ,p_event_class_code => l_event_class_code);
22999: --
23000: -- set accounting class
23001: --
23002: xla_ae_lines_pkg.SetAcctClass(
23003: p_accounting_class_code => 'REVENUE'
23004: , p_ae_header_id => l_ae_header_id
23005: );
23006:
23006:
23007: --
23008: -- set rounding class
23009: --
23010: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23011: 'REVENUE';
23012:
23013: --
23014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23010: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23011: 'REVENUE';
23012:
23013: --
23014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23016: --
23017: -- bulk performance
23018: --
23011: 'REVENUE';
23012:
23013: --
23014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23016: --
23017: -- bulk performance
23018: --
23019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23016: --
23017: -- bulk performance
23018: --
23019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23020:
23021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23023:
23017: -- bulk performance
23018: --
23019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23020:
23021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23023:
23024: -- 4955764
23025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23023:
23024: -- 4955764
23025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23026: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
23027:
23028: -- 4458381 Public Sector Enh
23029:
23053: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
23054: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
23055: l_rec_acct_attrs.array_num_value(10) := p_source_43;
23056:
23057: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23058: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23059:
23060: ---------------------------------------------------------------------------------------------------------------
23061: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23054: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
23055: l_rec_acct_attrs.array_num_value(10) := p_source_43;
23056:
23057: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23058: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23059:
23060: ---------------------------------------------------------------------------------------------------------------
23061: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23062: ---------------------------------------------------------------------------------------------------------------
23057: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23058: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23059:
23060: ---------------------------------------------------------------------------------------------------------------
23061: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23062: ---------------------------------------------------------------------------------------------------------------
23063: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23064:
23065: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23059:
23060: ---------------------------------------------------------------------------------------------------------------
23061: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23062: ---------------------------------------------------------------------------------------------------------------
23063: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23064:
23065: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23066: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23067:
23061: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23062: ---------------------------------------------------------------------------------------------------------------
23063: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23064:
23065: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23066: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23067:
23068: IF xla_accounting_cache_pkg.GetValueChar
23069: (p_source_code => 'LEDGER_CATEGORY_CODE'
23062: ---------------------------------------------------------------------------------------------------------------
23063: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23064:
23065: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23066: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23067:
23068: IF xla_accounting_cache_pkg.GetValueChar
23069: (p_source_code => 'LEDGER_CATEGORY_CODE'
23070: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
23073: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
23074: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
23075: )
23076: THEN
23077: xla_ae_lines_pkg.BflowUpgEntry
23078: (p_business_method_code => l_bflow_method_code
23079: ,p_business_class_code => l_bflow_class_code
23080: ,p_balance_type => l_balance_type_code);
23081: ELSE
23113: , x_value_type_code => l_adr_value_type_code
23114: , p_side => 'NA'
23115: );
23116:
23117: xla_ae_lines_pkg.set_ccid(
23118: p_code_combination_id => l_ccid
23119: , p_value_type_code => l_adr_value_type_code
23120: , p_transaction_coa_id => l_adr_transaction_coa_id
23121: , p_accounting_coa_id => l_adr_accounting_coa_id
23149: xla_accounting_err_pkg.build_message
23150: (p_appli_s_name => 'XLA'
23151: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
23152: ,p_token_1 => 'LINE_NUMBER'
23153: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
23154: ,p_token_2 => 'LINE_TYPE_NAME'
23155: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
23156: l_component_type
23157: ,l_component_code
23185: --
23186: --
23187: ------------------------------------------------------------------------------------------------
23188: -- 4219869 Business Flow
23189: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23190: -- Prior Entry. Currently, the following code is always generated.
23191: ------------------------------------------------------------------------------------------------
23192: XLA_AE_LINES_PKG.ValidateCurrentLine;
23193:
23188: -- 4219869 Business Flow
23189: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23190: -- Prior Entry. Currently, the following code is always generated.
23191: ------------------------------------------------------------------------------------------------
23192: XLA_AE_LINES_PKG.ValidateCurrentLine;
23193:
23194: ------------------------------------------------------------------------------------
23195: -- 4219869 Business Flow
23196: -- Populated credit and debit amounts -- Need to generate this within IF
23194: ------------------------------------------------------------------------------------
23195: -- 4219869 Business Flow
23196: -- Populated credit and debit amounts -- Need to generate this within IF
23197: ------------------------------------------------------------------------------------
23198: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23199:
23200: ----------------------------------------------------------------------------------
23201: -- 4219869 Business Flow
23202: -- Update journal entry status -- Need to generate this within IF
23226: -- To allow MPA report to determine if it should generate report process
23227: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23228: ------------------------------------------------------------------------------------------
23229:
23230: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23231: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23232:
23233: --
23234: -- Update the line information that should be overwritten
23227: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23228: ------------------------------------------------------------------------------------------
23229:
23230: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23231: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23232:
23233: --
23234: -- Update the line information that should be overwritten
23235: --
23232:
23233: --
23234: -- Update the line information that should be overwritten
23235: --
23236: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23237: p_header_num => 1);
23238: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23239:
23240: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23234: -- Update the line information that should be overwritten
23235: --
23236: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23237: p_header_num => 1);
23238: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23239:
23240: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23241:
23242: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23236: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23237: p_header_num => 1);
23238: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23239:
23240: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23241:
23242: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23243: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23244: END IF;
23239:
23240: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23241:
23242: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23243: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23244: END IF;
23245:
23246: --
23247: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23246: --
23247: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23248: --
23249: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
23250: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
23251: ELSE
23252: ---------------------------------------------------------------------------------------------------
23253: -- 4262811a Switch Sign
23254: ---------------------------------------------------------------------------------------------------
23251: ELSE
23252: ---------------------------------------------------------------------------------------------------
23253: -- 4262811a Switch Sign
23254: ---------------------------------------------------------------------------------------------------
23255: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23252: ---------------------------------------------------------------------------------------------------
23253: -- 4262811a Switch Sign
23254: ---------------------------------------------------------------------------------------------------
23255: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23253: -- 4262811a Switch Sign
23254: ---------------------------------------------------------------------------------------------------
23255: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23254: ---------------------------------------------------------------------------------------------------
23255: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23262: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23255: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23262: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23263:
23257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23262: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23263:
23264: END IF;
23265:
23258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23259: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23260: -- 5132302
23261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23262: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23263:
23264: END IF;
23265:
23266: -- 4955764
23263:
23264: END IF;
23265:
23266: -- 4955764
23267: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23268: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23269:
23270:
23271: XLA_AE_LINES_PKG.ValidateCurrentLine;
23267: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23268: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23269:
23270:
23271: XLA_AE_LINES_PKG.ValidateCurrentLine;
23272: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23273:
23274: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23275: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23268: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23269:
23270:
23271: XLA_AE_LINES_PKG.ValidateCurrentLine;
23272: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23273:
23274: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23275: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23276: ,p_balance_type_code => l_balance_type_code);
23421: --
23422: -- bulk performance
23423: --
23424: l_balance_type_code VARCHAR2(1);
23425: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
23426: l_log_module VARCHAR2(240);
23427:
23428: --
23429: -- Upgrade strategy
23492: p_source_73 IS NULL
23493: THEN
23494:
23495: --
23496: XLA_AE_LINES_PKG.SetNewLine;
23497:
23498: p_balance_type_code := l_balance_type_code;
23499: -- set the flag so later we will know whether the gain loss line needs to be created
23500:
23504:
23505: --
23506: -- bulk performance
23507: --
23508: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
23509: p_header_num => 0); -- 4262811
23510: --
23511: -- set accounting line options
23512: --
23509: p_header_num => 0); -- 4262811
23510: --
23511: -- set accounting line options
23512: --
23513: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
23514: p_natural_side_code => 'C'
23515: , p_gain_or_loss_flag => 'N'
23516: , p_gl_transfer_mode_code => 'S'
23517: , p_acct_entry_type_code => 'A'
23523: --
23524: --
23525: -- set accounting line type info
23526: --
23527: xla_ae_lines_pkg.SetAcctLineType
23528: (p_component_type => l_component_type
23529: ,p_event_type_code => l_event_type_code
23530: ,p_line_definition_owner_code => l_line_definition_owner_code
23531: ,p_line_definition_code => l_line_definition_code
23537: ,p_event_class_code => l_event_class_code);
23538: --
23539: -- set accounting class
23540: --
23541: xla_ae_lines_pkg.SetAcctClass(
23542: p_accounting_class_code => 'PROVIDER_COST'
23543: , p_ae_header_id => l_ae_header_id
23544: );
23545:
23545:
23546: --
23547: -- set rounding class
23548: --
23549: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23550: 'PROVIDER_COST';
23551:
23552: --
23553: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23549: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
23550: 'PROVIDER_COST';
23551:
23552: --
23553: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23554: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23555: --
23556: -- bulk performance
23557: --
23550: 'PROVIDER_COST';
23551:
23552: --
23553: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
23554: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23555: --
23556: -- bulk performance
23557: --
23558: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23554: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
23555: --
23556: -- bulk performance
23557: --
23558: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23559:
23560: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23561: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23562:
23556: -- bulk performance
23557: --
23558: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
23559:
23560: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23561: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23562:
23563: -- 4955764
23564: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23560: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
23561: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
23562:
23563: -- 4955764
23564: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23565: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
23566:
23567: -- 4458381 Public Sector Enh
23568:
23632: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
23633: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
23634: l_rec_acct_attrs.array_char_value(30) := p_source_35;
23635:
23636: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23637: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23638:
23639: ---------------------------------------------------------------------------------------------------------------
23640: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23633: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
23634: l_rec_acct_attrs.array_char_value(30) := p_source_35;
23635:
23636: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23637: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23638:
23639: ---------------------------------------------------------------------------------------------------------------
23640: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23641: ---------------------------------------------------------------------------------------------------------------
23636: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
23637: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
23638:
23639: ---------------------------------------------------------------------------------------------------------------
23640: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23641: ---------------------------------------------------------------------------------------------------------------
23642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23643:
23644: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23638:
23639: ---------------------------------------------------------------------------------------------------------------
23640: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23641: ---------------------------------------------------------------------------------------------------------------
23642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23643:
23644: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23645: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23646:
23640: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
23641: ---------------------------------------------------------------------------------------------------------------
23642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23643:
23644: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23645: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23646:
23647: IF xla_accounting_cache_pkg.GetValueChar
23648: (p_source_code => 'LEDGER_CATEGORY_CODE'
23641: ---------------------------------------------------------------------------------------------------------------
23642: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
23643:
23644: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23645: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
23646:
23647: IF xla_accounting_cache_pkg.GetValueChar
23648: (p_source_code => 'LEDGER_CATEGORY_CODE'
23649: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
23652: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
23653: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
23654: )
23655: THEN
23656: xla_ae_lines_pkg.BflowUpgEntry
23657: (p_business_method_code => l_bflow_method_code
23658: ,p_business_class_code => l_bflow_class_code
23659: ,p_balance_type => l_balance_type_code);
23660: ELSE
23694: , x_value_type_code => l_adr_value_type_code
23695: , p_side => 'NA'
23696: );
23697:
23698: xla_ae_lines_pkg.set_ccid(
23699: p_code_combination_id => l_ccid
23700: , p_value_type_code => l_adr_value_type_code
23701: , p_transaction_coa_id => l_adr_transaction_coa_id
23702: , p_accounting_coa_id => l_adr_accounting_coa_id
23730: xla_accounting_err_pkg.build_message
23731: (p_appli_s_name => 'XLA'
23732: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
23733: ,p_token_1 => 'LINE_NUMBER'
23734: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
23735: ,p_token_2 => 'LINE_TYPE_NAME'
23736: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
23737: l_component_type
23738: ,l_component_code
23766: --
23767: --
23768: ------------------------------------------------------------------------------------------------
23769: -- 4219869 Business Flow
23770: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23771: -- Prior Entry. Currently, the following code is always generated.
23772: ------------------------------------------------------------------------------------------------
23773: XLA_AE_LINES_PKG.ValidateCurrentLine;
23774:
23769: -- 4219869 Business Flow
23770: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
23771: -- Prior Entry. Currently, the following code is always generated.
23772: ------------------------------------------------------------------------------------------------
23773: XLA_AE_LINES_PKG.ValidateCurrentLine;
23774:
23775: ------------------------------------------------------------------------------------
23776: -- 4219869 Business Flow
23777: -- Populated credit and debit amounts -- Need to generate this within IF
23775: ------------------------------------------------------------------------------------
23776: -- 4219869 Business Flow
23777: -- Populated credit and debit amounts -- Need to generate this within IF
23778: ------------------------------------------------------------------------------------
23779: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23780:
23781: ----------------------------------------------------------------------------------
23782: -- 4219869 Business Flow
23783: -- Update journal entry status -- Need to generate this within IF
23807: -- To allow MPA report to determine if it should generate report process
23808: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23809: ------------------------------------------------------------------------------------------
23810:
23811: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23812: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23813:
23814: --
23815: -- Update the line information that should be overwritten
23808: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
23809: ------------------------------------------------------------------------------------------
23810:
23811: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
23812: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
23813:
23814: --
23815: -- Update the line information that should be overwritten
23816: --
23813:
23814: --
23815: -- Update the line information that should be overwritten
23816: --
23817: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23818: p_header_num => 1);
23819: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23820:
23821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23815: -- Update the line information that should be overwritten
23816: --
23817: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23818: p_header_num => 1);
23819: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23820:
23821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23822:
23823: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23817: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
23818: p_header_num => 1);
23819: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
23820:
23821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23822:
23823: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23824: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23825: END IF;
23820:
23821: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
23822:
23823: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
23824: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
23825: END IF;
23826:
23827: --
23828: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23827: --
23828: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
23829: --
23830: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
23831: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
23832: ELSE
23833: ---------------------------------------------------------------------------------------------------
23834: -- 4262811a Switch Sign
23835: ---------------------------------------------------------------------------------------------------
23832: ELSE
23833: ---------------------------------------------------------------------------------------------------
23834: -- 4262811a Switch Sign
23835: ---------------------------------------------------------------------------------------------------
23836: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23837: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23833: ---------------------------------------------------------------------------------------------------
23834: -- 4262811a Switch Sign
23835: ---------------------------------------------------------------------------------------------------
23836: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23837: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23834: -- 4262811a Switch Sign
23835: ---------------------------------------------------------------------------------------------------
23836: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23837: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23842: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23835: ---------------------------------------------------------------------------------------------------
23836: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23837: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23842: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23843: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23836: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
23837: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23842: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23843: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23844:
23838: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23842: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23843: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23844:
23845: END IF;
23846:
23839: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
23840: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23841: -- 5132302
23842: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
23843: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
23844:
23845: END IF;
23846:
23847: -- 4955764
23844:
23845: END IF;
23846:
23847: -- 4955764
23848: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23849: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23850:
23851:
23852: XLA_AE_LINES_PKG.ValidateCurrentLine;
23848: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
23849: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23850:
23851:
23852: XLA_AE_LINES_PKG.ValidateCurrentLine;
23853: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23854:
23855: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23856: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23849: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
23850:
23851:
23852: XLA_AE_LINES_PKG.ValidateCurrentLine;
23853: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
23854:
23855: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
23856: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
23857: ,p_balance_type_code => l_balance_type_code);
24002: --
24003: -- bulk performance
24004: --
24005: l_balance_type_code VARCHAR2(1);
24006: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
24007: l_log_module VARCHAR2(240);
24008:
24009: --
24010: -- Upgrade strategy
24073: p_source_73 IS NULL
24074: THEN
24075:
24076: --
24077: XLA_AE_LINES_PKG.SetNewLine;
24078:
24079: p_balance_type_code := l_balance_type_code;
24080: -- set the flag so later we will know whether the gain loss line needs to be created
24081:
24085:
24086: --
24087: -- bulk performance
24088: --
24089: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
24090: p_header_num => 0); -- 4262811
24091: --
24092: -- set accounting line options
24093: --
24090: p_header_num => 0); -- 4262811
24091: --
24092: -- set accounting line options
24093: --
24094: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
24095: p_natural_side_code => 'C'
24096: , p_gain_or_loss_flag => 'N'
24097: , p_gl_transfer_mode_code => 'S'
24098: , p_acct_entry_type_code => 'A'
24104: --
24105: --
24106: -- set accounting line type info
24107: --
24108: xla_ae_lines_pkg.SetAcctLineType
24109: (p_component_type => l_component_type
24110: ,p_event_type_code => l_event_type_code
24111: ,p_line_definition_owner_code => l_line_definition_owner_code
24112: ,p_line_definition_code => l_line_definition_code
24118: ,p_event_class_code => l_event_class_code);
24119: --
24120: -- set accounting class
24121: --
24122: xla_ae_lines_pkg.SetAcctClass(
24123: p_accounting_class_code => 'PROVIDER_COST'
24124: , p_ae_header_id => l_ae_header_id
24125: );
24126:
24126:
24127: --
24128: -- set rounding class
24129: --
24130: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24131: 'PROVIDER_COST';
24132:
24133: --
24134: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24130: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24131: 'PROVIDER_COST';
24132:
24133: --
24134: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24135: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24136: --
24137: -- bulk performance
24138: --
24131: 'PROVIDER_COST';
24132:
24133: --
24134: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24135: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24136: --
24137: -- bulk performance
24138: --
24139: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24135: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24136: --
24137: -- bulk performance
24138: --
24139: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24140:
24141: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24142: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24143:
24137: -- bulk performance
24138: --
24139: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24140:
24141: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24142: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24143:
24144: -- 4955764
24145: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24141: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24142: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24143:
24144: -- 4955764
24145: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24146: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
24147:
24148: -- 4458381 Public Sector Enh
24149:
24213: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
24214: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
24215: l_rec_acct_attrs.array_char_value(30) := p_source_35;
24216:
24217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24219:
24220: ---------------------------------------------------------------------------------------------------------------
24221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24214: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
24215: l_rec_acct_attrs.array_char_value(30) := p_source_35;
24216:
24217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24219:
24220: ---------------------------------------------------------------------------------------------------------------
24221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24222: ---------------------------------------------------------------------------------------------------------------
24217: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24218: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24219:
24220: ---------------------------------------------------------------------------------------------------------------
24221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24222: ---------------------------------------------------------------------------------------------------------------
24223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24224:
24225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24219:
24220: ---------------------------------------------------------------------------------------------------------------
24221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24222: ---------------------------------------------------------------------------------------------------------------
24223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24224:
24225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24227:
24221: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24222: ---------------------------------------------------------------------------------------------------------------
24223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24224:
24225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24227:
24228: IF xla_accounting_cache_pkg.GetValueChar
24229: (p_source_code => 'LEDGER_CATEGORY_CODE'
24222: ---------------------------------------------------------------------------------------------------------------
24223: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24224:
24225: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24226: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24227:
24228: IF xla_accounting_cache_pkg.GetValueChar
24229: (p_source_code => 'LEDGER_CATEGORY_CODE'
24230: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
24233: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
24234: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
24235: )
24236: THEN
24237: xla_ae_lines_pkg.BflowUpgEntry
24238: (p_business_method_code => l_bflow_method_code
24239: ,p_business_class_code => l_bflow_class_code
24240: ,p_balance_type => l_balance_type_code);
24241: ELSE
24274: , x_value_type_code => l_adr_value_type_code
24275: , p_side => 'NA'
24276: );
24277:
24278: xla_ae_lines_pkg.set_ccid(
24279: p_code_combination_id => l_ccid
24280: , p_value_type_code => l_adr_value_type_code
24281: , p_transaction_coa_id => l_adr_transaction_coa_id
24282: , p_accounting_coa_id => l_adr_accounting_coa_id
24310: xla_accounting_err_pkg.build_message
24311: (p_appli_s_name => 'XLA'
24312: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
24313: ,p_token_1 => 'LINE_NUMBER'
24314: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
24315: ,p_token_2 => 'LINE_TYPE_NAME'
24316: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
24317: l_component_type
24318: ,l_component_code
24346: --
24347: --
24348: ------------------------------------------------------------------------------------------------
24349: -- 4219869 Business Flow
24350: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
24351: -- Prior Entry. Currently, the following code is always generated.
24352: ------------------------------------------------------------------------------------------------
24353: XLA_AE_LINES_PKG.ValidateCurrentLine;
24354:
24349: -- 4219869 Business Flow
24350: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
24351: -- Prior Entry. Currently, the following code is always generated.
24352: ------------------------------------------------------------------------------------------------
24353: XLA_AE_LINES_PKG.ValidateCurrentLine;
24354:
24355: ------------------------------------------------------------------------------------
24356: -- 4219869 Business Flow
24357: -- Populated credit and debit amounts -- Need to generate this within IF
24355: ------------------------------------------------------------------------------------
24356: -- 4219869 Business Flow
24357: -- Populated credit and debit amounts -- Need to generate this within IF
24358: ------------------------------------------------------------------------------------
24359: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24360:
24361: ----------------------------------------------------------------------------------
24362: -- 4219869 Business Flow
24363: -- Update journal entry status -- Need to generate this within IF
24387: -- To allow MPA report to determine if it should generate report process
24388: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24389: ------------------------------------------------------------------------------------------
24390:
24391: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24392: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24393:
24394: --
24395: -- Update the line information that should be overwritten
24388: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24389: ------------------------------------------------------------------------------------------
24390:
24391: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24392: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24393:
24394: --
24395: -- Update the line information that should be overwritten
24396: --
24393:
24394: --
24395: -- Update the line information that should be overwritten
24396: --
24397: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24398: p_header_num => 1);
24399: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24400:
24401: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24395: -- Update the line information that should be overwritten
24396: --
24397: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24398: p_header_num => 1);
24399: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24400:
24401: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24402:
24403: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24397: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24398: p_header_num => 1);
24399: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24400:
24401: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24402:
24403: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24404: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24405: END IF;
24400:
24401: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24402:
24403: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24404: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24405: END IF;
24406:
24407: --
24408: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24407: --
24408: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24409: --
24410: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
24411: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
24412: ELSE
24413: ---------------------------------------------------------------------------------------------------
24414: -- 4262811a Switch Sign
24415: ---------------------------------------------------------------------------------------------------
24412: ELSE
24413: ---------------------------------------------------------------------------------------------------
24414: -- 4262811a Switch Sign
24415: ---------------------------------------------------------------------------------------------------
24416: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24417: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24413: ---------------------------------------------------------------------------------------------------
24414: -- 4262811a Switch Sign
24415: ---------------------------------------------------------------------------------------------------
24416: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24417: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24414: -- 4262811a Switch Sign
24415: ---------------------------------------------------------------------------------------------------
24416: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24417: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24422: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24415: ---------------------------------------------------------------------------------------------------
24416: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24417: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24422: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24423: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24416: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24417: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24422: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24423: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24424:
24418: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24422: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24423: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24424:
24425: END IF;
24426:
24419: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24420: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24421: -- 5132302
24422: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24423: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24424:
24425: END IF;
24426:
24427: -- 4955764
24424:
24425: END IF;
24426:
24427: -- 4955764
24428: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24429: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24430:
24431:
24432: XLA_AE_LINES_PKG.ValidateCurrentLine;
24428: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24429: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24430:
24431:
24432: XLA_AE_LINES_PKG.ValidateCurrentLine;
24433: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24434:
24435: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
24436: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
24429: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
24430:
24431:
24432: XLA_AE_LINES_PKG.ValidateCurrentLine;
24433: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24434:
24435: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
24436: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
24437: ,p_balance_type_code => l_balance_type_code);
24582: --
24583: -- bulk performance
24584: --
24585: l_balance_type_code VARCHAR2(1);
24586: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
24587: l_log_module VARCHAR2(240);
24588:
24589: --
24590: -- Upgrade strategy
24650: ') = 'REVENUE_TRANSFER'
24651: THEN
24652:
24653: --
24654: XLA_AE_LINES_PKG.SetNewLine;
24655:
24656: p_balance_type_code := l_balance_type_code;
24657: -- set the flag so later we will know whether the gain loss line needs to be created
24658:
24662:
24663: --
24664: -- bulk performance
24665: --
24666: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
24667: p_header_num => 0); -- 4262811
24668: --
24669: -- set accounting line options
24670: --
24667: p_header_num => 0); -- 4262811
24668: --
24669: -- set accounting line options
24670: --
24671: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
24672: p_natural_side_code => 'C'
24673: , p_gain_or_loss_flag => 'N'
24674: , p_gl_transfer_mode_code => 'S'
24675: , p_acct_entry_type_code => 'A'
24681: --
24682: --
24683: -- set accounting line type info
24684: --
24685: xla_ae_lines_pkg.SetAcctLineType
24686: (p_component_type => l_component_type
24687: ,p_event_type_code => l_event_type_code
24688: ,p_line_definition_owner_code => l_line_definition_owner_code
24689: ,p_line_definition_code => l_line_definition_code
24695: ,p_event_class_code => l_event_class_code);
24696: --
24697: -- set accounting class
24698: --
24699: xla_ae_lines_pkg.SetAcctClass(
24700: p_accounting_class_code => 'PROVIDER_REVENUE'
24701: , p_ae_header_id => l_ae_header_id
24702: );
24703:
24703:
24704: --
24705: -- set rounding class
24706: --
24707: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24708: 'PROVIDER_REVENUE';
24709:
24710: --
24711: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24707: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
24708: 'PROVIDER_REVENUE';
24709:
24710: --
24711: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24712: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24713: --
24714: -- bulk performance
24715: --
24708: 'PROVIDER_REVENUE';
24709:
24710: --
24711: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
24712: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24713: --
24714: -- bulk performance
24715: --
24716: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24712: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
24713: --
24714: -- bulk performance
24715: --
24716: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24717:
24718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24719: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24720:
24714: -- bulk performance
24715: --
24716: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
24717:
24718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24719: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24720:
24721: -- 4955764
24722: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
24719: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
24720:
24721: -- 4955764
24722: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
24723: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
24724:
24725: -- 4458381 Public Sector Enh
24726:
24790: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
24791: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
24792: l_rec_acct_attrs.array_char_value(30) := p_source_35;
24793:
24794: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24795: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24796:
24797: ---------------------------------------------------------------------------------------------------------------
24798: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24791: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
24792: l_rec_acct_attrs.array_char_value(30) := p_source_35;
24793:
24794: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24795: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24796:
24797: ---------------------------------------------------------------------------------------------------------------
24798: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24799: ---------------------------------------------------------------------------------------------------------------
24794: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
24795: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
24796:
24797: ---------------------------------------------------------------------------------------------------------------
24798: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24799: ---------------------------------------------------------------------------------------------------------------
24800: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24801:
24802: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24796:
24797: ---------------------------------------------------------------------------------------------------------------
24798: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24799: ---------------------------------------------------------------------------------------------------------------
24800: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24801:
24802: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24803: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24804:
24798: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
24799: ---------------------------------------------------------------------------------------------------------------
24800: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24801:
24802: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24803: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24804:
24805: IF xla_accounting_cache_pkg.GetValueChar
24806: (p_source_code => 'LEDGER_CATEGORY_CODE'
24799: ---------------------------------------------------------------------------------------------------------------
24800: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
24801:
24802: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24803: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
24804:
24805: IF xla_accounting_cache_pkg.GetValueChar
24806: (p_source_code => 'LEDGER_CATEGORY_CODE'
24807: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
24810: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
24811: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
24812: )
24813: THEN
24814: xla_ae_lines_pkg.BflowUpgEntry
24815: (p_business_method_code => l_bflow_method_code
24816: ,p_business_class_code => l_bflow_class_code
24817: ,p_balance_type => l_balance_type_code);
24818: ELSE
24852: , x_value_type_code => l_adr_value_type_code
24853: , p_side => 'NA'
24854: );
24855:
24856: xla_ae_lines_pkg.set_ccid(
24857: p_code_combination_id => l_ccid
24858: , p_value_type_code => l_adr_value_type_code
24859: , p_transaction_coa_id => l_adr_transaction_coa_id
24860: , p_accounting_coa_id => l_adr_accounting_coa_id
24888: xla_accounting_err_pkg.build_message
24889: (p_appli_s_name => 'XLA'
24890: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
24891: ,p_token_1 => 'LINE_NUMBER'
24892: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
24893: ,p_token_2 => 'LINE_TYPE_NAME'
24894: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
24895: l_component_type
24896: ,l_component_code
24924: --
24925: --
24926: ------------------------------------------------------------------------------------------------
24927: -- 4219869 Business Flow
24928: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
24929: -- Prior Entry. Currently, the following code is always generated.
24930: ------------------------------------------------------------------------------------------------
24931: XLA_AE_LINES_PKG.ValidateCurrentLine;
24932:
24927: -- 4219869 Business Flow
24928: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
24929: -- Prior Entry. Currently, the following code is always generated.
24930: ------------------------------------------------------------------------------------------------
24931: XLA_AE_LINES_PKG.ValidateCurrentLine;
24932:
24933: ------------------------------------------------------------------------------------
24934: -- 4219869 Business Flow
24935: -- Populated credit and debit amounts -- Need to generate this within IF
24933: ------------------------------------------------------------------------------------
24934: -- 4219869 Business Flow
24935: -- Populated credit and debit amounts -- Need to generate this within IF
24936: ------------------------------------------------------------------------------------
24937: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
24938:
24939: ----------------------------------------------------------------------------------
24940: -- 4219869 Business Flow
24941: -- Update journal entry status -- Need to generate this within IF
24965: -- To allow MPA report to determine if it should generate report process
24966: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24967: ------------------------------------------------------------------------------------------
24968:
24969: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24970: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24971:
24972: --
24973: -- Update the line information that should be overwritten
24966: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
24967: ------------------------------------------------------------------------------------------
24968:
24969: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
24970: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
24971:
24972: --
24973: -- Update the line information that should be overwritten
24974: --
24971:
24972: --
24973: -- Update the line information that should be overwritten
24974: --
24975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24976: p_header_num => 1);
24977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24978:
24979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24973: -- Update the line information that should be overwritten
24974: --
24975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24976: p_header_num => 1);
24977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24978:
24979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24980:
24981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
24976: p_header_num => 1);
24977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
24978:
24979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24980:
24981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24982: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24983: END IF;
24978:
24979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
24980:
24981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
24982: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
24983: END IF;
24984:
24985: --
24986: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24985: --
24986: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
24987: --
24988: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
24989: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
24990: ELSE
24991: ---------------------------------------------------------------------------------------------------
24992: -- 4262811a Switch Sign
24993: ---------------------------------------------------------------------------------------------------
24990: ELSE
24991: ---------------------------------------------------------------------------------------------------
24992: -- 4262811a Switch Sign
24993: ---------------------------------------------------------------------------------------------------
24994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24991: ---------------------------------------------------------------------------------------------------
24992: -- 4262811a Switch Sign
24993: ---------------------------------------------------------------------------------------------------
24994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
24992: -- 4262811a Switch Sign
24993: ---------------------------------------------------------------------------------------------------
24994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
25000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
24993: ---------------------------------------------------------------------------------------------------
24994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
25000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
24995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
25000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25002:
24996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
25000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25002:
25003: END IF;
25004:
24997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
24998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
24999: -- 5132302
25000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25002:
25003: END IF;
25004:
25005: -- 4955764
25002:
25003: END IF;
25004:
25005: -- 4955764
25006: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25008:
25009:
25010: XLA_AE_LINES_PKG.ValidateCurrentLine;
25006: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25008:
25009:
25010: XLA_AE_LINES_PKG.ValidateCurrentLine;
25011: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25012:
25013: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25014: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25008:
25009:
25010: XLA_AE_LINES_PKG.ValidateCurrentLine;
25011: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25012:
25013: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25014: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25015: ,p_balance_type_code => l_balance_type_code);
25160: --
25161: -- bulk performance
25162: --
25163: l_balance_type_code VARCHAR2(1);
25164: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
25165: l_log_module VARCHAR2(240);
25166:
25167: --
25168: -- Upgrade strategy
25228: ') = 'REVENUE_TRANSFER'
25229: THEN
25230:
25231: --
25232: XLA_AE_LINES_PKG.SetNewLine;
25233:
25234: p_balance_type_code := l_balance_type_code;
25235: -- set the flag so later we will know whether the gain loss line needs to be created
25236:
25240:
25241: --
25242: -- bulk performance
25243: --
25244: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
25245: p_header_num => 0); -- 4262811
25246: --
25247: -- set accounting line options
25248: --
25245: p_header_num => 0); -- 4262811
25246: --
25247: -- set accounting line options
25248: --
25249: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
25250: p_natural_side_code => 'C'
25251: , p_gain_or_loss_flag => 'N'
25252: , p_gl_transfer_mode_code => 'S'
25253: , p_acct_entry_type_code => 'A'
25259: --
25260: --
25261: -- set accounting line type info
25262: --
25263: xla_ae_lines_pkg.SetAcctLineType
25264: (p_component_type => l_component_type
25265: ,p_event_type_code => l_event_type_code
25266: ,p_line_definition_owner_code => l_line_definition_owner_code
25267: ,p_line_definition_code => l_line_definition_code
25273: ,p_event_class_code => l_event_class_code);
25274: --
25275: -- set accounting class
25276: --
25277: xla_ae_lines_pkg.SetAcctClass(
25278: p_accounting_class_code => 'PROVIDER_REVENUE'
25279: , p_ae_header_id => l_ae_header_id
25280: );
25281:
25281:
25282: --
25283: -- set rounding class
25284: --
25285: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25286: 'PROVIDER_REVENUE';
25287:
25288: --
25289: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25285: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25286: 'PROVIDER_REVENUE';
25287:
25288: --
25289: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25290: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25291: --
25292: -- bulk performance
25293: --
25286: 'PROVIDER_REVENUE';
25287:
25288: --
25289: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25290: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25291: --
25292: -- bulk performance
25293: --
25294: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25290: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25291: --
25292: -- bulk performance
25293: --
25294: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25295:
25296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25297: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25298:
25292: -- bulk performance
25293: --
25294: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25295:
25296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25297: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25298:
25299: -- 4955764
25300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25297: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25298:
25299: -- 4955764
25300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
25302:
25303: -- 4458381 Public Sector Enh
25304:
25368: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
25369: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
25370: l_rec_acct_attrs.array_char_value(30) := p_source_35;
25371:
25372: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25373: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25374:
25375: ---------------------------------------------------------------------------------------------------------------
25376: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25369: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
25370: l_rec_acct_attrs.array_char_value(30) := p_source_35;
25371:
25372: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25373: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25374:
25375: ---------------------------------------------------------------------------------------------------------------
25376: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25377: ---------------------------------------------------------------------------------------------------------------
25372: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25373: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25374:
25375: ---------------------------------------------------------------------------------------------------------------
25376: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25377: ---------------------------------------------------------------------------------------------------------------
25378: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25379:
25380: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25374:
25375: ---------------------------------------------------------------------------------------------------------------
25376: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25377: ---------------------------------------------------------------------------------------------------------------
25378: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25379:
25380: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25381: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25382:
25376: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25377: ---------------------------------------------------------------------------------------------------------------
25378: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25379:
25380: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25381: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25382:
25383: IF xla_accounting_cache_pkg.GetValueChar
25384: (p_source_code => 'LEDGER_CATEGORY_CODE'
25377: ---------------------------------------------------------------------------------------------------------------
25378: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25379:
25380: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25381: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25382:
25383: IF xla_accounting_cache_pkg.GetValueChar
25384: (p_source_code => 'LEDGER_CATEGORY_CODE'
25385: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
25388: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
25389: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
25390: )
25391: THEN
25392: xla_ae_lines_pkg.BflowUpgEntry
25393: (p_business_method_code => l_bflow_method_code
25394: ,p_business_class_code => l_bflow_class_code
25395: ,p_balance_type => l_balance_type_code);
25396: ELSE
25429: , x_value_type_code => l_adr_value_type_code
25430: , p_side => 'NA'
25431: );
25432:
25433: xla_ae_lines_pkg.set_ccid(
25434: p_code_combination_id => l_ccid
25435: , p_value_type_code => l_adr_value_type_code
25436: , p_transaction_coa_id => l_adr_transaction_coa_id
25437: , p_accounting_coa_id => l_adr_accounting_coa_id
25465: xla_accounting_err_pkg.build_message
25466: (p_appli_s_name => 'XLA'
25467: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
25468: ,p_token_1 => 'LINE_NUMBER'
25469: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
25470: ,p_token_2 => 'LINE_TYPE_NAME'
25471: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
25472: l_component_type
25473: ,l_component_code
25501: --
25502: --
25503: ------------------------------------------------------------------------------------------------
25504: -- 4219869 Business Flow
25505: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
25506: -- Prior Entry. Currently, the following code is always generated.
25507: ------------------------------------------------------------------------------------------------
25508: XLA_AE_LINES_PKG.ValidateCurrentLine;
25509:
25504: -- 4219869 Business Flow
25505: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
25506: -- Prior Entry. Currently, the following code is always generated.
25507: ------------------------------------------------------------------------------------------------
25508: XLA_AE_LINES_PKG.ValidateCurrentLine;
25509:
25510: ------------------------------------------------------------------------------------
25511: -- 4219869 Business Flow
25512: -- Populated credit and debit amounts -- Need to generate this within IF
25510: ------------------------------------------------------------------------------------
25511: -- 4219869 Business Flow
25512: -- Populated credit and debit amounts -- Need to generate this within IF
25513: ------------------------------------------------------------------------------------
25514: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25515:
25516: ----------------------------------------------------------------------------------
25517: -- 4219869 Business Flow
25518: -- Update journal entry status -- Need to generate this within IF
25542: -- To allow MPA report to determine if it should generate report process
25543: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25544: ------------------------------------------------------------------------------------------
25545:
25546: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25547: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25548:
25549: --
25550: -- Update the line information that should be overwritten
25543: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
25544: ------------------------------------------------------------------------------------------
25545:
25546: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
25547: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
25548:
25549: --
25550: -- Update the line information that should be overwritten
25551: --
25548:
25549: --
25550: -- Update the line information that should be overwritten
25551: --
25552: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25553: p_header_num => 1);
25554: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25555:
25556: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25550: -- Update the line information that should be overwritten
25551: --
25552: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25553: p_header_num => 1);
25554: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25555:
25556: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25557:
25558: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25552: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
25553: p_header_num => 1);
25554: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
25555:
25556: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25557:
25558: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25559: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25560: END IF;
25555:
25556: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
25557:
25558: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
25559: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
25560: END IF;
25561:
25562: --
25563: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25562: --
25563: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
25564: --
25565: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
25566: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
25567: ELSE
25568: ---------------------------------------------------------------------------------------------------
25569: -- 4262811a Switch Sign
25570: ---------------------------------------------------------------------------------------------------
25567: ELSE
25568: ---------------------------------------------------------------------------------------------------
25569: -- 4262811a Switch Sign
25570: ---------------------------------------------------------------------------------------------------
25571: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25572: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25568: ---------------------------------------------------------------------------------------------------
25569: -- 4262811a Switch Sign
25570: ---------------------------------------------------------------------------------------------------
25571: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25572: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25569: -- 4262811a Switch Sign
25570: ---------------------------------------------------------------------------------------------------
25571: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25572: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25577: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25570: ---------------------------------------------------------------------------------------------------
25571: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25572: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25577: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25571: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
25572: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25577: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25579:
25573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25577: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25579:
25580: END IF;
25581:
25574: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
25575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25576: -- 5132302
25577: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
25578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
25579:
25580: END IF;
25581:
25582: -- 4955764
25579:
25580: END IF;
25581:
25582: -- 4955764
25583: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25584: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25585:
25586:
25587: XLA_AE_LINES_PKG.ValidateCurrentLine;
25583: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25584: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25585:
25586:
25587: XLA_AE_LINES_PKG.ValidateCurrentLine;
25588: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25589:
25590: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25591: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25584: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
25585:
25586:
25587: XLA_AE_LINES_PKG.ValidateCurrentLine;
25588: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
25589:
25590: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
25591: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
25592: ,p_balance_type_code => l_balance_type_code);
25734: --
25735: -- bulk performance
25736: --
25737: l_balance_type_code VARCHAR2(1);
25738: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
25739: l_log_module VARCHAR2(240);
25740:
25741: --
25742: -- Upgrade strategy
25799: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
25800: l_balance_type_code <> 'B' THEN
25801:
25802: --
25803: XLA_AE_LINES_PKG.SetNewLine;
25804:
25805: p_balance_type_code := l_balance_type_code;
25806: -- set the flag so later we will know whether the gain loss line needs to be created
25807:
25811:
25812: --
25813: -- bulk performance
25814: --
25815: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
25816: p_header_num => 0); -- 4262811
25817: --
25818: -- set accounting line options
25819: --
25816: p_header_num => 0); -- 4262811
25817: --
25818: -- set accounting line options
25819: --
25820: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
25821: p_natural_side_code => 'D'
25822: , p_gain_or_loss_flag => 'N'
25823: , p_gl_transfer_mode_code => 'S'
25824: , p_acct_entry_type_code => 'A'
25830: --
25831: --
25832: -- set accounting line type info
25833: --
25834: xla_ae_lines_pkg.SetAcctLineType
25835: (p_component_type => l_component_type
25836: ,p_event_type_code => l_event_type_code
25837: ,p_line_definition_owner_code => l_line_definition_owner_code
25838: ,p_line_definition_code => l_line_definition_code
25844: ,p_event_class_code => l_event_class_code);
25845: --
25846: -- set accounting class
25847: --
25848: xla_ae_lines_pkg.SetAcctClass(
25849: p_accounting_class_code => 'COST'
25850: , p_ae_header_id => l_ae_header_id
25851: );
25852:
25852:
25853: --
25854: -- set rounding class
25855: --
25856: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25857: 'COST';
25858:
25859: --
25860: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25856: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
25857: 'COST';
25858:
25859: --
25860: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25861: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25862: --
25863: -- bulk performance
25864: --
25857: 'COST';
25858:
25859: --
25860: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
25861: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25862: --
25863: -- bulk performance
25864: --
25865: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25861: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
25862: --
25863: -- bulk performance
25864: --
25865: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25866:
25867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25868: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25869:
25863: -- bulk performance
25864: --
25865: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
25866:
25867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25868: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25869:
25870: -- 4955764
25871: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
25868: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
25869:
25870: -- 4955764
25871: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
25872: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
25873:
25874: -- 4458381 Public Sector Enh
25875:
25939: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
25940: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
25941: l_rec_acct_attrs.array_char_value(30) := p_source_35;
25942:
25943: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25944: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25945:
25946: ---------------------------------------------------------------------------------------------------------------
25947: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25940: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
25941: l_rec_acct_attrs.array_char_value(30) := p_source_35;
25942:
25943: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25944: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25945:
25946: ---------------------------------------------------------------------------------------------------------------
25947: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25948: ---------------------------------------------------------------------------------------------------------------
25943: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
25944: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
25945:
25946: ---------------------------------------------------------------------------------------------------------------
25947: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25948: ---------------------------------------------------------------------------------------------------------------
25949: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25950:
25951: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25945:
25946: ---------------------------------------------------------------------------------------------------------------
25947: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25948: ---------------------------------------------------------------------------------------------------------------
25949: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25950:
25951: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25952: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25953:
25947: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
25948: ---------------------------------------------------------------------------------------------------------------
25949: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25950:
25951: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25952: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25953:
25954: IF xla_accounting_cache_pkg.GetValueChar
25955: (p_source_code => 'LEDGER_CATEGORY_CODE'
25948: ---------------------------------------------------------------------------------------------------------------
25949: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
25950:
25951: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25952: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
25953:
25954: IF xla_accounting_cache_pkg.GetValueChar
25955: (p_source_code => 'LEDGER_CATEGORY_CODE'
25956: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
25959: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
25960: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
25961: )
25962: THEN
25963: xla_ae_lines_pkg.BflowUpgEntry
25964: (p_business_method_code => l_bflow_method_code
25965: ,p_business_class_code => l_bflow_class_code
25966: ,p_balance_type => l_balance_type_code);
25967: ELSE
26001: , x_value_type_code => l_adr_value_type_code
26002: , p_side => 'NA'
26003: );
26004:
26005: xla_ae_lines_pkg.set_ccid(
26006: p_code_combination_id => l_ccid
26007: , p_value_type_code => l_adr_value_type_code
26008: , p_transaction_coa_id => l_adr_transaction_coa_id
26009: , p_accounting_coa_id => l_adr_accounting_coa_id
26037: xla_accounting_err_pkg.build_message
26038: (p_appli_s_name => 'XLA'
26039: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
26040: ,p_token_1 => 'LINE_NUMBER'
26041: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
26042: ,p_token_2 => 'LINE_TYPE_NAME'
26043: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
26044: l_component_type
26045: ,l_component_code
26073: --
26074: --
26075: ------------------------------------------------------------------------------------------------
26076: -- 4219869 Business Flow
26077: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26078: -- Prior Entry. Currently, the following code is always generated.
26079: ------------------------------------------------------------------------------------------------
26080: XLA_AE_LINES_PKG.ValidateCurrentLine;
26081:
26076: -- 4219869 Business Flow
26077: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26078: -- Prior Entry. Currently, the following code is always generated.
26079: ------------------------------------------------------------------------------------------------
26080: XLA_AE_LINES_PKG.ValidateCurrentLine;
26081:
26082: ------------------------------------------------------------------------------------
26083: -- 4219869 Business Flow
26084: -- Populated credit and debit amounts -- Need to generate this within IF
26082: ------------------------------------------------------------------------------------
26083: -- 4219869 Business Flow
26084: -- Populated credit and debit amounts -- Need to generate this within IF
26085: ------------------------------------------------------------------------------------
26086: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26087:
26088: ----------------------------------------------------------------------------------
26089: -- 4219869 Business Flow
26090: -- Update journal entry status -- Need to generate this within IF
26114: -- To allow MPA report to determine if it should generate report process
26115: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26116: ------------------------------------------------------------------------------------------
26117:
26118: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26119: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26120:
26121: --
26122: -- Update the line information that should be overwritten
26115: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26116: ------------------------------------------------------------------------------------------
26117:
26118: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26119: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26120:
26121: --
26122: -- Update the line information that should be overwritten
26123: --
26120:
26121: --
26122: -- Update the line information that should be overwritten
26123: --
26124: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26125: p_header_num => 1);
26126: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26127:
26128: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26122: -- Update the line information that should be overwritten
26123: --
26124: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26125: p_header_num => 1);
26126: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26127:
26128: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26129:
26130: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26124: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26125: p_header_num => 1);
26126: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26127:
26128: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26129:
26130: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26131: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26132: END IF;
26127:
26128: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26129:
26130: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26131: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26132: END IF;
26133:
26134: --
26135: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26134: --
26135: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26136: --
26137: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
26138: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
26139: ELSE
26140: ---------------------------------------------------------------------------------------------------
26141: -- 4262811a Switch Sign
26142: ---------------------------------------------------------------------------------------------------
26139: ELSE
26140: ---------------------------------------------------------------------------------------------------
26141: -- 4262811a Switch Sign
26142: ---------------------------------------------------------------------------------------------------
26143: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26140: ---------------------------------------------------------------------------------------------------
26141: -- 4262811a Switch Sign
26142: ---------------------------------------------------------------------------------------------------
26143: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26141: -- 4262811a Switch Sign
26142: ---------------------------------------------------------------------------------------------------
26143: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26142: ---------------------------------------------------------------------------------------------------
26143: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26143: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26151:
26145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26151:
26152: END IF;
26153:
26146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26148: -- 5132302
26149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26151:
26152: END IF;
26153:
26154: -- 4955764
26151:
26152: END IF;
26153:
26154: -- 4955764
26155: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26156: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26157:
26158:
26159: XLA_AE_LINES_PKG.ValidateCurrentLine;
26155: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26156: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26157:
26158:
26159: XLA_AE_LINES_PKG.ValidateCurrentLine;
26160: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26161:
26162: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26163: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26156: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26157:
26158:
26159: XLA_AE_LINES_PKG.ValidateCurrentLine;
26160: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26161:
26162: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26163: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26164: ,p_balance_type_code => l_balance_type_code);
26307: --
26308: -- bulk performance
26309: --
26310: l_balance_type_code VARCHAR2(1);
26311: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
26312: l_log_module VARCHAR2(240);
26313:
26314: --
26315: -- Upgrade strategy
26375: ') = 'N'
26376: THEN
26377:
26378: --
26379: XLA_AE_LINES_PKG.SetNewLine;
26380:
26381: p_balance_type_code := l_balance_type_code;
26382: -- set the flag so later we will know whether the gain loss line needs to be created
26383:
26387:
26388: --
26389: -- bulk performance
26390: --
26391: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
26392: p_header_num => 0); -- 4262811
26393: --
26394: -- set accounting line options
26395: --
26392: p_header_num => 0); -- 4262811
26393: --
26394: -- set accounting line options
26395: --
26396: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
26397: p_natural_side_code => 'D'
26398: , p_gain_or_loss_flag => 'N'
26399: , p_gl_transfer_mode_code => 'S'
26400: , p_acct_entry_type_code => 'A'
26406: --
26407: --
26408: -- set accounting line type info
26409: --
26410: xla_ae_lines_pkg.SetAcctLineType
26411: (p_component_type => l_component_type
26412: ,p_event_type_code => l_event_type_code
26413: ,p_line_definition_owner_code => l_line_definition_owner_code
26414: ,p_line_definition_code => l_line_definition_code
26420: ,p_event_class_code => l_event_class_code);
26421: --
26422: -- set accounting class
26423: --
26424: xla_ae_lines_pkg.SetAcctClass(
26425: p_accounting_class_code => 'COST'
26426: , p_ae_header_id => l_ae_header_id
26427: );
26428:
26428:
26429: --
26430: -- set rounding class
26431: --
26432: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26433: 'COST';
26434:
26435: --
26436: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26432: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
26433: 'COST';
26434:
26435: --
26436: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26437: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26438: --
26439: -- bulk performance
26440: --
26433: 'COST';
26434:
26435: --
26436: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
26437: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26438: --
26439: -- bulk performance
26440: --
26441: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26437: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
26438: --
26439: -- bulk performance
26440: --
26441: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26442:
26443: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26444: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26445:
26439: -- bulk performance
26440: --
26441: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
26442:
26443: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26444: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26445:
26446: -- 4955764
26447: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26443: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
26444: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
26445:
26446: -- 4955764
26447: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26448: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
26449:
26450: -- 4458381 Public Sector Enh
26451:
26515: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
26516: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
26517: l_rec_acct_attrs.array_char_value(30) := p_source_35;
26518:
26519: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26520: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26521:
26522: ---------------------------------------------------------------------------------------------------------------
26523: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26516: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
26517: l_rec_acct_attrs.array_char_value(30) := p_source_35;
26518:
26519: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26520: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26521:
26522: ---------------------------------------------------------------------------------------------------------------
26523: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26524: ---------------------------------------------------------------------------------------------------------------
26519: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
26520: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
26521:
26522: ---------------------------------------------------------------------------------------------------------------
26523: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26524: ---------------------------------------------------------------------------------------------------------------
26525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26526:
26527: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26521:
26522: ---------------------------------------------------------------------------------------------------------------
26523: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26524: ---------------------------------------------------------------------------------------------------------------
26525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26526:
26527: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26528: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26529:
26523: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
26524: ---------------------------------------------------------------------------------------------------------------
26525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26526:
26527: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26528: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26529:
26530: IF xla_accounting_cache_pkg.GetValueChar
26531: (p_source_code => 'LEDGER_CATEGORY_CODE'
26524: ---------------------------------------------------------------------------------------------------------------
26525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
26526:
26527: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26528: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
26529:
26530: IF xla_accounting_cache_pkg.GetValueChar
26531: (p_source_code => 'LEDGER_CATEGORY_CODE'
26532: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
26535: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
26536: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
26537: )
26538: THEN
26539: xla_ae_lines_pkg.BflowUpgEntry
26540: (p_business_method_code => l_bflow_method_code
26541: ,p_business_class_code => l_bflow_class_code
26542: ,p_balance_type => l_balance_type_code);
26543: ELSE
26577: , x_value_type_code => l_adr_value_type_code
26578: , p_side => 'NA'
26579: );
26580:
26581: xla_ae_lines_pkg.set_ccid(
26582: p_code_combination_id => l_ccid
26583: , p_value_type_code => l_adr_value_type_code
26584: , p_transaction_coa_id => l_adr_transaction_coa_id
26585: , p_accounting_coa_id => l_adr_accounting_coa_id
26613: xla_accounting_err_pkg.build_message
26614: (p_appli_s_name => 'XLA'
26615: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
26616: ,p_token_1 => 'LINE_NUMBER'
26617: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
26618: ,p_token_2 => 'LINE_TYPE_NAME'
26619: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
26620: l_component_type
26621: ,l_component_code
26649: --
26650: --
26651: ------------------------------------------------------------------------------------------------
26652: -- 4219869 Business Flow
26653: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26654: -- Prior Entry. Currently, the following code is always generated.
26655: ------------------------------------------------------------------------------------------------
26656: XLA_AE_LINES_PKG.ValidateCurrentLine;
26657:
26652: -- 4219869 Business Flow
26653: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
26654: -- Prior Entry. Currently, the following code is always generated.
26655: ------------------------------------------------------------------------------------------------
26656: XLA_AE_LINES_PKG.ValidateCurrentLine;
26657:
26658: ------------------------------------------------------------------------------------
26659: -- 4219869 Business Flow
26660: -- Populated credit and debit amounts -- Need to generate this within IF
26658: ------------------------------------------------------------------------------------
26659: -- 4219869 Business Flow
26660: -- Populated credit and debit amounts -- Need to generate this within IF
26661: ------------------------------------------------------------------------------------
26662: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26663:
26664: ----------------------------------------------------------------------------------
26665: -- 4219869 Business Flow
26666: -- Update journal entry status -- Need to generate this within IF
26690: -- To allow MPA report to determine if it should generate report process
26691: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26692: ------------------------------------------------------------------------------------------
26693:
26694: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26695: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26696:
26697: --
26698: -- Update the line information that should be overwritten
26691: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
26692: ------------------------------------------------------------------------------------------
26693:
26694: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
26695: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
26696:
26697: --
26698: -- Update the line information that should be overwritten
26699: --
26696:
26697: --
26698: -- Update the line information that should be overwritten
26699: --
26700: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26701: p_header_num => 1);
26702: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26703:
26704: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26698: -- Update the line information that should be overwritten
26699: --
26700: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26701: p_header_num => 1);
26702: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26703:
26704: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26705:
26706: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26700: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
26701: p_header_num => 1);
26702: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
26703:
26704: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26705:
26706: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26707: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26708: END IF;
26703:
26704: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
26705:
26706: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
26707: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
26708: END IF;
26709:
26710: --
26711: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26710: --
26711: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
26712: --
26713: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
26714: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
26715: ELSE
26716: ---------------------------------------------------------------------------------------------------
26717: -- 4262811a Switch Sign
26718: ---------------------------------------------------------------------------------------------------
26715: ELSE
26716: ---------------------------------------------------------------------------------------------------
26717: -- 4262811a Switch Sign
26718: ---------------------------------------------------------------------------------------------------
26719: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26720: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26716: ---------------------------------------------------------------------------------------------------
26717: -- 4262811a Switch Sign
26718: ---------------------------------------------------------------------------------------------------
26719: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26720: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26717: -- 4262811a Switch Sign
26718: ---------------------------------------------------------------------------------------------------
26719: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26720: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26725: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26718: ---------------------------------------------------------------------------------------------------
26719: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26720: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26725: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26726: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26719: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
26720: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26725: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26726: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26727:
26721: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26725: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26726: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26727:
26728: END IF;
26729:
26722: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
26723: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26724: -- 5132302
26725: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
26726: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
26727:
26728: END IF;
26729:
26730: -- 4955764
26727:
26728: END IF;
26729:
26730: -- 4955764
26731: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26732: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26733:
26734:
26735: XLA_AE_LINES_PKG.ValidateCurrentLine;
26731: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
26732: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26733:
26734:
26735: XLA_AE_LINES_PKG.ValidateCurrentLine;
26736: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26737:
26738: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26739: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26732: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
26733:
26734:
26735: XLA_AE_LINES_PKG.ValidateCurrentLine;
26736: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
26737:
26738: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
26739: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
26740: ,p_balance_type_code => l_balance_type_code);
26882: --
26883: -- bulk performance
26884: --
26885: l_balance_type_code VARCHAR2(1);
26886: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
26887: l_log_module VARCHAR2(240);
26888:
26889: --
26890: -- Upgrade strategy
26947: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
26948: l_balance_type_code <> 'B' THEN
26949:
26950: --
26951: XLA_AE_LINES_PKG.SetNewLine;
26952:
26953: p_balance_type_code := l_balance_type_code;
26954: -- set the flag so later we will know whether the gain loss line needs to be created
26955:
26959:
26960: --
26961: -- bulk performance
26962: --
26963: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
26964: p_header_num => 0); -- 4262811
26965: --
26966: -- set accounting line options
26967: --
26964: p_header_num => 0); -- 4262811
26965: --
26966: -- set accounting line options
26967: --
26968: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
26969: p_natural_side_code => 'D'
26970: , p_gain_or_loss_flag => 'N'
26971: , p_gl_transfer_mode_code => 'S'
26972: , p_acct_entry_type_code => 'A'
26978: --
26979: --
26980: -- set accounting line type info
26981: --
26982: xla_ae_lines_pkg.SetAcctLineType
26983: (p_component_type => l_component_type
26984: ,p_event_type_code => l_event_type_code
26985: ,p_line_definition_owner_code => l_line_definition_owner_code
26986: ,p_line_definition_code => l_line_definition_code
26992: ,p_event_class_code => l_event_class_code);
26993: --
26994: -- set accounting class
26995: --
26996: xla_ae_lines_pkg.SetAcctClass(
26997: p_accounting_class_code => 'COST'
26998: , p_ae_header_id => l_ae_header_id
26999: );
27000:
27000:
27001: --
27002: -- set rounding class
27003: --
27004: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27005: 'COST';
27006:
27007: --
27008: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27004: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27005: 'COST';
27006:
27007: --
27008: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27009: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27010: --
27011: -- bulk performance
27012: --
27005: 'COST';
27006:
27007: --
27008: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27009: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27010: --
27011: -- bulk performance
27012: --
27013: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27009: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27010: --
27011: -- bulk performance
27012: --
27013: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27014:
27015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27016: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27017:
27011: -- bulk performance
27012: --
27013: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27014:
27015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27016: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27017:
27018: -- 4955764
27019: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27016: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27017:
27018: -- 4955764
27019: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27020: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
27021:
27022: -- 4458381 Public Sector Enh
27023:
27087: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
27088: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
27089: l_rec_acct_attrs.array_char_value(30) := p_source_35;
27090:
27091: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27092: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27093:
27094: ---------------------------------------------------------------------------------------------------------------
27095: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27088: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
27089: l_rec_acct_attrs.array_char_value(30) := p_source_35;
27090:
27091: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27092: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27093:
27094: ---------------------------------------------------------------------------------------------------------------
27095: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27096: ---------------------------------------------------------------------------------------------------------------
27091: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27092: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27093:
27094: ---------------------------------------------------------------------------------------------------------------
27095: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27096: ---------------------------------------------------------------------------------------------------------------
27097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27098:
27099: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27093:
27094: ---------------------------------------------------------------------------------------------------------------
27095: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27096: ---------------------------------------------------------------------------------------------------------------
27097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27098:
27099: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27100: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27101:
27095: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27096: ---------------------------------------------------------------------------------------------------------------
27097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27098:
27099: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27100: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27101:
27102: IF xla_accounting_cache_pkg.GetValueChar
27103: (p_source_code => 'LEDGER_CATEGORY_CODE'
27096: ---------------------------------------------------------------------------------------------------------------
27097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27098:
27099: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27100: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27101:
27102: IF xla_accounting_cache_pkg.GetValueChar
27103: (p_source_code => 'LEDGER_CATEGORY_CODE'
27104: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
27107: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
27108: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
27109: )
27110: THEN
27111: xla_ae_lines_pkg.BflowUpgEntry
27112: (p_business_method_code => l_bflow_method_code
27113: ,p_business_class_code => l_bflow_class_code
27114: ,p_balance_type => l_balance_type_code);
27115: ELSE
27149: , x_value_type_code => l_adr_value_type_code
27150: , p_side => 'NA'
27151: );
27152:
27153: xla_ae_lines_pkg.set_ccid(
27154: p_code_combination_id => l_ccid
27155: , p_value_type_code => l_adr_value_type_code
27156: , p_transaction_coa_id => l_adr_transaction_coa_id
27157: , p_accounting_coa_id => l_adr_accounting_coa_id
27185: xla_accounting_err_pkg.build_message
27186: (p_appli_s_name => 'XLA'
27187: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
27188: ,p_token_1 => 'LINE_NUMBER'
27189: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
27190: ,p_token_2 => 'LINE_TYPE_NAME'
27191: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
27192: l_component_type
27193: ,l_component_code
27221: --
27222: --
27223: ------------------------------------------------------------------------------------------------
27224: -- 4219869 Business Flow
27225: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27226: -- Prior Entry. Currently, the following code is always generated.
27227: ------------------------------------------------------------------------------------------------
27228: XLA_AE_LINES_PKG.ValidateCurrentLine;
27229:
27224: -- 4219869 Business Flow
27225: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27226: -- Prior Entry. Currently, the following code is always generated.
27227: ------------------------------------------------------------------------------------------------
27228: XLA_AE_LINES_PKG.ValidateCurrentLine;
27229:
27230: ------------------------------------------------------------------------------------
27231: -- 4219869 Business Flow
27232: -- Populated credit and debit amounts -- Need to generate this within IF
27230: ------------------------------------------------------------------------------------
27231: -- 4219869 Business Flow
27232: -- Populated credit and debit amounts -- Need to generate this within IF
27233: ------------------------------------------------------------------------------------
27234: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27235:
27236: ----------------------------------------------------------------------------------
27237: -- 4219869 Business Flow
27238: -- Update journal entry status -- Need to generate this within IF
27262: -- To allow MPA report to determine if it should generate report process
27263: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27264: ------------------------------------------------------------------------------------------
27265:
27266: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27267: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27268:
27269: --
27270: -- Update the line information that should be overwritten
27263: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27264: ------------------------------------------------------------------------------------------
27265:
27266: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27267: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27268:
27269: --
27270: -- Update the line information that should be overwritten
27271: --
27268:
27269: --
27270: -- Update the line information that should be overwritten
27271: --
27272: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27273: p_header_num => 1);
27274: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27275:
27276: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27270: -- Update the line information that should be overwritten
27271: --
27272: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27273: p_header_num => 1);
27274: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27275:
27276: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27277:
27278: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27272: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27273: p_header_num => 1);
27274: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27275:
27276: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27277:
27278: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27279: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27280: END IF;
27275:
27276: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27277:
27278: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27279: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27280: END IF;
27281:
27282: --
27283: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27282: --
27283: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27284: --
27285: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
27286: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
27287: ELSE
27288: ---------------------------------------------------------------------------------------------------
27289: -- 4262811a Switch Sign
27290: ---------------------------------------------------------------------------------------------------
27287: ELSE
27288: ---------------------------------------------------------------------------------------------------
27289: -- 4262811a Switch Sign
27290: ---------------------------------------------------------------------------------------------------
27291: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27292: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27288: ---------------------------------------------------------------------------------------------------
27289: -- 4262811a Switch Sign
27290: ---------------------------------------------------------------------------------------------------
27291: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27292: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27289: -- 4262811a Switch Sign
27290: ---------------------------------------------------------------------------------------------------
27291: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27292: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27297: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27290: ---------------------------------------------------------------------------------------------------
27291: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27292: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27297: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27298: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27291: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27292: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27297: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27298: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27299:
27293: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27297: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27298: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27299:
27300: END IF;
27301:
27294: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27295: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27296: -- 5132302
27297: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27298: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27299:
27300: END IF;
27301:
27302: -- 4955764
27299:
27300: END IF;
27301:
27302: -- 4955764
27303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27304: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27305:
27306:
27307: XLA_AE_LINES_PKG.ValidateCurrentLine;
27303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27304: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27305:
27306:
27307: XLA_AE_LINES_PKG.ValidateCurrentLine;
27308: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27309:
27310: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27311: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27304: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27305:
27306:
27307: XLA_AE_LINES_PKG.ValidateCurrentLine;
27308: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27309:
27310: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27311: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27312: ,p_balance_type_code => l_balance_type_code);
27453: --
27454: -- bulk performance
27455: --
27456: l_balance_type_code VARCHAR2(1);
27457: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
27458: l_log_module VARCHAR2(240);
27459:
27460: --
27461: -- Upgrade strategy
27518: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
27519: l_balance_type_code <> 'B' THEN
27520:
27521: --
27522: XLA_AE_LINES_PKG.SetNewLine;
27523:
27524: p_balance_type_code := l_balance_type_code;
27525: -- set the flag so later we will know whether the gain loss line needs to be created
27526:
27530:
27531: --
27532: -- bulk performance
27533: --
27534: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
27535: p_header_num => 0); -- 4262811
27536: --
27537: -- set accounting line options
27538: --
27535: p_header_num => 0); -- 4262811
27536: --
27537: -- set accounting line options
27538: --
27539: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
27540: p_natural_side_code => 'D'
27541: , p_gain_or_loss_flag => 'N'
27542: , p_gl_transfer_mode_code => 'S'
27543: , p_acct_entry_type_code => 'A'
27549: --
27550: --
27551: -- set accounting line type info
27552: --
27553: xla_ae_lines_pkg.SetAcctLineType
27554: (p_component_type => l_component_type
27555: ,p_event_type_code => l_event_type_code
27556: ,p_line_definition_owner_code => l_line_definition_owner_code
27557: ,p_line_definition_code => l_line_definition_code
27563: ,p_event_class_code => l_event_class_code);
27564: --
27565: -- set accounting class
27566: --
27567: xla_ae_lines_pkg.SetAcctClass(
27568: p_accounting_class_code => 'COST'
27569: , p_ae_header_id => l_ae_header_id
27570: );
27571:
27571:
27572: --
27573: -- set rounding class
27574: --
27575: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27576: 'COST';
27577:
27578: --
27579: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27575: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
27576: 'COST';
27577:
27578: --
27579: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27580: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27581: --
27582: -- bulk performance
27583: --
27576: 'COST';
27577:
27578: --
27579: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
27580: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27581: --
27582: -- bulk performance
27583: --
27584: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27580: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
27581: --
27582: -- bulk performance
27583: --
27584: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27585:
27586: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27587: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27588:
27582: -- bulk performance
27583: --
27584: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
27585:
27586: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27587: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27588:
27589: -- 4955764
27590: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27586: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
27587: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
27588:
27589: -- 4955764
27590: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27591: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
27592:
27593: -- 4458381 Public Sector Enh
27594:
27658: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
27659: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
27660: l_rec_acct_attrs.array_char_value(30) := p_source_35;
27661:
27662: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27663: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27664:
27665: ---------------------------------------------------------------------------------------------------------------
27666: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27659: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
27660: l_rec_acct_attrs.array_char_value(30) := p_source_35;
27661:
27662: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27663: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27664:
27665: ---------------------------------------------------------------------------------------------------------------
27666: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27667: ---------------------------------------------------------------------------------------------------------------
27662: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
27663: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
27664:
27665: ---------------------------------------------------------------------------------------------------------------
27666: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27667: ---------------------------------------------------------------------------------------------------------------
27668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27669:
27670: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27664:
27665: ---------------------------------------------------------------------------------------------------------------
27666: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27667: ---------------------------------------------------------------------------------------------------------------
27668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27669:
27670: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27671: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27672:
27666: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
27667: ---------------------------------------------------------------------------------------------------------------
27668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27669:
27670: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27671: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27672:
27673: IF xla_accounting_cache_pkg.GetValueChar
27674: (p_source_code => 'LEDGER_CATEGORY_CODE'
27667: ---------------------------------------------------------------------------------------------------------------
27668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
27669:
27670: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27671: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
27672:
27673: IF xla_accounting_cache_pkg.GetValueChar
27674: (p_source_code => 'LEDGER_CATEGORY_CODE'
27675: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
27678: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
27679: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
27680: )
27681: THEN
27682: xla_ae_lines_pkg.BflowUpgEntry
27683: (p_business_method_code => l_bflow_method_code
27684: ,p_business_class_code => l_bflow_class_code
27685: ,p_balance_type => l_balance_type_code);
27686: ELSE
27720: , x_value_type_code => l_adr_value_type_code
27721: , p_side => 'NA'
27722: );
27723:
27724: xla_ae_lines_pkg.set_ccid(
27725: p_code_combination_id => l_ccid
27726: , p_value_type_code => l_adr_value_type_code
27727: , p_transaction_coa_id => l_adr_transaction_coa_id
27728: , p_accounting_coa_id => l_adr_accounting_coa_id
27756: xla_accounting_err_pkg.build_message
27757: (p_appli_s_name => 'XLA'
27758: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
27759: ,p_token_1 => 'LINE_NUMBER'
27760: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
27761: ,p_token_2 => 'LINE_TYPE_NAME'
27762: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
27763: l_component_type
27764: ,l_component_code
27792: --
27793: --
27794: ------------------------------------------------------------------------------------------------
27795: -- 4219869 Business Flow
27796: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27797: -- Prior Entry. Currently, the following code is always generated.
27798: ------------------------------------------------------------------------------------------------
27799: XLA_AE_LINES_PKG.ValidateCurrentLine;
27800:
27795: -- 4219869 Business Flow
27796: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
27797: -- Prior Entry. Currently, the following code is always generated.
27798: ------------------------------------------------------------------------------------------------
27799: XLA_AE_LINES_PKG.ValidateCurrentLine;
27800:
27801: ------------------------------------------------------------------------------------
27802: -- 4219869 Business Flow
27803: -- Populated credit and debit amounts -- Need to generate this within IF
27801: ------------------------------------------------------------------------------------
27802: -- 4219869 Business Flow
27803: -- Populated credit and debit amounts -- Need to generate this within IF
27804: ------------------------------------------------------------------------------------
27805: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27806:
27807: ----------------------------------------------------------------------------------
27808: -- 4219869 Business Flow
27809: -- Update journal entry status -- Need to generate this within IF
27833: -- To allow MPA report to determine if it should generate report process
27834: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27835: ------------------------------------------------------------------------------------------
27836:
27837: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27838: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27839:
27840: --
27841: -- Update the line information that should be overwritten
27834: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
27835: ------------------------------------------------------------------------------------------
27836:
27837: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
27838: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
27839:
27840: --
27841: -- Update the line information that should be overwritten
27842: --
27839:
27840: --
27841: -- Update the line information that should be overwritten
27842: --
27843: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27844: p_header_num => 1);
27845: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27846:
27847: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27841: -- Update the line information that should be overwritten
27842: --
27843: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27844: p_header_num => 1);
27845: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27846:
27847: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27848:
27849: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27843: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
27844: p_header_num => 1);
27845: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
27846:
27847: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27848:
27849: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27850: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27851: END IF;
27846:
27847: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
27848:
27849: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
27850: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
27851: END IF;
27852:
27853: --
27854: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27853: --
27854: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
27855: --
27856: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
27857: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
27858: ELSE
27859: ---------------------------------------------------------------------------------------------------
27860: -- 4262811a Switch Sign
27861: ---------------------------------------------------------------------------------------------------
27858: ELSE
27859: ---------------------------------------------------------------------------------------------------
27860: -- 4262811a Switch Sign
27861: ---------------------------------------------------------------------------------------------------
27862: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27863: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27859: ---------------------------------------------------------------------------------------------------
27860: -- 4262811a Switch Sign
27861: ---------------------------------------------------------------------------------------------------
27862: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27863: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27860: -- 4262811a Switch Sign
27861: ---------------------------------------------------------------------------------------------------
27862: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27863: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27868: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27861: ---------------------------------------------------------------------------------------------------
27862: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27863: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27868: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27869: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27862: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
27863: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27868: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27869: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27870:
27864: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27868: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27869: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27870:
27871: END IF;
27872:
27865: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
27866: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27867: -- 5132302
27868: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
27869: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
27870:
27871: END IF;
27872:
27873: -- 4955764
27870:
27871: END IF;
27872:
27873: -- 4955764
27874: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27875: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27876:
27877:
27878: XLA_AE_LINES_PKG.ValidateCurrentLine;
27874: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
27875: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27876:
27877:
27878: XLA_AE_LINES_PKG.ValidateCurrentLine;
27879: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27880:
27881: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27882: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27875: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
27876:
27877:
27878: XLA_AE_LINES_PKG.ValidateCurrentLine;
27879: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
27880:
27881: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
27882: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
27883: ,p_balance_type_code => l_balance_type_code);
28024: --
28025: -- bulk performance
28026: --
28027: l_balance_type_code VARCHAR2(1);
28028: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
28029: l_log_module VARCHAR2(240);
28030:
28031: --
28032: -- Upgrade strategy
28089: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
28090: l_balance_type_code <> 'B' THEN
28091:
28092: --
28093: XLA_AE_LINES_PKG.SetNewLine;
28094:
28095: p_balance_type_code := l_balance_type_code;
28096: -- set the flag so later we will know whether the gain loss line needs to be created
28097:
28101:
28102: --
28103: -- bulk performance
28104: --
28105: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
28106: p_header_num => 0); -- 4262811
28107: --
28108: -- set accounting line options
28109: --
28106: p_header_num => 0); -- 4262811
28107: --
28108: -- set accounting line options
28109: --
28110: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
28111: p_natural_side_code => 'D'
28112: , p_gain_or_loss_flag => 'N'
28113: , p_gl_transfer_mode_code => 'S'
28114: , p_acct_entry_type_code => 'A'
28120: --
28121: --
28122: -- set accounting line type info
28123: --
28124: xla_ae_lines_pkg.SetAcctLineType
28125: (p_component_type => l_component_type
28126: ,p_event_type_code => l_event_type_code
28127: ,p_line_definition_owner_code => l_line_definition_owner_code
28128: ,p_line_definition_code => l_line_definition_code
28134: ,p_event_class_code => l_event_class_code);
28135: --
28136: -- set accounting class
28137: --
28138: xla_ae_lines_pkg.SetAcctClass(
28139: p_accounting_class_code => 'COST'
28140: , p_ae_header_id => l_ae_header_id
28141: );
28142:
28142:
28143: --
28144: -- set rounding class
28145: --
28146: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28147: 'COST';
28148:
28149: --
28150: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28146: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28147: 'COST';
28148:
28149: --
28150: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28151: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28152: --
28153: -- bulk performance
28154: --
28147: 'COST';
28148:
28149: --
28150: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28151: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28152: --
28153: -- bulk performance
28154: --
28155: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28151: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28152: --
28153: -- bulk performance
28154: --
28155: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28156:
28157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28158: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28159:
28153: -- bulk performance
28154: --
28155: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28156:
28157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28158: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28159:
28160: -- 4955764
28161: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28157: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28158: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28159:
28160: -- 4955764
28161: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28162: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28163:
28164: -- 4458381 Public Sector Enh
28165:
28229: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
28230: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
28231: l_rec_acct_attrs.array_char_value(30) := p_source_35;
28232:
28233: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28234: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28235:
28236: ---------------------------------------------------------------------------------------------------------------
28237: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28230: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
28231: l_rec_acct_attrs.array_char_value(30) := p_source_35;
28232:
28233: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28234: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28235:
28236: ---------------------------------------------------------------------------------------------------------------
28237: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28238: ---------------------------------------------------------------------------------------------------------------
28233: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28234: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28235:
28236: ---------------------------------------------------------------------------------------------------------------
28237: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28238: ---------------------------------------------------------------------------------------------------------------
28239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28240:
28241: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28235:
28236: ---------------------------------------------------------------------------------------------------------------
28237: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28238: ---------------------------------------------------------------------------------------------------------------
28239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28240:
28241: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28242: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28243:
28237: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28238: ---------------------------------------------------------------------------------------------------------------
28239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28240:
28241: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28242: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28243:
28244: IF xla_accounting_cache_pkg.GetValueChar
28245: (p_source_code => 'LEDGER_CATEGORY_CODE'
28238: ---------------------------------------------------------------------------------------------------------------
28239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28240:
28241: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28242: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28243:
28244: IF xla_accounting_cache_pkg.GetValueChar
28245: (p_source_code => 'LEDGER_CATEGORY_CODE'
28246: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
28249: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
28250: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
28251: )
28252: THEN
28253: xla_ae_lines_pkg.BflowUpgEntry
28254: (p_business_method_code => l_bflow_method_code
28255: ,p_business_class_code => l_bflow_class_code
28256: ,p_balance_type => l_balance_type_code);
28257: ELSE
28291: , x_value_type_code => l_adr_value_type_code
28292: , p_side => 'NA'
28293: );
28294:
28295: xla_ae_lines_pkg.set_ccid(
28296: p_code_combination_id => l_ccid
28297: , p_value_type_code => l_adr_value_type_code
28298: , p_transaction_coa_id => l_adr_transaction_coa_id
28299: , p_accounting_coa_id => l_adr_accounting_coa_id
28327: xla_accounting_err_pkg.build_message
28328: (p_appli_s_name => 'XLA'
28329: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
28330: ,p_token_1 => 'LINE_NUMBER'
28331: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
28332: ,p_token_2 => 'LINE_TYPE_NAME'
28333: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
28334: l_component_type
28335: ,l_component_code
28363: --
28364: --
28365: ------------------------------------------------------------------------------------------------
28366: -- 4219869 Business Flow
28367: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28368: -- Prior Entry. Currently, the following code is always generated.
28369: ------------------------------------------------------------------------------------------------
28370: XLA_AE_LINES_PKG.ValidateCurrentLine;
28371:
28366: -- 4219869 Business Flow
28367: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28368: -- Prior Entry. Currently, the following code is always generated.
28369: ------------------------------------------------------------------------------------------------
28370: XLA_AE_LINES_PKG.ValidateCurrentLine;
28371:
28372: ------------------------------------------------------------------------------------
28373: -- 4219869 Business Flow
28374: -- Populated credit and debit amounts -- Need to generate this within IF
28372: ------------------------------------------------------------------------------------
28373: -- 4219869 Business Flow
28374: -- Populated credit and debit amounts -- Need to generate this within IF
28375: ------------------------------------------------------------------------------------
28376: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28377:
28378: ----------------------------------------------------------------------------------
28379: -- 4219869 Business Flow
28380: -- Update journal entry status -- Need to generate this within IF
28404: -- To allow MPA report to determine if it should generate report process
28405: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28406: ------------------------------------------------------------------------------------------
28407:
28408: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28409: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28410:
28411: --
28412: -- Update the line information that should be overwritten
28405: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28406: ------------------------------------------------------------------------------------------
28407:
28408: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28409: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28410:
28411: --
28412: -- Update the line information that should be overwritten
28413: --
28410:
28411: --
28412: -- Update the line information that should be overwritten
28413: --
28414: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28415: p_header_num => 1);
28416: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28417:
28418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28412: -- Update the line information that should be overwritten
28413: --
28414: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28415: p_header_num => 1);
28416: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28417:
28418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28419:
28420: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28414: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28415: p_header_num => 1);
28416: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28417:
28418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28419:
28420: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28421: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28422: END IF;
28417:
28418: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28419:
28420: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28421: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28422: END IF;
28423:
28424: --
28425: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28424: --
28425: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28426: --
28427: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
28428: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
28429: ELSE
28430: ---------------------------------------------------------------------------------------------------
28431: -- 4262811a Switch Sign
28432: ---------------------------------------------------------------------------------------------------
28429: ELSE
28430: ---------------------------------------------------------------------------------------------------
28431: -- 4262811a Switch Sign
28432: ---------------------------------------------------------------------------------------------------
28433: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28434: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28430: ---------------------------------------------------------------------------------------------------
28431: -- 4262811a Switch Sign
28432: ---------------------------------------------------------------------------------------------------
28433: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28434: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28431: -- 4262811a Switch Sign
28432: ---------------------------------------------------------------------------------------------------
28433: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28434: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28439: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28432: ---------------------------------------------------------------------------------------------------
28433: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28434: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28439: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28433: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
28434: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28439: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28441:
28435: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28439: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28441:
28442: END IF;
28443:
28436: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
28437: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28438: -- 5132302
28439: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
28440: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
28441:
28442: END IF;
28443:
28444: -- 4955764
28441:
28442: END IF;
28443:
28444: -- 4955764
28445: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28446: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28447:
28448:
28449: XLA_AE_LINES_PKG.ValidateCurrentLine;
28445: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28446: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28447:
28448:
28449: XLA_AE_LINES_PKG.ValidateCurrentLine;
28450: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28451:
28452: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28453: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28446: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
28447:
28448:
28449: XLA_AE_LINES_PKG.ValidateCurrentLine;
28450: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28451:
28452: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
28453: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
28454: ,p_balance_type_code => l_balance_type_code);
28595: --
28596: -- bulk performance
28597: --
28598: l_balance_type_code VARCHAR2(1);
28599: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
28600: l_log_module VARCHAR2(240);
28601:
28602: --
28603: -- Upgrade strategy
28660: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
28661: l_balance_type_code <> 'B' THEN
28662:
28663: --
28664: XLA_AE_LINES_PKG.SetNewLine;
28665:
28666: p_balance_type_code := l_balance_type_code;
28667: -- set the flag so later we will know whether the gain loss line needs to be created
28668:
28672:
28673: --
28674: -- bulk performance
28675: --
28676: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
28677: p_header_num => 0); -- 4262811
28678: --
28679: -- set accounting line options
28680: --
28677: p_header_num => 0); -- 4262811
28678: --
28679: -- set accounting line options
28680: --
28681: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
28682: p_natural_side_code => 'D'
28683: , p_gain_or_loss_flag => 'N'
28684: , p_gl_transfer_mode_code => 'S'
28685: , p_acct_entry_type_code => 'A'
28691: --
28692: --
28693: -- set accounting line type info
28694: --
28695: xla_ae_lines_pkg.SetAcctLineType
28696: (p_component_type => l_component_type
28697: ,p_event_type_code => l_event_type_code
28698: ,p_line_definition_owner_code => l_line_definition_owner_code
28699: ,p_line_definition_code => l_line_definition_code
28705: ,p_event_class_code => l_event_class_code);
28706: --
28707: -- set accounting class
28708: --
28709: xla_ae_lines_pkg.SetAcctClass(
28710: p_accounting_class_code => 'COST'
28711: , p_ae_header_id => l_ae_header_id
28712: );
28713:
28713:
28714: --
28715: -- set rounding class
28716: --
28717: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28718: 'COST';
28719:
28720: --
28721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28717: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
28718: 'COST';
28719:
28720: --
28721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28723: --
28724: -- bulk performance
28725: --
28718: 'COST';
28719:
28720: --
28721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
28722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28723: --
28724: -- bulk performance
28725: --
28726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
28723: --
28724: -- bulk performance
28725: --
28726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28727:
28728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28730:
28724: -- bulk performance
28725: --
28726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
28727:
28728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28730:
28731: -- 4955764
28732: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
28729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
28730:
28731: -- 4955764
28732: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
28733: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
28734:
28735: -- 4458381 Public Sector Enh
28736:
28800: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
28801: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
28802: l_rec_acct_attrs.array_char_value(30) := p_source_35;
28803:
28804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28806:
28807: ---------------------------------------------------------------------------------------------------------------
28808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28801: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
28802: l_rec_acct_attrs.array_char_value(30) := p_source_35;
28803:
28804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28806:
28807: ---------------------------------------------------------------------------------------------------------------
28808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28809: ---------------------------------------------------------------------------------------------------------------
28804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
28805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
28806:
28807: ---------------------------------------------------------------------------------------------------------------
28808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28809: ---------------------------------------------------------------------------------------------------------------
28810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28811:
28812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28806:
28807: ---------------------------------------------------------------------------------------------------------------
28808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28809: ---------------------------------------------------------------------------------------------------------------
28810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28811:
28812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28814:
28808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
28809: ---------------------------------------------------------------------------------------------------------------
28810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28811:
28812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28814:
28815: IF xla_accounting_cache_pkg.GetValueChar
28816: (p_source_code => 'LEDGER_CATEGORY_CODE'
28809: ---------------------------------------------------------------------------------------------------------------
28810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
28811:
28812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
28814:
28815: IF xla_accounting_cache_pkg.GetValueChar
28816: (p_source_code => 'LEDGER_CATEGORY_CODE'
28817: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
28820: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
28821: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
28822: )
28823: THEN
28824: xla_ae_lines_pkg.BflowUpgEntry
28825: (p_business_method_code => l_bflow_method_code
28826: ,p_business_class_code => l_bflow_class_code
28827: ,p_balance_type => l_balance_type_code);
28828: ELSE
28862: , x_value_type_code => l_adr_value_type_code
28863: , p_side => 'NA'
28864: );
28865:
28866: xla_ae_lines_pkg.set_ccid(
28867: p_code_combination_id => l_ccid
28868: , p_value_type_code => l_adr_value_type_code
28869: , p_transaction_coa_id => l_adr_transaction_coa_id
28870: , p_accounting_coa_id => l_adr_accounting_coa_id
28898: xla_accounting_err_pkg.build_message
28899: (p_appli_s_name => 'XLA'
28900: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
28901: ,p_token_1 => 'LINE_NUMBER'
28902: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
28903: ,p_token_2 => 'LINE_TYPE_NAME'
28904: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
28905: l_component_type
28906: ,l_component_code
28934: --
28935: --
28936: ------------------------------------------------------------------------------------------------
28937: -- 4219869 Business Flow
28938: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28939: -- Prior Entry. Currently, the following code is always generated.
28940: ------------------------------------------------------------------------------------------------
28941: XLA_AE_LINES_PKG.ValidateCurrentLine;
28942:
28937: -- 4219869 Business Flow
28938: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
28939: -- Prior Entry. Currently, the following code is always generated.
28940: ------------------------------------------------------------------------------------------------
28941: XLA_AE_LINES_PKG.ValidateCurrentLine;
28942:
28943: ------------------------------------------------------------------------------------
28944: -- 4219869 Business Flow
28945: -- Populated credit and debit amounts -- Need to generate this within IF
28943: ------------------------------------------------------------------------------------
28944: -- 4219869 Business Flow
28945: -- Populated credit and debit amounts -- Need to generate this within IF
28946: ------------------------------------------------------------------------------------
28947: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
28948:
28949: ----------------------------------------------------------------------------------
28950: -- 4219869 Business Flow
28951: -- Update journal entry status -- Need to generate this within IF
28975: -- To allow MPA report to determine if it should generate report process
28976: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28977: ------------------------------------------------------------------------------------------
28978:
28979: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28980: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28981:
28982: --
28983: -- Update the line information that should be overwritten
28976: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
28977: ------------------------------------------------------------------------------------------
28978:
28979: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
28980: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
28981:
28982: --
28983: -- Update the line information that should be overwritten
28984: --
28981:
28982: --
28983: -- Update the line information that should be overwritten
28984: --
28985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28986: p_header_num => 1);
28987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28988:
28989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28983: -- Update the line information that should be overwritten
28984: --
28985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28986: p_header_num => 1);
28987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28988:
28989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28990:
28991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
28986: p_header_num => 1);
28987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
28988:
28989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28990:
28991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28992: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28993: END IF;
28988:
28989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
28990:
28991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
28992: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
28993: END IF;
28994:
28995: --
28996: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28995: --
28996: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
28997: --
28998: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
28999: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
29000: ELSE
29001: ---------------------------------------------------------------------------------------------------
29002: -- 4262811a Switch Sign
29003: ---------------------------------------------------------------------------------------------------
29000: ELSE
29001: ---------------------------------------------------------------------------------------------------
29002: -- 4262811a Switch Sign
29003: ---------------------------------------------------------------------------------------------------
29004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29001: ---------------------------------------------------------------------------------------------------
29002: -- 4262811a Switch Sign
29003: ---------------------------------------------------------------------------------------------------
29004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29002: -- 4262811a Switch Sign
29003: ---------------------------------------------------------------------------------------------------
29004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29003: ---------------------------------------------------------------------------------------------------
29004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29012:
29006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29012:
29013: END IF;
29014:
29007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29009: -- 5132302
29010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29012:
29013: END IF;
29014:
29015: -- 4955764
29012:
29013: END IF;
29014:
29015: -- 4955764
29016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29018:
29019:
29020: XLA_AE_LINES_PKG.ValidateCurrentLine;
29016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29018:
29019:
29020: XLA_AE_LINES_PKG.ValidateCurrentLine;
29021: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29022:
29023: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29024: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29018:
29019:
29020: XLA_AE_LINES_PKG.ValidateCurrentLine;
29021: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29022:
29023: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29024: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29025: ,p_balance_type_code => l_balance_type_code);
29166: --
29167: -- bulk performance
29168: --
29169: l_balance_type_code VARCHAR2(1);
29170: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
29171: l_log_module VARCHAR2(240);
29172:
29173: --
29174: -- Upgrade strategy
29231: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
29232: l_balance_type_code <> 'B' THEN
29233:
29234: --
29235: XLA_AE_LINES_PKG.SetNewLine;
29236:
29237: p_balance_type_code := l_balance_type_code;
29238: -- set the flag so later we will know whether the gain loss line needs to be created
29239:
29243:
29244: --
29245: -- bulk performance
29246: --
29247: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
29248: p_header_num => 0); -- 4262811
29249: --
29250: -- set accounting line options
29251: --
29248: p_header_num => 0); -- 4262811
29249: --
29250: -- set accounting line options
29251: --
29252: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
29253: p_natural_side_code => 'D'
29254: , p_gain_or_loss_flag => 'N'
29255: , p_gl_transfer_mode_code => 'S'
29256: , p_acct_entry_type_code => 'A'
29262: --
29263: --
29264: -- set accounting line type info
29265: --
29266: xla_ae_lines_pkg.SetAcctLineType
29267: (p_component_type => l_component_type
29268: ,p_event_type_code => l_event_type_code
29269: ,p_line_definition_owner_code => l_line_definition_owner_code
29270: ,p_line_definition_code => l_line_definition_code
29276: ,p_event_class_code => l_event_class_code);
29277: --
29278: -- set accounting class
29279: --
29280: xla_ae_lines_pkg.SetAcctClass(
29281: p_accounting_class_code => 'COST'
29282: , p_ae_header_id => l_ae_header_id
29283: );
29284:
29284:
29285: --
29286: -- set rounding class
29287: --
29288: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29289: 'COST';
29290:
29291: --
29292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29288: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29289: 'COST';
29290:
29291: --
29292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29294: --
29295: -- bulk performance
29296: --
29289: 'COST';
29290:
29291: --
29292: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29294: --
29295: -- bulk performance
29296: --
29297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29293: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29294: --
29295: -- bulk performance
29296: --
29297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29298:
29299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29301:
29295: -- bulk performance
29296: --
29297: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29298:
29299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29301:
29302: -- 4955764
29303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29299: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29300: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29301:
29302: -- 4955764
29303: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29304: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29305:
29306: -- 4458381 Public Sector Enh
29307:
29371: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
29372: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
29373: l_rec_acct_attrs.array_char_value(30) := p_source_35;
29374:
29375: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29376: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29377:
29378: ---------------------------------------------------------------------------------------------------------------
29379: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29372: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
29373: l_rec_acct_attrs.array_char_value(30) := p_source_35;
29374:
29375: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29376: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29377:
29378: ---------------------------------------------------------------------------------------------------------------
29379: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29380: ---------------------------------------------------------------------------------------------------------------
29375: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29376: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29377:
29378: ---------------------------------------------------------------------------------------------------------------
29379: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29380: ---------------------------------------------------------------------------------------------------------------
29381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29382:
29383: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29377:
29378: ---------------------------------------------------------------------------------------------------------------
29379: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29380: ---------------------------------------------------------------------------------------------------------------
29381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29382:
29383: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29384: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29385:
29379: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29380: ---------------------------------------------------------------------------------------------------------------
29381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29382:
29383: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29384: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29385:
29386: IF xla_accounting_cache_pkg.GetValueChar
29387: (p_source_code => 'LEDGER_CATEGORY_CODE'
29380: ---------------------------------------------------------------------------------------------------------------
29381: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29382:
29383: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29384: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29385:
29386: IF xla_accounting_cache_pkg.GetValueChar
29387: (p_source_code => 'LEDGER_CATEGORY_CODE'
29388: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
29391: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
29392: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
29393: )
29394: THEN
29395: xla_ae_lines_pkg.BflowUpgEntry
29396: (p_business_method_code => l_bflow_method_code
29397: ,p_business_class_code => l_bflow_class_code
29398: ,p_balance_type => l_balance_type_code);
29399: ELSE
29432: , x_value_type_code => l_adr_value_type_code
29433: , p_side => 'NA'
29434: );
29435:
29436: xla_ae_lines_pkg.set_ccid(
29437: p_code_combination_id => l_ccid
29438: , p_value_type_code => l_adr_value_type_code
29439: , p_transaction_coa_id => l_adr_transaction_coa_id
29440: , p_accounting_coa_id => l_adr_accounting_coa_id
29468: xla_accounting_err_pkg.build_message
29469: (p_appli_s_name => 'XLA'
29470: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
29471: ,p_token_1 => 'LINE_NUMBER'
29472: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
29473: ,p_token_2 => 'LINE_TYPE_NAME'
29474: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
29475: l_component_type
29476: ,l_component_code
29504: --
29505: --
29506: ------------------------------------------------------------------------------------------------
29507: -- 4219869 Business Flow
29508: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
29509: -- Prior Entry. Currently, the following code is always generated.
29510: ------------------------------------------------------------------------------------------------
29511: XLA_AE_LINES_PKG.ValidateCurrentLine;
29512:
29507: -- 4219869 Business Flow
29508: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
29509: -- Prior Entry. Currently, the following code is always generated.
29510: ------------------------------------------------------------------------------------------------
29511: XLA_AE_LINES_PKG.ValidateCurrentLine;
29512:
29513: ------------------------------------------------------------------------------------
29514: -- 4219869 Business Flow
29515: -- Populated credit and debit amounts -- Need to generate this within IF
29513: ------------------------------------------------------------------------------------
29514: -- 4219869 Business Flow
29515: -- Populated credit and debit amounts -- Need to generate this within IF
29516: ------------------------------------------------------------------------------------
29517: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29518:
29519: ----------------------------------------------------------------------------------
29520: -- 4219869 Business Flow
29521: -- Update journal entry status -- Need to generate this within IF
29545: -- To allow MPA report to determine if it should generate report process
29546: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
29547: ------------------------------------------------------------------------------------------
29548:
29549: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
29550: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
29551:
29552: --
29553: -- Update the line information that should be overwritten
29546: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
29547: ------------------------------------------------------------------------------------------
29548:
29549: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
29550: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
29551:
29552: --
29553: -- Update the line information that should be overwritten
29554: --
29551:
29552: --
29553: -- Update the line information that should be overwritten
29554: --
29555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29556: p_header_num => 1);
29557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29558:
29559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29553: -- Update the line information that should be overwritten
29554: --
29555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29556: p_header_num => 1);
29557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29558:
29559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29560:
29561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
29556: p_header_num => 1);
29557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
29558:
29559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29560:
29561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29562: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
29563: END IF;
29558:
29559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
29560:
29561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
29562: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
29563: END IF;
29564:
29565: --
29566: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
29565: --
29566: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
29567: --
29568: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
29569: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
29570: ELSE
29571: ---------------------------------------------------------------------------------------------------
29572: -- 4262811a Switch Sign
29573: ---------------------------------------------------------------------------------------------------
29570: ELSE
29571: ---------------------------------------------------------------------------------------------------
29572: -- 4262811a Switch Sign
29573: ---------------------------------------------------------------------------------------------------
29574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29571: ---------------------------------------------------------------------------------------------------
29572: -- 4262811a Switch Sign
29573: ---------------------------------------------------------------------------------------------------
29574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29572: -- 4262811a Switch Sign
29573: ---------------------------------------------------------------------------------------------------
29574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29573: ---------------------------------------------------------------------------------------------------
29574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
29575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29582:
29576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29582:
29583: END IF;
29584:
29577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
29578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29579: -- 5132302
29580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
29581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
29582:
29583: END IF;
29584:
29585: -- 4955764
29582:
29583: END IF;
29584:
29585: -- 4955764
29586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29588:
29589:
29590: XLA_AE_LINES_PKG.ValidateCurrentLine;
29586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29588:
29589:
29590: XLA_AE_LINES_PKG.ValidateCurrentLine;
29591: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29592:
29593: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29594: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
29588:
29589:
29590: XLA_AE_LINES_PKG.ValidateCurrentLine;
29591: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
29592:
29593: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
29594: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
29595: ,p_balance_type_code => l_balance_type_code);
29736: --
29737: -- bulk performance
29738: --
29739: l_balance_type_code VARCHAR2(1);
29740: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
29741: l_log_module VARCHAR2(240);
29742:
29743: --
29744: -- Upgrade strategy
29801: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
29802: l_balance_type_code <> 'B' THEN
29803:
29804: --
29805: XLA_AE_LINES_PKG.SetNewLine;
29806:
29807: p_balance_type_code := l_balance_type_code;
29808: -- set the flag so later we will know whether the gain loss line needs to be created
29809:
29813:
29814: --
29815: -- bulk performance
29816: --
29817: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
29818: p_header_num => 0); -- 4262811
29819: --
29820: -- set accounting line options
29821: --
29818: p_header_num => 0); -- 4262811
29819: --
29820: -- set accounting line options
29821: --
29822: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
29823: p_natural_side_code => 'D'
29824: , p_gain_or_loss_flag => 'N'
29825: , p_gl_transfer_mode_code => 'S'
29826: , p_acct_entry_type_code => 'A'
29832: --
29833: --
29834: -- set accounting line type info
29835: --
29836: xla_ae_lines_pkg.SetAcctLineType
29837: (p_component_type => l_component_type
29838: ,p_event_type_code => l_event_type_code
29839: ,p_line_definition_owner_code => l_line_definition_owner_code
29840: ,p_line_definition_code => l_line_definition_code
29846: ,p_event_class_code => l_event_class_code);
29847: --
29848: -- set accounting class
29849: --
29850: xla_ae_lines_pkg.SetAcctClass(
29851: p_accounting_class_code => 'COST'
29852: , p_ae_header_id => l_ae_header_id
29853: );
29854:
29854:
29855: --
29856: -- set rounding class
29857: --
29858: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29859: 'COST';
29860:
29861: --
29862: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29858: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
29859: 'COST';
29860:
29861: --
29862: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29863: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29864: --
29865: -- bulk performance
29866: --
29859: 'COST';
29860:
29861: --
29862: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
29863: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29864: --
29865: -- bulk performance
29866: --
29867: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29863: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
29864: --
29865: -- bulk performance
29866: --
29867: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29868:
29869: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29870: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29871:
29865: -- bulk performance
29866: --
29867: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
29868:
29869: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29870: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29871:
29872: -- 4955764
29873: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29869: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
29870: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
29871:
29872: -- 4955764
29873: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
29874: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
29875:
29876: -- 4458381 Public Sector Enh
29877:
29941: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
29942: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
29943: l_rec_acct_attrs.array_char_value(30) := p_source_35;
29944:
29945: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29946: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29947:
29948: ---------------------------------------------------------------------------------------------------------------
29949: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29942: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
29943: l_rec_acct_attrs.array_char_value(30) := p_source_35;
29944:
29945: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29946: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29947:
29948: ---------------------------------------------------------------------------------------------------------------
29949: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29950: ---------------------------------------------------------------------------------------------------------------
29945: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
29946: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
29947:
29948: ---------------------------------------------------------------------------------------------------------------
29949: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29950: ---------------------------------------------------------------------------------------------------------------
29951: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29952:
29953: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29947:
29948: ---------------------------------------------------------------------------------------------------------------
29949: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29950: ---------------------------------------------------------------------------------------------------------------
29951: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29952:
29953: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29954: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29955:
29949: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
29950: ---------------------------------------------------------------------------------------------------------------
29951: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29952:
29953: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29954: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29955:
29956: IF xla_accounting_cache_pkg.GetValueChar
29957: (p_source_code => 'LEDGER_CATEGORY_CODE'
29950: ---------------------------------------------------------------------------------------------------------------
29951: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
29952:
29953: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29954: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
29955:
29956: IF xla_accounting_cache_pkg.GetValueChar
29957: (p_source_code => 'LEDGER_CATEGORY_CODE'
29958: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
29961: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
29962: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
29963: )
29964: THEN
29965: xla_ae_lines_pkg.BflowUpgEntry
29966: (p_business_method_code => l_bflow_method_code
29967: ,p_business_class_code => l_bflow_class_code
29968: ,p_balance_type => l_balance_type_code);
29969: ELSE
30002: , x_value_type_code => l_adr_value_type_code
30003: , p_side => 'NA'
30004: );
30005:
30006: xla_ae_lines_pkg.set_ccid(
30007: p_code_combination_id => l_ccid
30008: , p_value_type_code => l_adr_value_type_code
30009: , p_transaction_coa_id => l_adr_transaction_coa_id
30010: , p_accounting_coa_id => l_adr_accounting_coa_id
30038: xla_accounting_err_pkg.build_message
30039: (p_appli_s_name => 'XLA'
30040: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
30041: ,p_token_1 => 'LINE_NUMBER'
30042: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
30043: ,p_token_2 => 'LINE_TYPE_NAME'
30044: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
30045: l_component_type
30046: ,l_component_code
30074: --
30075: --
30076: ------------------------------------------------------------------------------------------------
30077: -- 4219869 Business Flow
30078: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30079: -- Prior Entry. Currently, the following code is always generated.
30080: ------------------------------------------------------------------------------------------------
30081: XLA_AE_LINES_PKG.ValidateCurrentLine;
30082:
30077: -- 4219869 Business Flow
30078: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30079: -- Prior Entry. Currently, the following code is always generated.
30080: ------------------------------------------------------------------------------------------------
30081: XLA_AE_LINES_PKG.ValidateCurrentLine;
30082:
30083: ------------------------------------------------------------------------------------
30084: -- 4219869 Business Flow
30085: -- Populated credit and debit amounts -- Need to generate this within IF
30083: ------------------------------------------------------------------------------------
30084: -- 4219869 Business Flow
30085: -- Populated credit and debit amounts -- Need to generate this within IF
30086: ------------------------------------------------------------------------------------
30087: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30088:
30089: ----------------------------------------------------------------------------------
30090: -- 4219869 Business Flow
30091: -- Update journal entry status -- Need to generate this within IF
30115: -- To allow MPA report to determine if it should generate report process
30116: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30117: ------------------------------------------------------------------------------------------
30118:
30119: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30120: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30121:
30122: --
30123: -- Update the line information that should be overwritten
30116: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30117: ------------------------------------------------------------------------------------------
30118:
30119: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30120: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30121:
30122: --
30123: -- Update the line information that should be overwritten
30124: --
30121:
30122: --
30123: -- Update the line information that should be overwritten
30124: --
30125: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30126: p_header_num => 1);
30127: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30128:
30129: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30123: -- Update the line information that should be overwritten
30124: --
30125: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30126: p_header_num => 1);
30127: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30128:
30129: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30130:
30131: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30125: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30126: p_header_num => 1);
30127: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30128:
30129: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30130:
30131: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30132: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30133: END IF;
30128:
30129: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30130:
30131: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30132: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30133: END IF;
30134:
30135: --
30136: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30135: --
30136: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30137: --
30138: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
30139: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
30140: ELSE
30141: ---------------------------------------------------------------------------------------------------
30142: -- 4262811a Switch Sign
30143: ---------------------------------------------------------------------------------------------------
30140: ELSE
30141: ---------------------------------------------------------------------------------------------------
30142: -- 4262811a Switch Sign
30143: ---------------------------------------------------------------------------------------------------
30144: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30141: ---------------------------------------------------------------------------------------------------
30142: -- 4262811a Switch Sign
30143: ---------------------------------------------------------------------------------------------------
30144: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30142: -- 4262811a Switch Sign
30143: ---------------------------------------------------------------------------------------------------
30144: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30143: ---------------------------------------------------------------------------------------------------
30144: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30151: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30144: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30145: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30151: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30152:
30146: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30151: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30152:
30153: END IF;
30154:
30147: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30148: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30149: -- 5132302
30150: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30151: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30152:
30153: END IF;
30154:
30155: -- 4955764
30152:
30153: END IF;
30154:
30155: -- 4955764
30156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30157: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30158:
30159:
30160: XLA_AE_LINES_PKG.ValidateCurrentLine;
30156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30157: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30158:
30159:
30160: XLA_AE_LINES_PKG.ValidateCurrentLine;
30161: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30162:
30163: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30164: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30157: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30158:
30159:
30160: XLA_AE_LINES_PKG.ValidateCurrentLine;
30161: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30162:
30163: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30164: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30165: ,p_balance_type_code => l_balance_type_code);
30306: --
30307: -- bulk performance
30308: --
30309: l_balance_type_code VARCHAR2(1);
30310: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
30311: l_log_module VARCHAR2(240);
30312:
30313: --
30314: -- Upgrade strategy
30371: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
30372: l_balance_type_code <> 'B' THEN
30373:
30374: --
30375: XLA_AE_LINES_PKG.SetNewLine;
30376:
30377: p_balance_type_code := l_balance_type_code;
30378: -- set the flag so later we will know whether the gain loss line needs to be created
30379:
30383:
30384: --
30385: -- bulk performance
30386: --
30387: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
30388: p_header_num => 0); -- 4262811
30389: --
30390: -- set accounting line options
30391: --
30388: p_header_num => 0); -- 4262811
30389: --
30390: -- set accounting line options
30391: --
30392: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
30393: p_natural_side_code => 'D'
30394: , p_gain_or_loss_flag => 'N'
30395: , p_gl_transfer_mode_code => 'S'
30396: , p_acct_entry_type_code => 'A'
30402: --
30403: --
30404: -- set accounting line type info
30405: --
30406: xla_ae_lines_pkg.SetAcctLineType
30407: (p_component_type => l_component_type
30408: ,p_event_type_code => l_event_type_code
30409: ,p_line_definition_owner_code => l_line_definition_owner_code
30410: ,p_line_definition_code => l_line_definition_code
30416: ,p_event_class_code => l_event_class_code);
30417: --
30418: -- set accounting class
30419: --
30420: xla_ae_lines_pkg.SetAcctClass(
30421: p_accounting_class_code => 'COST'
30422: , p_ae_header_id => l_ae_header_id
30423: );
30424:
30424:
30425: --
30426: -- set rounding class
30427: --
30428: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30429: 'COST';
30430:
30431: --
30432: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30428: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30429: 'COST';
30430:
30431: --
30432: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30433: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30434: --
30435: -- bulk performance
30436: --
30429: 'COST';
30430:
30431: --
30432: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30433: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30434: --
30435: -- bulk performance
30436: --
30437: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30433: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
30434: --
30435: -- bulk performance
30436: --
30437: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30438:
30439: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30440: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30441:
30435: -- bulk performance
30436: --
30437: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
30438:
30439: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30440: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30441:
30442: -- 4955764
30443: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30439: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
30440: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
30441:
30442: -- 4955764
30443: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30444: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
30445:
30446: -- 4458381 Public Sector Enh
30447:
30511: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
30512: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
30513: l_rec_acct_attrs.array_char_value(30) := p_source_35;
30514:
30515: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30516: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30517:
30518: ---------------------------------------------------------------------------------------------------------------
30519: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30512: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
30513: l_rec_acct_attrs.array_char_value(30) := p_source_35;
30514:
30515: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30516: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30517:
30518: ---------------------------------------------------------------------------------------------------------------
30519: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30520: ---------------------------------------------------------------------------------------------------------------
30515: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
30516: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
30517:
30518: ---------------------------------------------------------------------------------------------------------------
30519: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30520: ---------------------------------------------------------------------------------------------------------------
30521: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30522:
30523: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30517:
30518: ---------------------------------------------------------------------------------------------------------------
30519: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30520: ---------------------------------------------------------------------------------------------------------------
30521: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30522:
30523: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30524: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30525:
30519: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
30520: ---------------------------------------------------------------------------------------------------------------
30521: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30522:
30523: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30524: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30525:
30526: IF xla_accounting_cache_pkg.GetValueChar
30527: (p_source_code => 'LEDGER_CATEGORY_CODE'
30520: ---------------------------------------------------------------------------------------------------------------
30521: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
30522:
30523: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30524: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
30525:
30526: IF xla_accounting_cache_pkg.GetValueChar
30527: (p_source_code => 'LEDGER_CATEGORY_CODE'
30528: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
30531: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
30532: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
30533: )
30534: THEN
30535: xla_ae_lines_pkg.BflowUpgEntry
30536: (p_business_method_code => l_bflow_method_code
30537: ,p_business_class_code => l_bflow_class_code
30538: ,p_balance_type => l_balance_type_code);
30539: ELSE
30572: , x_value_type_code => l_adr_value_type_code
30573: , p_side => 'NA'
30574: );
30575:
30576: xla_ae_lines_pkg.set_ccid(
30577: p_code_combination_id => l_ccid
30578: , p_value_type_code => l_adr_value_type_code
30579: , p_transaction_coa_id => l_adr_transaction_coa_id
30580: , p_accounting_coa_id => l_adr_accounting_coa_id
30608: xla_accounting_err_pkg.build_message
30609: (p_appli_s_name => 'XLA'
30610: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
30611: ,p_token_1 => 'LINE_NUMBER'
30612: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
30613: ,p_token_2 => 'LINE_TYPE_NAME'
30614: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
30615: l_component_type
30616: ,l_component_code
30644: --
30645: --
30646: ------------------------------------------------------------------------------------------------
30647: -- 4219869 Business Flow
30648: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30649: -- Prior Entry. Currently, the following code is always generated.
30650: ------------------------------------------------------------------------------------------------
30651: XLA_AE_LINES_PKG.ValidateCurrentLine;
30652:
30647: -- 4219869 Business Flow
30648: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
30649: -- Prior Entry. Currently, the following code is always generated.
30650: ------------------------------------------------------------------------------------------------
30651: XLA_AE_LINES_PKG.ValidateCurrentLine;
30652:
30653: ------------------------------------------------------------------------------------
30654: -- 4219869 Business Flow
30655: -- Populated credit and debit amounts -- Need to generate this within IF
30653: ------------------------------------------------------------------------------------
30654: -- 4219869 Business Flow
30655: -- Populated credit and debit amounts -- Need to generate this within IF
30656: ------------------------------------------------------------------------------------
30657: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30658:
30659: ----------------------------------------------------------------------------------
30660: -- 4219869 Business Flow
30661: -- Update journal entry status -- Need to generate this within IF
30685: -- To allow MPA report to determine if it should generate report process
30686: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30687: ------------------------------------------------------------------------------------------
30688:
30689: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30690: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30691:
30692: --
30693: -- Update the line information that should be overwritten
30686: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
30687: ------------------------------------------------------------------------------------------
30688:
30689: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
30690: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
30691:
30692: --
30693: -- Update the line information that should be overwritten
30694: --
30691:
30692: --
30693: -- Update the line information that should be overwritten
30694: --
30695: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30696: p_header_num => 1);
30697: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30698:
30699: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30693: -- Update the line information that should be overwritten
30694: --
30695: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30696: p_header_num => 1);
30697: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30698:
30699: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30700:
30701: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30695: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
30696: p_header_num => 1);
30697: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
30698:
30699: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30700:
30701: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30702: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30703: END IF;
30698:
30699: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
30700:
30701: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
30702: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
30703: END IF;
30704:
30705: --
30706: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30705: --
30706: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
30707: --
30708: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
30709: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
30710: ELSE
30711: ---------------------------------------------------------------------------------------------------
30712: -- 4262811a Switch Sign
30713: ---------------------------------------------------------------------------------------------------
30710: ELSE
30711: ---------------------------------------------------------------------------------------------------
30712: -- 4262811a Switch Sign
30713: ---------------------------------------------------------------------------------------------------
30714: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30715: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30711: ---------------------------------------------------------------------------------------------------
30712: -- 4262811a Switch Sign
30713: ---------------------------------------------------------------------------------------------------
30714: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30715: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30712: -- 4262811a Switch Sign
30713: ---------------------------------------------------------------------------------------------------
30714: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30715: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30720: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30713: ---------------------------------------------------------------------------------------------------
30714: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30715: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30720: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30714: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
30715: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30720: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30722:
30716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30720: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30722:
30723: END IF;
30724:
30717: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
30718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30719: -- 5132302
30720: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
30721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
30722:
30723: END IF;
30724:
30725: -- 4955764
30722:
30723: END IF;
30724:
30725: -- 4955764
30726: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30727: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30728:
30729:
30730: XLA_AE_LINES_PKG.ValidateCurrentLine;
30726: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
30727: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30728:
30729:
30730: XLA_AE_LINES_PKG.ValidateCurrentLine;
30731: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30732:
30733: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30734: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30727: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
30728:
30729:
30730: XLA_AE_LINES_PKG.ValidateCurrentLine;
30731: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
30732:
30733: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
30734: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
30735: ,p_balance_type_code => l_balance_type_code);
30876: --
30877: -- bulk performance
30878: --
30879: l_balance_type_code VARCHAR2(1);
30880: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
30881: l_log_module VARCHAR2(240);
30882:
30883: --
30884: -- Upgrade strategy
30941: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
30942: l_balance_type_code <> 'B' THEN
30943:
30944: --
30945: XLA_AE_LINES_PKG.SetNewLine;
30946:
30947: p_balance_type_code := l_balance_type_code;
30948: -- set the flag so later we will know whether the gain loss line needs to be created
30949:
30953:
30954: --
30955: -- bulk performance
30956: --
30957: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
30958: p_header_num => 0); -- 4262811
30959: --
30960: -- set accounting line options
30961: --
30958: p_header_num => 0); -- 4262811
30959: --
30960: -- set accounting line options
30961: --
30962: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
30963: p_natural_side_code => 'D'
30964: , p_gain_or_loss_flag => 'N'
30965: , p_gl_transfer_mode_code => 'S'
30966: , p_acct_entry_type_code => 'A'
30972: --
30973: --
30974: -- set accounting line type info
30975: --
30976: xla_ae_lines_pkg.SetAcctLineType
30977: (p_component_type => l_component_type
30978: ,p_event_type_code => l_event_type_code
30979: ,p_line_definition_owner_code => l_line_definition_owner_code
30980: ,p_line_definition_code => l_line_definition_code
30986: ,p_event_class_code => l_event_class_code);
30987: --
30988: -- set accounting class
30989: --
30990: xla_ae_lines_pkg.SetAcctClass(
30991: p_accounting_class_code => 'COST'
30992: , p_ae_header_id => l_ae_header_id
30993: );
30994:
30994:
30995: --
30996: -- set rounding class
30997: --
30998: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30999: 'COST';
31000:
31001: --
31002: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
30998: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
30999: 'COST';
31000:
31001: --
31002: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31003: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31004: --
31005: -- bulk performance
31006: --
30999: 'COST';
31000:
31001: --
31002: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31003: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31004: --
31005: -- bulk performance
31006: --
31007: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31003: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31004: --
31005: -- bulk performance
31006: --
31007: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31008:
31009: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31010: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31011:
31005: -- bulk performance
31006: --
31007: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31008:
31009: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31010: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31011:
31012: -- 4955764
31013: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31009: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31010: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31011:
31012: -- 4955764
31013: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31014: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31015:
31016: -- 4458381 Public Sector Enh
31017:
31081: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
31082: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
31083: l_rec_acct_attrs.array_char_value(30) := p_source_35;
31084:
31085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31087:
31088: ---------------------------------------------------------------------------------------------------------------
31089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31082: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
31083: l_rec_acct_attrs.array_char_value(30) := p_source_35;
31084:
31085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31087:
31088: ---------------------------------------------------------------------------------------------------------------
31089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31090: ---------------------------------------------------------------------------------------------------------------
31085: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31086: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31087:
31088: ---------------------------------------------------------------------------------------------------------------
31089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31090: ---------------------------------------------------------------------------------------------------------------
31091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31092:
31093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31087:
31088: ---------------------------------------------------------------------------------------------------------------
31089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31090: ---------------------------------------------------------------------------------------------------------------
31091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31092:
31093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31095:
31089: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31090: ---------------------------------------------------------------------------------------------------------------
31091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31092:
31093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31095:
31096: IF xla_accounting_cache_pkg.GetValueChar
31097: (p_source_code => 'LEDGER_CATEGORY_CODE'
31090: ---------------------------------------------------------------------------------------------------------------
31091: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31092:
31093: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31094: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31095:
31096: IF xla_accounting_cache_pkg.GetValueChar
31097: (p_source_code => 'LEDGER_CATEGORY_CODE'
31098: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
31101: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
31102: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
31103: )
31104: THEN
31105: xla_ae_lines_pkg.BflowUpgEntry
31106: (p_business_method_code => l_bflow_method_code
31107: ,p_business_class_code => l_bflow_class_code
31108: ,p_balance_type => l_balance_type_code);
31109: ELSE
31142: , x_value_type_code => l_adr_value_type_code
31143: , p_side => 'NA'
31144: );
31145:
31146: xla_ae_lines_pkg.set_ccid(
31147: p_code_combination_id => l_ccid
31148: , p_value_type_code => l_adr_value_type_code
31149: , p_transaction_coa_id => l_adr_transaction_coa_id
31150: , p_accounting_coa_id => l_adr_accounting_coa_id
31178: xla_accounting_err_pkg.build_message
31179: (p_appli_s_name => 'XLA'
31180: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
31181: ,p_token_1 => 'LINE_NUMBER'
31182: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
31183: ,p_token_2 => 'LINE_TYPE_NAME'
31184: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
31185: l_component_type
31186: ,l_component_code
31214: --
31215: --
31216: ------------------------------------------------------------------------------------------------
31217: -- 4219869 Business Flow
31218: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31219: -- Prior Entry. Currently, the following code is always generated.
31220: ------------------------------------------------------------------------------------------------
31221: XLA_AE_LINES_PKG.ValidateCurrentLine;
31222:
31217: -- 4219869 Business Flow
31218: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31219: -- Prior Entry. Currently, the following code is always generated.
31220: ------------------------------------------------------------------------------------------------
31221: XLA_AE_LINES_PKG.ValidateCurrentLine;
31222:
31223: ------------------------------------------------------------------------------------
31224: -- 4219869 Business Flow
31225: -- Populated credit and debit amounts -- Need to generate this within IF
31223: ------------------------------------------------------------------------------------
31224: -- 4219869 Business Flow
31225: -- Populated credit and debit amounts -- Need to generate this within IF
31226: ------------------------------------------------------------------------------------
31227: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31228:
31229: ----------------------------------------------------------------------------------
31230: -- 4219869 Business Flow
31231: -- Update journal entry status -- Need to generate this within IF
31255: -- To allow MPA report to determine if it should generate report process
31256: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31257: ------------------------------------------------------------------------------------------
31258:
31259: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31260: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31261:
31262: --
31263: -- Update the line information that should be overwritten
31256: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31257: ------------------------------------------------------------------------------------------
31258:
31259: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31260: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31261:
31262: --
31263: -- Update the line information that should be overwritten
31264: --
31261:
31262: --
31263: -- Update the line information that should be overwritten
31264: --
31265: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31266: p_header_num => 1);
31267: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31268:
31269: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31263: -- Update the line information that should be overwritten
31264: --
31265: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31266: p_header_num => 1);
31267: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31268:
31269: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31270:
31271: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31265: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31266: p_header_num => 1);
31267: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31268:
31269: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31270:
31271: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31272: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31273: END IF;
31268:
31269: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31270:
31271: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31272: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31273: END IF;
31274:
31275: --
31276: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31275: --
31276: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31277: --
31278: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
31279: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
31280: ELSE
31281: ---------------------------------------------------------------------------------------------------
31282: -- 4262811a Switch Sign
31283: ---------------------------------------------------------------------------------------------------
31280: ELSE
31281: ---------------------------------------------------------------------------------------------------
31282: -- 4262811a Switch Sign
31283: ---------------------------------------------------------------------------------------------------
31284: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31285: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31281: ---------------------------------------------------------------------------------------------------
31282: -- 4262811a Switch Sign
31283: ---------------------------------------------------------------------------------------------------
31284: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31285: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31282: -- 4262811a Switch Sign
31283: ---------------------------------------------------------------------------------------------------
31284: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31285: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31290: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31283: ---------------------------------------------------------------------------------------------------
31284: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31285: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31290: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31291: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31284: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31285: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31290: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31291: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31292:
31286: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31290: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31291: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31292:
31293: END IF;
31294:
31287: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31288: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31289: -- 5132302
31290: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31291: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31292:
31293: END IF;
31294:
31295: -- 4955764
31292:
31293: END IF;
31294:
31295: -- 4955764
31296: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31297: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31298:
31299:
31300: XLA_AE_LINES_PKG.ValidateCurrentLine;
31296: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31297: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31298:
31299:
31300: XLA_AE_LINES_PKG.ValidateCurrentLine;
31301: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31302:
31303: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31304: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31297: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31298:
31299:
31300: XLA_AE_LINES_PKG.ValidateCurrentLine;
31301: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31302:
31303: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31304: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31305: ,p_balance_type_code => l_balance_type_code);
31446: --
31447: -- bulk performance
31448: --
31449: l_balance_type_code VARCHAR2(1);
31450: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
31451: l_log_module VARCHAR2(240);
31452:
31453: --
31454: -- Upgrade strategy
31511: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
31512: l_balance_type_code <> 'B' THEN
31513:
31514: --
31515: XLA_AE_LINES_PKG.SetNewLine;
31516:
31517: p_balance_type_code := l_balance_type_code;
31518: -- set the flag so later we will know whether the gain loss line needs to be created
31519:
31523:
31524: --
31525: -- bulk performance
31526: --
31527: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
31528: p_header_num => 0); -- 4262811
31529: --
31530: -- set accounting line options
31531: --
31528: p_header_num => 0); -- 4262811
31529: --
31530: -- set accounting line options
31531: --
31532: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
31533: p_natural_side_code => 'D'
31534: , p_gain_or_loss_flag => 'N'
31535: , p_gl_transfer_mode_code => 'S'
31536: , p_acct_entry_type_code => 'A'
31542: --
31543: --
31544: -- set accounting line type info
31545: --
31546: xla_ae_lines_pkg.SetAcctLineType
31547: (p_component_type => l_component_type
31548: ,p_event_type_code => l_event_type_code
31549: ,p_line_definition_owner_code => l_line_definition_owner_code
31550: ,p_line_definition_code => l_line_definition_code
31556: ,p_event_class_code => l_event_class_code);
31557: --
31558: -- set accounting class
31559: --
31560: xla_ae_lines_pkg.SetAcctClass(
31561: p_accounting_class_code => 'COST'
31562: , p_ae_header_id => l_ae_header_id
31563: );
31564:
31564:
31565: --
31566: -- set rounding class
31567: --
31568: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31569: 'COST';
31570:
31571: --
31572: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31568: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
31569: 'COST';
31570:
31571: --
31572: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31573: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31574: --
31575: -- bulk performance
31576: --
31569: 'COST';
31570:
31571: --
31572: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
31573: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31574: --
31575: -- bulk performance
31576: --
31577: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31573: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
31574: --
31575: -- bulk performance
31576: --
31577: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31578:
31579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31580: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31581:
31575: -- bulk performance
31576: --
31577: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
31578:
31579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31580: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31581:
31582: -- 4955764
31583: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31579: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
31580: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
31581:
31582: -- 4955764
31583: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31584: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
31585:
31586: -- 4458381 Public Sector Enh
31587:
31651: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
31652: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
31653: l_rec_acct_attrs.array_char_value(30) := p_source_35;
31654:
31655: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31656: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31657:
31658: ---------------------------------------------------------------------------------------------------------------
31659: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31652: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
31653: l_rec_acct_attrs.array_char_value(30) := p_source_35;
31654:
31655: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31656: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31657:
31658: ---------------------------------------------------------------------------------------------------------------
31659: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31660: ---------------------------------------------------------------------------------------------------------------
31655: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
31656: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
31657:
31658: ---------------------------------------------------------------------------------------------------------------
31659: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31660: ---------------------------------------------------------------------------------------------------------------
31661: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31662:
31663: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31657:
31658: ---------------------------------------------------------------------------------------------------------------
31659: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31660: ---------------------------------------------------------------------------------------------------------------
31661: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31662:
31663: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31664: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31665:
31659: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
31660: ---------------------------------------------------------------------------------------------------------------
31661: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31662:
31663: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31664: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31665:
31666: IF xla_accounting_cache_pkg.GetValueChar
31667: (p_source_code => 'LEDGER_CATEGORY_CODE'
31660: ---------------------------------------------------------------------------------------------------------------
31661: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
31662:
31663: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31664: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
31665:
31666: IF xla_accounting_cache_pkg.GetValueChar
31667: (p_source_code => 'LEDGER_CATEGORY_CODE'
31668: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
31671: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
31672: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
31673: )
31674: THEN
31675: xla_ae_lines_pkg.BflowUpgEntry
31676: (p_business_method_code => l_bflow_method_code
31677: ,p_business_class_code => l_bflow_class_code
31678: ,p_balance_type => l_balance_type_code);
31679: ELSE
31712: , x_value_type_code => l_adr_value_type_code
31713: , p_side => 'NA'
31714: );
31715:
31716: xla_ae_lines_pkg.set_ccid(
31717: p_code_combination_id => l_ccid
31718: , p_value_type_code => l_adr_value_type_code
31719: , p_transaction_coa_id => l_adr_transaction_coa_id
31720: , p_accounting_coa_id => l_adr_accounting_coa_id
31748: xla_accounting_err_pkg.build_message
31749: (p_appli_s_name => 'XLA'
31750: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
31751: ,p_token_1 => 'LINE_NUMBER'
31752: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
31753: ,p_token_2 => 'LINE_TYPE_NAME'
31754: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
31755: l_component_type
31756: ,l_component_code
31784: --
31785: --
31786: ------------------------------------------------------------------------------------------------
31787: -- 4219869 Business Flow
31788: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31789: -- Prior Entry. Currently, the following code is always generated.
31790: ------------------------------------------------------------------------------------------------
31791: XLA_AE_LINES_PKG.ValidateCurrentLine;
31792:
31787: -- 4219869 Business Flow
31788: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
31789: -- Prior Entry. Currently, the following code is always generated.
31790: ------------------------------------------------------------------------------------------------
31791: XLA_AE_LINES_PKG.ValidateCurrentLine;
31792:
31793: ------------------------------------------------------------------------------------
31794: -- 4219869 Business Flow
31795: -- Populated credit and debit amounts -- Need to generate this within IF
31793: ------------------------------------------------------------------------------------
31794: -- 4219869 Business Flow
31795: -- Populated credit and debit amounts -- Need to generate this within IF
31796: ------------------------------------------------------------------------------------
31797: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31798:
31799: ----------------------------------------------------------------------------------
31800: -- 4219869 Business Flow
31801: -- Update journal entry status -- Need to generate this within IF
31825: -- To allow MPA report to determine if it should generate report process
31826: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31827: ------------------------------------------------------------------------------------------
31828:
31829: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31830: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31831:
31832: --
31833: -- Update the line information that should be overwritten
31826: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
31827: ------------------------------------------------------------------------------------------
31828:
31829: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
31830: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
31831:
31832: --
31833: -- Update the line information that should be overwritten
31834: --
31831:
31832: --
31833: -- Update the line information that should be overwritten
31834: --
31835: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31836: p_header_num => 1);
31837: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31838:
31839: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31833: -- Update the line information that should be overwritten
31834: --
31835: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31836: p_header_num => 1);
31837: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31838:
31839: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31840:
31841: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31835: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
31836: p_header_num => 1);
31837: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
31838:
31839: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31840:
31841: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31842: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31843: END IF;
31838:
31839: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
31840:
31841: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
31842: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
31843: END IF;
31844:
31845: --
31846: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31845: --
31846: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
31847: --
31848: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
31849: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
31850: ELSE
31851: ---------------------------------------------------------------------------------------------------
31852: -- 4262811a Switch Sign
31853: ---------------------------------------------------------------------------------------------------
31850: ELSE
31851: ---------------------------------------------------------------------------------------------------
31852: -- 4262811a Switch Sign
31853: ---------------------------------------------------------------------------------------------------
31854: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31855: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31851: ---------------------------------------------------------------------------------------------------
31852: -- 4262811a Switch Sign
31853: ---------------------------------------------------------------------------------------------------
31854: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31855: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31852: -- 4262811a Switch Sign
31853: ---------------------------------------------------------------------------------------------------
31854: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31855: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31860: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31853: ---------------------------------------------------------------------------------------------------
31854: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31855: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31860: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31861: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31854: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
31855: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31860: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31861: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31862:
31856: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31860: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31861: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31862:
31863: END IF;
31864:
31857: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
31858: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31859: -- 5132302
31860: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
31861: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
31862:
31863: END IF;
31864:
31865: -- 4955764
31862:
31863: END IF;
31864:
31865: -- 4955764
31866: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31867: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31868:
31869:
31870: XLA_AE_LINES_PKG.ValidateCurrentLine;
31866: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
31867: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31868:
31869:
31870: XLA_AE_LINES_PKG.ValidateCurrentLine;
31871: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31872:
31873: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31874: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31867: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
31868:
31869:
31870: XLA_AE_LINES_PKG.ValidateCurrentLine;
31871: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
31872:
31873: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
31874: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
31875: ,p_balance_type_code => l_balance_type_code);
32018: --
32019: -- bulk performance
32020: --
32021: l_balance_type_code VARCHAR2(1);
32022: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
32023: l_log_module VARCHAR2(240);
32024:
32025: --
32026: -- Upgrade strategy
32086: ') = 'N'
32087: THEN
32088:
32089: --
32090: XLA_AE_LINES_PKG.SetNewLine;
32091:
32092: p_balance_type_code := l_balance_type_code;
32093: -- set the flag so later we will know whether the gain loss line needs to be created
32094:
32098:
32099: --
32100: -- bulk performance
32101: --
32102: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
32103: p_header_num => 0); -- 4262811
32104: --
32105: -- set accounting line options
32106: --
32103: p_header_num => 0); -- 4262811
32104: --
32105: -- set accounting line options
32106: --
32107: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
32108: p_natural_side_code => 'D'
32109: , p_gain_or_loss_flag => 'N'
32110: , p_gl_transfer_mode_code => 'S'
32111: , p_acct_entry_type_code => 'A'
32117: --
32118: --
32119: -- set accounting line type info
32120: --
32121: xla_ae_lines_pkg.SetAcctLineType
32122: (p_component_type => l_component_type
32123: ,p_event_type_code => l_event_type_code
32124: ,p_line_definition_owner_code => l_line_definition_owner_code
32125: ,p_line_definition_code => l_line_definition_code
32131: ,p_event_class_code => l_event_class_code);
32132: --
32133: -- set accounting class
32134: --
32135: xla_ae_lines_pkg.SetAcctClass(
32136: p_accounting_class_code => 'COST'
32137: , p_ae_header_id => l_ae_header_id
32138: );
32139:
32139:
32140: --
32141: -- set rounding class
32142: --
32143: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32144: 'COST';
32145:
32146: --
32147: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32143: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32144: 'COST';
32145:
32146: --
32147: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32148: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32149: --
32150: -- bulk performance
32151: --
32144: 'COST';
32145:
32146: --
32147: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32148: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32149: --
32150: -- bulk performance
32151: --
32152: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32148: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32149: --
32150: -- bulk performance
32151: --
32152: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32153:
32154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32155: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32156:
32150: -- bulk performance
32151: --
32152: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32153:
32154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32155: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32156:
32157: -- 4955764
32158: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32154: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32155: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32156:
32157: -- 4955764
32158: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32159: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
32160:
32161: -- 4458381 Public Sector Enh
32162:
32226: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
32227: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
32228: l_rec_acct_attrs.array_char_value(30) := p_source_35;
32229:
32230: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32231: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32232:
32233: ---------------------------------------------------------------------------------------------------------------
32234: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32227: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
32228: l_rec_acct_attrs.array_char_value(30) := p_source_35;
32229:
32230: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32231: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32232:
32233: ---------------------------------------------------------------------------------------------------------------
32234: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32235: ---------------------------------------------------------------------------------------------------------------
32230: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32231: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32232:
32233: ---------------------------------------------------------------------------------------------------------------
32234: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32235: ---------------------------------------------------------------------------------------------------------------
32236: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32237:
32238: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32232:
32233: ---------------------------------------------------------------------------------------------------------------
32234: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32235: ---------------------------------------------------------------------------------------------------------------
32236: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32237:
32238: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32239: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32240:
32234: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32235: ---------------------------------------------------------------------------------------------------------------
32236: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32237:
32238: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32239: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32240:
32241: IF xla_accounting_cache_pkg.GetValueChar
32242: (p_source_code => 'LEDGER_CATEGORY_CODE'
32235: ---------------------------------------------------------------------------------------------------------------
32236: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32237:
32238: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32239: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32240:
32241: IF xla_accounting_cache_pkg.GetValueChar
32242: (p_source_code => 'LEDGER_CATEGORY_CODE'
32243: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
32246: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
32247: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
32248: )
32249: THEN
32250: xla_ae_lines_pkg.BflowUpgEntry
32251: (p_business_method_code => l_bflow_method_code
32252: ,p_business_class_code => l_bflow_class_code
32253: ,p_balance_type => l_balance_type_code);
32254: ELSE
32287: , x_value_type_code => l_adr_value_type_code
32288: , p_side => 'NA'
32289: );
32290:
32291: xla_ae_lines_pkg.set_ccid(
32292: p_code_combination_id => l_ccid
32293: , p_value_type_code => l_adr_value_type_code
32294: , p_transaction_coa_id => l_adr_transaction_coa_id
32295: , p_accounting_coa_id => l_adr_accounting_coa_id
32323: xla_accounting_err_pkg.build_message
32324: (p_appli_s_name => 'XLA'
32325: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
32326: ,p_token_1 => 'LINE_NUMBER'
32327: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
32328: ,p_token_2 => 'LINE_TYPE_NAME'
32329: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
32330: l_component_type
32331: ,l_component_code
32359: --
32360: --
32361: ------------------------------------------------------------------------------------------------
32362: -- 4219869 Business Flow
32363: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32364: -- Prior Entry. Currently, the following code is always generated.
32365: ------------------------------------------------------------------------------------------------
32366: XLA_AE_LINES_PKG.ValidateCurrentLine;
32367:
32362: -- 4219869 Business Flow
32363: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32364: -- Prior Entry. Currently, the following code is always generated.
32365: ------------------------------------------------------------------------------------------------
32366: XLA_AE_LINES_PKG.ValidateCurrentLine;
32367:
32368: ------------------------------------------------------------------------------------
32369: -- 4219869 Business Flow
32370: -- Populated credit and debit amounts -- Need to generate this within IF
32368: ------------------------------------------------------------------------------------
32369: -- 4219869 Business Flow
32370: -- Populated credit and debit amounts -- Need to generate this within IF
32371: ------------------------------------------------------------------------------------
32372: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32373:
32374: ----------------------------------------------------------------------------------
32375: -- 4219869 Business Flow
32376: -- Update journal entry status -- Need to generate this within IF
32400: -- To allow MPA report to determine if it should generate report process
32401: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32402: ------------------------------------------------------------------------------------------
32403:
32404: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32405: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32406:
32407: --
32408: -- Update the line information that should be overwritten
32401: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
32402: ------------------------------------------------------------------------------------------
32403:
32404: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
32405: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
32406:
32407: --
32408: -- Update the line information that should be overwritten
32409: --
32406:
32407: --
32408: -- Update the line information that should be overwritten
32409: --
32410: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32411: p_header_num => 1);
32412: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32413:
32414: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32408: -- Update the line information that should be overwritten
32409: --
32410: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32411: p_header_num => 1);
32412: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32413:
32414: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32415:
32416: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32410: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
32411: p_header_num => 1);
32412: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
32413:
32414: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32415:
32416: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32417: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32418: END IF;
32413:
32414: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
32415:
32416: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
32417: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
32418: END IF;
32419:
32420: --
32421: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32420: --
32421: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
32422: --
32423: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
32424: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
32425: ELSE
32426: ---------------------------------------------------------------------------------------------------
32427: -- 4262811a Switch Sign
32428: ---------------------------------------------------------------------------------------------------
32425: ELSE
32426: ---------------------------------------------------------------------------------------------------
32427: -- 4262811a Switch Sign
32428: ---------------------------------------------------------------------------------------------------
32429: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32426: ---------------------------------------------------------------------------------------------------
32427: -- 4262811a Switch Sign
32428: ---------------------------------------------------------------------------------------------------
32429: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32427: -- 4262811a Switch Sign
32428: ---------------------------------------------------------------------------------------------------
32429: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32428: ---------------------------------------------------------------------------------------------------
32429: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32436: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32429: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
32430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32436: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32437:
32431: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32436: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32437:
32438: END IF;
32439:
32432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
32433: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32434: -- 5132302
32435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
32436: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
32437:
32438: END IF;
32439:
32440: -- 4955764
32437:
32438: END IF;
32439:
32440: -- 4955764
32441: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32442: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32443:
32444:
32445: XLA_AE_LINES_PKG.ValidateCurrentLine;
32441: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32442: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32443:
32444:
32445: XLA_AE_LINES_PKG.ValidateCurrentLine;
32446: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32447:
32448: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32449: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32442: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
32443:
32444:
32445: XLA_AE_LINES_PKG.ValidateCurrentLine;
32446: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32447:
32448: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
32449: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
32450: ,p_balance_type_code => l_balance_type_code);
32594: --
32595: -- bulk performance
32596: --
32597: l_balance_type_code VARCHAR2(1);
32598: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
32599: l_log_module VARCHAR2(240);
32600:
32601: --
32602: -- Upgrade strategy
32662: ') = 'N'
32663: THEN
32664:
32665: --
32666: XLA_AE_LINES_PKG.SetNewLine;
32667:
32668: p_balance_type_code := l_balance_type_code;
32669: -- set the flag so later we will know whether the gain loss line needs to be created
32670:
32674:
32675: --
32676: -- bulk performance
32677: --
32678: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
32679: p_header_num => 0); -- 4262811
32680: --
32681: -- set accounting line options
32682: --
32679: p_header_num => 0); -- 4262811
32680: --
32681: -- set accounting line options
32682: --
32683: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
32684: p_natural_side_code => 'C'
32685: , p_gain_or_loss_flag => 'N'
32686: , p_gl_transfer_mode_code => 'S'
32687: , p_acct_entry_type_code => 'A'
32693: --
32694: --
32695: -- set accounting line type info
32696: --
32697: xla_ae_lines_pkg.SetAcctLineType
32698: (p_component_type => l_component_type
32699: ,p_event_type_code => l_event_type_code
32700: ,p_line_definition_owner_code => l_line_definition_owner_code
32701: ,p_line_definition_code => l_line_definition_code
32707: ,p_event_class_code => l_event_class_code);
32708: --
32709: -- set accounting class
32710: --
32711: xla_ae_lines_pkg.SetAcctClass(
32712: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
32713: , p_ae_header_id => l_ae_header_id
32714: );
32715:
32715:
32716: --
32717: -- set rounding class
32718: --
32719: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32720: 'FEDERAL_PROJECT_COST_CLEARING';
32721:
32722: --
32723: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32719: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
32720: 'FEDERAL_PROJECT_COST_CLEARING';
32721:
32722: --
32723: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32724: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32725: --
32726: -- bulk performance
32727: --
32720: 'FEDERAL_PROJECT_COST_CLEARING';
32721:
32722: --
32723: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
32724: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32725: --
32726: -- bulk performance
32727: --
32728: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32724: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
32725: --
32726: -- bulk performance
32727: --
32728: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32729:
32730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32731: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32732:
32726: -- bulk performance
32727: --
32728: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
32729:
32730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32731: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32732:
32733: -- 4955764
32734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32730: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
32731: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
32732:
32733: -- 4955764
32734: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
32735: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
32736:
32737: -- 4458381 Public Sector Enh
32738:
32802: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
32803: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
32804: l_rec_acct_attrs.array_char_value(30) := p_source_35;
32805:
32806: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32807: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32808:
32809: ---------------------------------------------------------------------------------------------------------------
32810: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32803: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
32804: l_rec_acct_attrs.array_char_value(30) := p_source_35;
32805:
32806: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32807: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32808:
32809: ---------------------------------------------------------------------------------------------------------------
32810: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32811: ---------------------------------------------------------------------------------------------------------------
32806: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
32807: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
32808:
32809: ---------------------------------------------------------------------------------------------------------------
32810: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32811: ---------------------------------------------------------------------------------------------------------------
32812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32813:
32814: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32808:
32809: ---------------------------------------------------------------------------------------------------------------
32810: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32811: ---------------------------------------------------------------------------------------------------------------
32812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32813:
32814: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32815: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32816:
32810: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
32811: ---------------------------------------------------------------------------------------------------------------
32812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32813:
32814: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32815: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32816:
32817: IF xla_accounting_cache_pkg.GetValueChar
32818: (p_source_code => 'LEDGER_CATEGORY_CODE'
32811: ---------------------------------------------------------------------------------------------------------------
32812: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
32813:
32814: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32815: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
32816:
32817: IF xla_accounting_cache_pkg.GetValueChar
32818: (p_source_code => 'LEDGER_CATEGORY_CODE'
32819: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
32822: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
32823: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
32824: )
32825: THEN
32826: xla_ae_lines_pkg.BflowUpgEntry
32827: (p_business_method_code => l_bflow_method_code
32828: ,p_business_class_code => l_bflow_class_code
32829: ,p_balance_type => l_balance_type_code);
32830: ELSE
32863: , x_value_type_code => l_adr_value_type_code
32864: , p_side => 'NA'
32865: );
32866:
32867: xla_ae_lines_pkg.set_ccid(
32868: p_code_combination_id => l_ccid
32869: , p_value_type_code => l_adr_value_type_code
32870: , p_transaction_coa_id => l_adr_transaction_coa_id
32871: , p_accounting_coa_id => l_adr_accounting_coa_id
32895: );
32896:
32897: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
32898:
32899: xla_ae_lines_pkg.set_segment(
32900: p_to_segment_code => 'GL_ACCOUNT'
32901: , p_segment_value => l_segment
32902: , p_from_segment_code => l_adr_value_segment_code
32903: , p_from_combination_id => l_adr_value_combination_id
32939: xla_accounting_err_pkg.build_message
32940: (p_appli_s_name => 'XLA'
32941: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
32942: ,p_token_1 => 'LINE_NUMBER'
32943: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
32944: ,p_token_2 => 'LINE_TYPE_NAME'
32945: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
32946: l_component_type
32947: ,l_component_code
32975: --
32976: --
32977: ------------------------------------------------------------------------------------------------
32978: -- 4219869 Business Flow
32979: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32980: -- Prior Entry. Currently, the following code is always generated.
32981: ------------------------------------------------------------------------------------------------
32982: XLA_AE_LINES_PKG.ValidateCurrentLine;
32983:
32978: -- 4219869 Business Flow
32979: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
32980: -- Prior Entry. Currently, the following code is always generated.
32981: ------------------------------------------------------------------------------------------------
32982: XLA_AE_LINES_PKG.ValidateCurrentLine;
32983:
32984: ------------------------------------------------------------------------------------
32985: -- 4219869 Business Flow
32986: -- Populated credit and debit amounts -- Need to generate this within IF
32984: ------------------------------------------------------------------------------------
32985: -- 4219869 Business Flow
32986: -- Populated credit and debit amounts -- Need to generate this within IF
32987: ------------------------------------------------------------------------------------
32988: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
32989:
32990: ----------------------------------------------------------------------------------
32991: -- 4219869 Business Flow
32992: -- Update journal entry status -- Need to generate this within IF
33016: -- To allow MPA report to determine if it should generate report process
33017: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33018: ------------------------------------------------------------------------------------------
33019:
33020: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33021: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33022:
33023: --
33024: -- Update the line information that should be overwritten
33017: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33018: ------------------------------------------------------------------------------------------
33019:
33020: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33021: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33022:
33023: --
33024: -- Update the line information that should be overwritten
33025: --
33022:
33023: --
33024: -- Update the line information that should be overwritten
33025: --
33026: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33027: p_header_num => 1);
33028: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33029:
33030: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33024: -- Update the line information that should be overwritten
33025: --
33026: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33027: p_header_num => 1);
33028: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33029:
33030: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33031:
33032: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33026: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33027: p_header_num => 1);
33028: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33029:
33030: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33031:
33032: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33033: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33034: END IF;
33029:
33030: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33031:
33032: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33033: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33034: END IF;
33035:
33036: --
33037: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33036: --
33037: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33038: --
33039: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
33040: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
33041: ELSE
33042: ---------------------------------------------------------------------------------------------------
33043: -- 4262811a Switch Sign
33044: ---------------------------------------------------------------------------------------------------
33041: ELSE
33042: ---------------------------------------------------------------------------------------------------
33043: -- 4262811a Switch Sign
33044: ---------------------------------------------------------------------------------------------------
33045: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33042: ---------------------------------------------------------------------------------------------------
33043: -- 4262811a Switch Sign
33044: ---------------------------------------------------------------------------------------------------
33045: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33043: -- 4262811a Switch Sign
33044: ---------------------------------------------------------------------------------------------------
33045: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33044: ---------------------------------------------------------------------------------------------------
33045: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33045: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33053:
33047: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33053:
33054: END IF;
33055:
33048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33049: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33050: -- 5132302
33051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33052: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33053:
33054: END IF;
33055:
33056: -- 4955764
33053:
33054: END IF;
33055:
33056: -- 4955764
33057: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33058: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33059:
33060:
33061: XLA_AE_LINES_PKG.ValidateCurrentLine;
33057: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33058: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33059:
33060:
33061: XLA_AE_LINES_PKG.ValidateCurrentLine;
33062: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33063:
33064: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33065: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33058: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33059:
33060:
33061: XLA_AE_LINES_PKG.ValidateCurrentLine;
33062: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33063:
33064: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33065: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33066: ,p_balance_type_code => l_balance_type_code);
33208: --
33209: -- bulk performance
33210: --
33211: l_balance_type_code VARCHAR2(1);
33212: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
33213: l_log_module VARCHAR2(240);
33214:
33215: --
33216: -- Upgrade strategy
33273: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
33274: l_balance_type_code <> 'B' THEN
33275:
33276: --
33277: XLA_AE_LINES_PKG.SetNewLine;
33278:
33279: p_balance_type_code := l_balance_type_code;
33280: -- set the flag so later we will know whether the gain loss line needs to be created
33281:
33285:
33286: --
33287: -- bulk performance
33288: --
33289: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
33290: p_header_num => 0); -- 4262811
33291: --
33292: -- set accounting line options
33293: --
33290: p_header_num => 0); -- 4262811
33291: --
33292: -- set accounting line options
33293: --
33294: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
33295: p_natural_side_code => 'D'
33296: , p_gain_or_loss_flag => 'N'
33297: , p_gl_transfer_mode_code => 'S'
33298: , p_acct_entry_type_code => 'A'
33304: --
33305: --
33306: -- set accounting line type info
33307: --
33308: xla_ae_lines_pkg.SetAcctLineType
33309: (p_component_type => l_component_type
33310: ,p_event_type_code => l_event_type_code
33311: ,p_line_definition_owner_code => l_line_definition_owner_code
33312: ,p_line_definition_code => l_line_definition_code
33318: ,p_event_class_code => l_event_class_code);
33319: --
33320: -- set accounting class
33321: --
33322: xla_ae_lines_pkg.SetAcctClass(
33323: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
33324: , p_ae_header_id => l_ae_header_id
33325: );
33326:
33326:
33327: --
33328: -- set rounding class
33329: --
33330: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33331: 'FEDERAL_PROJECT_COST';
33332:
33333: --
33334: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33330: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33331: 'FEDERAL_PROJECT_COST';
33332:
33333: --
33334: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33335: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33336: --
33337: -- bulk performance
33338: --
33331: 'FEDERAL_PROJECT_COST';
33332:
33333: --
33334: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33335: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33336: --
33337: -- bulk performance
33338: --
33339: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33335: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33336: --
33337: -- bulk performance
33338: --
33339: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33340:
33341: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33342: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33343:
33337: -- bulk performance
33338: --
33339: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33340:
33341: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33342: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33343:
33344: -- 4955764
33345: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33341: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33342: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33343:
33344: -- 4955764
33345: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33346: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33347:
33348: -- 4458381 Public Sector Enh
33349:
33413: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
33414: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
33415: l_rec_acct_attrs.array_char_value(30) := p_source_35;
33416:
33417: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33418: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33419:
33420: ---------------------------------------------------------------------------------------------------------------
33421: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33414: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
33415: l_rec_acct_attrs.array_char_value(30) := p_source_35;
33416:
33417: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33418: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33419:
33420: ---------------------------------------------------------------------------------------------------------------
33421: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33422: ---------------------------------------------------------------------------------------------------------------
33417: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
33418: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
33419:
33420: ---------------------------------------------------------------------------------------------------------------
33421: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33422: ---------------------------------------------------------------------------------------------------------------
33423: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33424:
33425: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33419:
33420: ---------------------------------------------------------------------------------------------------------------
33421: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33422: ---------------------------------------------------------------------------------------------------------------
33423: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33424:
33425: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33426: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33427:
33421: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
33422: ---------------------------------------------------------------------------------------------------------------
33423: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33424:
33425: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33426: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33427:
33428: IF xla_accounting_cache_pkg.GetValueChar
33429: (p_source_code => 'LEDGER_CATEGORY_CODE'
33422: ---------------------------------------------------------------------------------------------------------------
33423: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
33424:
33425: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33426: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
33427:
33428: IF xla_accounting_cache_pkg.GetValueChar
33429: (p_source_code => 'LEDGER_CATEGORY_CODE'
33430: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
33433: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
33434: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
33435: )
33436: THEN
33437: xla_ae_lines_pkg.BflowUpgEntry
33438: (p_business_method_code => l_bflow_method_code
33439: ,p_business_class_code => l_bflow_class_code
33440: ,p_balance_type => l_balance_type_code);
33441: ELSE
33474: , x_value_type_code => l_adr_value_type_code
33475: , p_side => 'NA'
33476: );
33477:
33478: xla_ae_lines_pkg.set_ccid(
33479: p_code_combination_id => l_ccid
33480: , p_value_type_code => l_adr_value_type_code
33481: , p_transaction_coa_id => l_adr_transaction_coa_id
33482: , p_accounting_coa_id => l_adr_accounting_coa_id
33506: );
33507:
33508: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
33509:
33510: xla_ae_lines_pkg.set_segment(
33511: p_to_segment_code => 'GL_ACCOUNT'
33512: , p_segment_value => l_segment
33513: , p_from_segment_code => l_adr_value_segment_code
33514: , p_from_combination_id => l_adr_value_combination_id
33550: xla_accounting_err_pkg.build_message
33551: (p_appli_s_name => 'XLA'
33552: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
33553: ,p_token_1 => 'LINE_NUMBER'
33554: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
33555: ,p_token_2 => 'LINE_TYPE_NAME'
33556: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
33557: l_component_type
33558: ,l_component_code
33586: --
33587: --
33588: ------------------------------------------------------------------------------------------------
33589: -- 4219869 Business Flow
33590: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33591: -- Prior Entry. Currently, the following code is always generated.
33592: ------------------------------------------------------------------------------------------------
33593: XLA_AE_LINES_PKG.ValidateCurrentLine;
33594:
33589: -- 4219869 Business Flow
33590: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
33591: -- Prior Entry. Currently, the following code is always generated.
33592: ------------------------------------------------------------------------------------------------
33593: XLA_AE_LINES_PKG.ValidateCurrentLine;
33594:
33595: ------------------------------------------------------------------------------------
33596: -- 4219869 Business Flow
33597: -- Populated credit and debit amounts -- Need to generate this within IF
33595: ------------------------------------------------------------------------------------
33596: -- 4219869 Business Flow
33597: -- Populated credit and debit amounts -- Need to generate this within IF
33598: ------------------------------------------------------------------------------------
33599: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33600:
33601: ----------------------------------------------------------------------------------
33602: -- 4219869 Business Flow
33603: -- Update journal entry status -- Need to generate this within IF
33627: -- To allow MPA report to determine if it should generate report process
33628: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33629: ------------------------------------------------------------------------------------------
33630:
33631: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33632: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33633:
33634: --
33635: -- Update the line information that should be overwritten
33628: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
33629: ------------------------------------------------------------------------------------------
33630:
33631: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
33632: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
33633:
33634: --
33635: -- Update the line information that should be overwritten
33636: --
33633:
33634: --
33635: -- Update the line information that should be overwritten
33636: --
33637: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33638: p_header_num => 1);
33639: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33640:
33641: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33635: -- Update the line information that should be overwritten
33636: --
33637: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33638: p_header_num => 1);
33639: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33640:
33641: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33642:
33643: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33637: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
33638: p_header_num => 1);
33639: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
33640:
33641: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33642:
33643: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33644: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33645: END IF;
33640:
33641: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
33642:
33643: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
33644: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
33645: END IF;
33646:
33647: --
33648: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33647: --
33648: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
33649: --
33650: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
33651: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
33652: ELSE
33653: ---------------------------------------------------------------------------------------------------
33654: -- 4262811a Switch Sign
33655: ---------------------------------------------------------------------------------------------------
33652: ELSE
33653: ---------------------------------------------------------------------------------------------------
33654: -- 4262811a Switch Sign
33655: ---------------------------------------------------------------------------------------------------
33656: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33657: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33653: ---------------------------------------------------------------------------------------------------
33654: -- 4262811a Switch Sign
33655: ---------------------------------------------------------------------------------------------------
33656: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33657: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33654: -- 4262811a Switch Sign
33655: ---------------------------------------------------------------------------------------------------
33656: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33657: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33662: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33655: ---------------------------------------------------------------------------------------------------
33656: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33657: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33662: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33656: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
33657: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33662: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33664:
33658: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33662: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33664:
33665: END IF;
33666:
33659: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
33660: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33661: -- 5132302
33662: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
33663: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
33664:
33665: END IF;
33666:
33667: -- 4955764
33664:
33665: END IF;
33666:
33667: -- 4955764
33668: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33669: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33670:
33671:
33672: XLA_AE_LINES_PKG.ValidateCurrentLine;
33668: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33669: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33670:
33671:
33672: XLA_AE_LINES_PKG.ValidateCurrentLine;
33673: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33674:
33675: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33676: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33669: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
33670:
33671:
33672: XLA_AE_LINES_PKG.ValidateCurrentLine;
33673: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
33674:
33675: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
33676: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
33677: ,p_balance_type_code => l_balance_type_code);
33818: --
33819: -- bulk performance
33820: --
33821: l_balance_type_code VARCHAR2(1);
33822: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
33823: l_log_module VARCHAR2(240);
33824:
33825: --
33826: -- Upgrade strategy
33883: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
33884: l_balance_type_code <> 'B' THEN
33885:
33886: --
33887: XLA_AE_LINES_PKG.SetNewLine;
33888:
33889: p_balance_type_code := l_balance_type_code;
33890: -- set the flag so later we will know whether the gain loss line needs to be created
33891:
33895:
33896: --
33897: -- bulk performance
33898: --
33899: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
33900: p_header_num => 0); -- 4262811
33901: --
33902: -- set accounting line options
33903: --
33900: p_header_num => 0); -- 4262811
33901: --
33902: -- set accounting line options
33903: --
33904: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
33905: p_natural_side_code => 'D'
33906: , p_gain_or_loss_flag => 'N'
33907: , p_gl_transfer_mode_code => 'S'
33908: , p_acct_entry_type_code => 'A'
33914: --
33915: --
33916: -- set accounting line type info
33917: --
33918: xla_ae_lines_pkg.SetAcctLineType
33919: (p_component_type => l_component_type
33920: ,p_event_type_code => l_event_type_code
33921: ,p_line_definition_owner_code => l_line_definition_owner_code
33922: ,p_line_definition_code => l_line_definition_code
33928: ,p_event_class_code => l_event_class_code);
33929: --
33930: -- set accounting class
33931: --
33932: xla_ae_lines_pkg.SetAcctClass(
33933: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
33934: , p_ae_header_id => l_ae_header_id
33935: );
33936:
33936:
33937: --
33938: -- set rounding class
33939: --
33940: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33941: 'FEDERAL_PROJECT_COST';
33942:
33943: --
33944: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33940: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
33941: 'FEDERAL_PROJECT_COST';
33942:
33943: --
33944: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33945: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33946: --
33947: -- bulk performance
33948: --
33941: 'FEDERAL_PROJECT_COST';
33942:
33943: --
33944: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
33945: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33946: --
33947: -- bulk performance
33948: --
33949: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33945: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
33946: --
33947: -- bulk performance
33948: --
33949: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33950:
33951: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33952: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33953:
33947: -- bulk performance
33948: --
33949: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
33950:
33951: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33952: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33953:
33954: -- 4955764
33955: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33951: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
33952: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
33953:
33954: -- 4955764
33955: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
33956: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
33957:
33958: -- 4458381 Public Sector Enh
33959:
34023: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
34024: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
34025: l_rec_acct_attrs.array_char_value(30) := p_source_35;
34026:
34027: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34028: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34029:
34030: ---------------------------------------------------------------------------------------------------------------
34031: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34024: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
34025: l_rec_acct_attrs.array_char_value(30) := p_source_35;
34026:
34027: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34028: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34029:
34030: ---------------------------------------------------------------------------------------------------------------
34031: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34032: ---------------------------------------------------------------------------------------------------------------
34027: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34028: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34029:
34030: ---------------------------------------------------------------------------------------------------------------
34031: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34032: ---------------------------------------------------------------------------------------------------------------
34033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34034:
34035: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34029:
34030: ---------------------------------------------------------------------------------------------------------------
34031: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34032: ---------------------------------------------------------------------------------------------------------------
34033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34034:
34035: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34036: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34037:
34031: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34032: ---------------------------------------------------------------------------------------------------------------
34033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34034:
34035: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34036: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34037:
34038: IF xla_accounting_cache_pkg.GetValueChar
34039: (p_source_code => 'LEDGER_CATEGORY_CODE'
34032: ---------------------------------------------------------------------------------------------------------------
34033: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34034:
34035: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34036: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34037:
34038: IF xla_accounting_cache_pkg.GetValueChar
34039: (p_source_code => 'LEDGER_CATEGORY_CODE'
34040: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
34043: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
34044: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
34045: )
34046: THEN
34047: xla_ae_lines_pkg.BflowUpgEntry
34048: (p_business_method_code => l_bflow_method_code
34049: ,p_business_class_code => l_bflow_class_code
34050: ,p_balance_type => l_balance_type_code);
34051: ELSE
34084: , x_value_type_code => l_adr_value_type_code
34085: , p_side => 'NA'
34086: );
34087:
34088: xla_ae_lines_pkg.set_ccid(
34089: p_code_combination_id => l_ccid
34090: , p_value_type_code => l_adr_value_type_code
34091: , p_transaction_coa_id => l_adr_transaction_coa_id
34092: , p_accounting_coa_id => l_adr_accounting_coa_id
34116: );
34117:
34118: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
34119:
34120: xla_ae_lines_pkg.set_segment(
34121: p_to_segment_code => 'GL_ACCOUNT'
34122: , p_segment_value => l_segment
34123: , p_from_segment_code => l_adr_value_segment_code
34124: , p_from_combination_id => l_adr_value_combination_id
34160: xla_accounting_err_pkg.build_message
34161: (p_appli_s_name => 'XLA'
34162: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
34163: ,p_token_1 => 'LINE_NUMBER'
34164: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
34165: ,p_token_2 => 'LINE_TYPE_NAME'
34166: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
34167: l_component_type
34168: ,l_component_code
34196: --
34197: --
34198: ------------------------------------------------------------------------------------------------
34199: -- 4219869 Business Flow
34200: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34201: -- Prior Entry. Currently, the following code is always generated.
34202: ------------------------------------------------------------------------------------------------
34203: XLA_AE_LINES_PKG.ValidateCurrentLine;
34204:
34199: -- 4219869 Business Flow
34200: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34201: -- Prior Entry. Currently, the following code is always generated.
34202: ------------------------------------------------------------------------------------------------
34203: XLA_AE_LINES_PKG.ValidateCurrentLine;
34204:
34205: ------------------------------------------------------------------------------------
34206: -- 4219869 Business Flow
34207: -- Populated credit and debit amounts -- Need to generate this within IF
34205: ------------------------------------------------------------------------------------
34206: -- 4219869 Business Flow
34207: -- Populated credit and debit amounts -- Need to generate this within IF
34208: ------------------------------------------------------------------------------------
34209: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34210:
34211: ----------------------------------------------------------------------------------
34212: -- 4219869 Business Flow
34213: -- Update journal entry status -- Need to generate this within IF
34237: -- To allow MPA report to determine if it should generate report process
34238: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34239: ------------------------------------------------------------------------------------------
34240:
34241: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34242: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34243:
34244: --
34245: -- Update the line information that should be overwritten
34238: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34239: ------------------------------------------------------------------------------------------
34240:
34241: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34242: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34243:
34244: --
34245: -- Update the line information that should be overwritten
34246: --
34243:
34244: --
34245: -- Update the line information that should be overwritten
34246: --
34247: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34248: p_header_num => 1);
34249: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34250:
34251: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34245: -- Update the line information that should be overwritten
34246: --
34247: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34248: p_header_num => 1);
34249: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34250:
34251: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34252:
34253: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34247: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34248: p_header_num => 1);
34249: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34250:
34251: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34252:
34253: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34254: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34255: END IF;
34250:
34251: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34252:
34253: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34254: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34255: END IF;
34256:
34257: --
34258: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34257: --
34258: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34259: --
34260: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
34261: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
34262: ELSE
34263: ---------------------------------------------------------------------------------------------------
34264: -- 4262811a Switch Sign
34265: ---------------------------------------------------------------------------------------------------
34262: ELSE
34263: ---------------------------------------------------------------------------------------------------
34264: -- 4262811a Switch Sign
34265: ---------------------------------------------------------------------------------------------------
34266: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34267: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34263: ---------------------------------------------------------------------------------------------------
34264: -- 4262811a Switch Sign
34265: ---------------------------------------------------------------------------------------------------
34266: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34267: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34264: -- 4262811a Switch Sign
34265: ---------------------------------------------------------------------------------------------------
34266: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34267: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34272: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34265: ---------------------------------------------------------------------------------------------------
34266: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34267: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34272: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34273: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34266: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34267: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34272: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34273: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34274:
34268: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34272: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34273: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34274:
34275: END IF;
34276:
34269: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34270: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34271: -- 5132302
34272: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34273: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34274:
34275: END IF;
34276:
34277: -- 4955764
34274:
34275: END IF;
34276:
34277: -- 4955764
34278: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34279: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34280:
34281:
34282: XLA_AE_LINES_PKG.ValidateCurrentLine;
34278: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34279: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34280:
34281:
34282: XLA_AE_LINES_PKG.ValidateCurrentLine;
34283: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34284:
34285: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34286: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34279: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34280:
34281:
34282: XLA_AE_LINES_PKG.ValidateCurrentLine;
34283: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34284:
34285: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34286: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34287: ,p_balance_type_code => l_balance_type_code);
34428: --
34429: -- bulk performance
34430: --
34431: l_balance_type_code VARCHAR2(1);
34432: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
34433: l_log_module VARCHAR2(240);
34434:
34435: --
34436: -- Upgrade strategy
34493: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
34494: l_balance_type_code <> 'B' THEN
34495:
34496: --
34497: XLA_AE_LINES_PKG.SetNewLine;
34498:
34499: p_balance_type_code := l_balance_type_code;
34500: -- set the flag so later we will know whether the gain loss line needs to be created
34501:
34505:
34506: --
34507: -- bulk performance
34508: --
34509: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
34510: p_header_num => 0); -- 4262811
34511: --
34512: -- set accounting line options
34513: --
34510: p_header_num => 0); -- 4262811
34511: --
34512: -- set accounting line options
34513: --
34514: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
34515: p_natural_side_code => 'D'
34516: , p_gain_or_loss_flag => 'N'
34517: , p_gl_transfer_mode_code => 'S'
34518: , p_acct_entry_type_code => 'A'
34524: --
34525: --
34526: -- set accounting line type info
34527: --
34528: xla_ae_lines_pkg.SetAcctLineType
34529: (p_component_type => l_component_type
34530: ,p_event_type_code => l_event_type_code
34531: ,p_line_definition_owner_code => l_line_definition_owner_code
34532: ,p_line_definition_code => l_line_definition_code
34538: ,p_event_class_code => l_event_class_code);
34539: --
34540: -- set accounting class
34541: --
34542: xla_ae_lines_pkg.SetAcctClass(
34543: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
34544: , p_ae_header_id => l_ae_header_id
34545: );
34546:
34546:
34547: --
34548: -- set rounding class
34549: --
34550: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34551: 'FEDERAL_PROJECT_COST';
34552:
34553: --
34554: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34550: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
34551: 'FEDERAL_PROJECT_COST';
34552:
34553: --
34554: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34555: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34556: --
34557: -- bulk performance
34558: --
34551: 'FEDERAL_PROJECT_COST';
34552:
34553: --
34554: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
34555: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34556: --
34557: -- bulk performance
34558: --
34559: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34555: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
34556: --
34557: -- bulk performance
34558: --
34559: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34560:
34561: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34562: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34563:
34557: -- bulk performance
34558: --
34559: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
34560:
34561: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34562: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34563:
34564: -- 4955764
34565: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34561: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
34562: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
34563:
34564: -- 4955764
34565: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34566: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
34567:
34568: -- 4458381 Public Sector Enh
34569:
34633: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
34634: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
34635: l_rec_acct_attrs.array_char_value(30) := p_source_35;
34636:
34637: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34638: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34639:
34640: ---------------------------------------------------------------------------------------------------------------
34641: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34634: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
34635: l_rec_acct_attrs.array_char_value(30) := p_source_35;
34636:
34637: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34638: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34639:
34640: ---------------------------------------------------------------------------------------------------------------
34641: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34642: ---------------------------------------------------------------------------------------------------------------
34637: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
34638: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
34639:
34640: ---------------------------------------------------------------------------------------------------------------
34641: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34642: ---------------------------------------------------------------------------------------------------------------
34643: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34644:
34645: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34639:
34640: ---------------------------------------------------------------------------------------------------------------
34641: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34642: ---------------------------------------------------------------------------------------------------------------
34643: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34644:
34645: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34646: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34647:
34641: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
34642: ---------------------------------------------------------------------------------------------------------------
34643: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34644:
34645: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34646: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34647:
34648: IF xla_accounting_cache_pkg.GetValueChar
34649: (p_source_code => 'LEDGER_CATEGORY_CODE'
34642: ---------------------------------------------------------------------------------------------------------------
34643: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
34644:
34645: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34646: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
34647:
34648: IF xla_accounting_cache_pkg.GetValueChar
34649: (p_source_code => 'LEDGER_CATEGORY_CODE'
34650: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
34653: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
34654: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
34655: )
34656: THEN
34657: xla_ae_lines_pkg.BflowUpgEntry
34658: (p_business_method_code => l_bflow_method_code
34659: ,p_business_class_code => l_bflow_class_code
34660: ,p_balance_type => l_balance_type_code);
34661: ELSE
34694: , x_value_type_code => l_adr_value_type_code
34695: , p_side => 'NA'
34696: );
34697:
34698: xla_ae_lines_pkg.set_ccid(
34699: p_code_combination_id => l_ccid
34700: , p_value_type_code => l_adr_value_type_code
34701: , p_transaction_coa_id => l_adr_transaction_coa_id
34702: , p_accounting_coa_id => l_adr_accounting_coa_id
34726: );
34727:
34728: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
34729:
34730: xla_ae_lines_pkg.set_segment(
34731: p_to_segment_code => 'GL_ACCOUNT'
34732: , p_segment_value => l_segment
34733: , p_from_segment_code => l_adr_value_segment_code
34734: , p_from_combination_id => l_adr_value_combination_id
34770: xla_accounting_err_pkg.build_message
34771: (p_appli_s_name => 'XLA'
34772: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
34773: ,p_token_1 => 'LINE_NUMBER'
34774: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
34775: ,p_token_2 => 'LINE_TYPE_NAME'
34776: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
34777: l_component_type
34778: ,l_component_code
34806: --
34807: --
34808: ------------------------------------------------------------------------------------------------
34809: -- 4219869 Business Flow
34810: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34811: -- Prior Entry. Currently, the following code is always generated.
34812: ------------------------------------------------------------------------------------------------
34813: XLA_AE_LINES_PKG.ValidateCurrentLine;
34814:
34809: -- 4219869 Business Flow
34810: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
34811: -- Prior Entry. Currently, the following code is always generated.
34812: ------------------------------------------------------------------------------------------------
34813: XLA_AE_LINES_PKG.ValidateCurrentLine;
34814:
34815: ------------------------------------------------------------------------------------
34816: -- 4219869 Business Flow
34817: -- Populated credit and debit amounts -- Need to generate this within IF
34815: ------------------------------------------------------------------------------------
34816: -- 4219869 Business Flow
34817: -- Populated credit and debit amounts -- Need to generate this within IF
34818: ------------------------------------------------------------------------------------
34819: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34820:
34821: ----------------------------------------------------------------------------------
34822: -- 4219869 Business Flow
34823: -- Update journal entry status -- Need to generate this within IF
34847: -- To allow MPA report to determine if it should generate report process
34848: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34849: ------------------------------------------------------------------------------------------
34850:
34851: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34852: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34853:
34854: --
34855: -- Update the line information that should be overwritten
34848: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
34849: ------------------------------------------------------------------------------------------
34850:
34851: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
34852: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
34853:
34854: --
34855: -- Update the line information that should be overwritten
34856: --
34853:
34854: --
34855: -- Update the line information that should be overwritten
34856: --
34857: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34858: p_header_num => 1);
34859: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34860:
34861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34855: -- Update the line information that should be overwritten
34856: --
34857: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34858: p_header_num => 1);
34859: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34860:
34861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34862:
34863: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34857: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
34858: p_header_num => 1);
34859: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
34860:
34861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34862:
34863: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34864: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34865: END IF;
34860:
34861: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
34862:
34863: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
34864: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
34865: END IF;
34866:
34867: --
34868: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34867: --
34868: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
34869: --
34870: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
34871: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
34872: ELSE
34873: ---------------------------------------------------------------------------------------------------
34874: -- 4262811a Switch Sign
34875: ---------------------------------------------------------------------------------------------------
34872: ELSE
34873: ---------------------------------------------------------------------------------------------------
34874: -- 4262811a Switch Sign
34875: ---------------------------------------------------------------------------------------------------
34876: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34873: ---------------------------------------------------------------------------------------------------
34874: -- 4262811a Switch Sign
34875: ---------------------------------------------------------------------------------------------------
34876: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34874: -- 4262811a Switch Sign
34875: ---------------------------------------------------------------------------------------------------
34876: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34875: ---------------------------------------------------------------------------------------------------
34876: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34883: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34876: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
34877: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34883: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34884:
34878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34883: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34884:
34885: END IF;
34886:
34879: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
34880: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34881: -- 5132302
34882: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
34883: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
34884:
34885: END IF;
34886:
34887: -- 4955764
34884:
34885: END IF;
34886:
34887: -- 4955764
34888: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34889: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34890:
34891:
34892: XLA_AE_LINES_PKG.ValidateCurrentLine;
34888: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
34889: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34890:
34891:
34892: XLA_AE_LINES_PKG.ValidateCurrentLine;
34893: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34894:
34895: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34896: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34889: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
34890:
34891:
34892: XLA_AE_LINES_PKG.ValidateCurrentLine;
34893: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
34894:
34895: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
34896: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
34897: ,p_balance_type_code => l_balance_type_code);
35038: --
35039: -- bulk performance
35040: --
35041: l_balance_type_code VARCHAR2(1);
35042: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
35043: l_log_module VARCHAR2(240);
35044:
35045: --
35046: -- Upgrade strategy
35103: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
35104: l_balance_type_code <> 'B' THEN
35105:
35106: --
35107: XLA_AE_LINES_PKG.SetNewLine;
35108:
35109: p_balance_type_code := l_balance_type_code;
35110: -- set the flag so later we will know whether the gain loss line needs to be created
35111:
35115:
35116: --
35117: -- bulk performance
35118: --
35119: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
35120: p_header_num => 0); -- 4262811
35121: --
35122: -- set accounting line options
35123: --
35120: p_header_num => 0); -- 4262811
35121: --
35122: -- set accounting line options
35123: --
35124: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
35125: p_natural_side_code => 'D'
35126: , p_gain_or_loss_flag => 'N'
35127: , p_gl_transfer_mode_code => 'S'
35128: , p_acct_entry_type_code => 'A'
35134: --
35135: --
35136: -- set accounting line type info
35137: --
35138: xla_ae_lines_pkg.SetAcctLineType
35139: (p_component_type => l_component_type
35140: ,p_event_type_code => l_event_type_code
35141: ,p_line_definition_owner_code => l_line_definition_owner_code
35142: ,p_line_definition_code => l_line_definition_code
35148: ,p_event_class_code => l_event_class_code);
35149: --
35150: -- set accounting class
35151: --
35152: xla_ae_lines_pkg.SetAcctClass(
35153: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
35154: , p_ae_header_id => l_ae_header_id
35155: );
35156:
35156:
35157: --
35158: -- set rounding class
35159: --
35160: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35161: 'FEDERAL_PROJECT_COST';
35162:
35163: --
35164: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35160: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35161: 'FEDERAL_PROJECT_COST';
35162:
35163: --
35164: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35165: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35166: --
35167: -- bulk performance
35168: --
35161: 'FEDERAL_PROJECT_COST';
35162:
35163: --
35164: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35165: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35166: --
35167: -- bulk performance
35168: --
35169: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35165: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35166: --
35167: -- bulk performance
35168: --
35169: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35170:
35171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35172: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35173:
35167: -- bulk performance
35168: --
35169: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35170:
35171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35172: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35173:
35174: -- 4955764
35175: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35172: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35173:
35174: -- 4955764
35175: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35176: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
35177:
35178: -- 4458381 Public Sector Enh
35179:
35243: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
35244: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
35245: l_rec_acct_attrs.array_char_value(30) := p_source_35;
35246:
35247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35249:
35250: ---------------------------------------------------------------------------------------------------------------
35251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35244: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
35245: l_rec_acct_attrs.array_char_value(30) := p_source_35;
35246:
35247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35249:
35250: ---------------------------------------------------------------------------------------------------------------
35251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35252: ---------------------------------------------------------------------------------------------------------------
35247: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35248: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35249:
35250: ---------------------------------------------------------------------------------------------------------------
35251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35252: ---------------------------------------------------------------------------------------------------------------
35253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35254:
35255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35249:
35250: ---------------------------------------------------------------------------------------------------------------
35251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35252: ---------------------------------------------------------------------------------------------------------------
35253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35254:
35255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35257:
35251: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35252: ---------------------------------------------------------------------------------------------------------------
35253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35254:
35255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35257:
35258: IF xla_accounting_cache_pkg.GetValueChar
35259: (p_source_code => 'LEDGER_CATEGORY_CODE'
35252: ---------------------------------------------------------------------------------------------------------------
35253: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35254:
35255: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35256: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35257:
35258: IF xla_accounting_cache_pkg.GetValueChar
35259: (p_source_code => 'LEDGER_CATEGORY_CODE'
35260: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
35263: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
35264: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
35265: )
35266: THEN
35267: xla_ae_lines_pkg.BflowUpgEntry
35268: (p_business_method_code => l_bflow_method_code
35269: ,p_business_class_code => l_bflow_class_code
35270: ,p_balance_type => l_balance_type_code);
35271: ELSE
35304: , x_value_type_code => l_adr_value_type_code
35305: , p_side => 'NA'
35306: );
35307:
35308: xla_ae_lines_pkg.set_ccid(
35309: p_code_combination_id => l_ccid
35310: , p_value_type_code => l_adr_value_type_code
35311: , p_transaction_coa_id => l_adr_transaction_coa_id
35312: , p_accounting_coa_id => l_adr_accounting_coa_id
35336: );
35337:
35338: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
35339:
35340: xla_ae_lines_pkg.set_segment(
35341: p_to_segment_code => 'GL_ACCOUNT'
35342: , p_segment_value => l_segment
35343: , p_from_segment_code => l_adr_value_segment_code
35344: , p_from_combination_id => l_adr_value_combination_id
35380: xla_accounting_err_pkg.build_message
35381: (p_appli_s_name => 'XLA'
35382: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
35383: ,p_token_1 => 'LINE_NUMBER'
35384: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
35385: ,p_token_2 => 'LINE_TYPE_NAME'
35386: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
35387: l_component_type
35388: ,l_component_code
35416: --
35417: --
35418: ------------------------------------------------------------------------------------------------
35419: -- 4219869 Business Flow
35420: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35421: -- Prior Entry. Currently, the following code is always generated.
35422: ------------------------------------------------------------------------------------------------
35423: XLA_AE_LINES_PKG.ValidateCurrentLine;
35424:
35419: -- 4219869 Business Flow
35420: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
35421: -- Prior Entry. Currently, the following code is always generated.
35422: ------------------------------------------------------------------------------------------------
35423: XLA_AE_LINES_PKG.ValidateCurrentLine;
35424:
35425: ------------------------------------------------------------------------------------
35426: -- 4219869 Business Flow
35427: -- Populated credit and debit amounts -- Need to generate this within IF
35425: ------------------------------------------------------------------------------------
35426: -- 4219869 Business Flow
35427: -- Populated credit and debit amounts -- Need to generate this within IF
35428: ------------------------------------------------------------------------------------
35429: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35430:
35431: ----------------------------------------------------------------------------------
35432: -- 4219869 Business Flow
35433: -- Update journal entry status -- Need to generate this within IF
35457: -- To allow MPA report to determine if it should generate report process
35458: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35459: ------------------------------------------------------------------------------------------
35460:
35461: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35462: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35463:
35464: --
35465: -- Update the line information that should be overwritten
35458: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
35459: ------------------------------------------------------------------------------------------
35460:
35461: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
35462: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
35463:
35464: --
35465: -- Update the line information that should be overwritten
35466: --
35463:
35464: --
35465: -- Update the line information that should be overwritten
35466: --
35467: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35468: p_header_num => 1);
35469: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35470:
35471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35465: -- Update the line information that should be overwritten
35466: --
35467: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35468: p_header_num => 1);
35469: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35470:
35471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35472:
35473: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35467: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
35468: p_header_num => 1);
35469: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
35470:
35471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35472:
35473: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35474: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35475: END IF;
35470:
35471: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
35472:
35473: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
35474: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
35475: END IF;
35476:
35477: --
35478: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35477: --
35478: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
35479: --
35480: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
35481: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
35482: ELSE
35483: ---------------------------------------------------------------------------------------------------
35484: -- 4262811a Switch Sign
35485: ---------------------------------------------------------------------------------------------------
35482: ELSE
35483: ---------------------------------------------------------------------------------------------------
35484: -- 4262811a Switch Sign
35485: ---------------------------------------------------------------------------------------------------
35486: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35483: ---------------------------------------------------------------------------------------------------
35484: -- 4262811a Switch Sign
35485: ---------------------------------------------------------------------------------------------------
35486: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35484: -- 4262811a Switch Sign
35485: ---------------------------------------------------------------------------------------------------
35486: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35485: ---------------------------------------------------------------------------------------------------
35486: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35493: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35486: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
35487: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35493: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35494:
35488: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35493: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35494:
35495: END IF;
35496:
35489: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
35490: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35491: -- 5132302
35492: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
35493: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
35494:
35495: END IF;
35496:
35497: -- 4955764
35494:
35495: END IF;
35496:
35497: -- 4955764
35498: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35499: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35500:
35501:
35502: XLA_AE_LINES_PKG.ValidateCurrentLine;
35498: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35499: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35500:
35501:
35502: XLA_AE_LINES_PKG.ValidateCurrentLine;
35503: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35504:
35505: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35506: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35499: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
35500:
35501:
35502: XLA_AE_LINES_PKG.ValidateCurrentLine;
35503: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
35504:
35505: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
35506: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
35507: ,p_balance_type_code => l_balance_type_code);
35652: --
35653: -- bulk performance
35654: --
35655: l_balance_type_code VARCHAR2(1);
35656: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
35657: l_log_module VARCHAR2(240);
35658:
35659: --
35660: -- Upgrade strategy
35720: ') = 'N'
35721: THEN
35722:
35723: --
35724: XLA_AE_LINES_PKG.SetNewLine;
35725:
35726: p_balance_type_code := l_balance_type_code;
35727: -- set the flag so later we will know whether the gain loss line needs to be created
35728:
35732:
35733: --
35734: -- bulk performance
35735: --
35736: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
35737: p_header_num => 0); -- 4262811
35738: --
35739: -- set accounting line options
35740: --
35737: p_header_num => 0); -- 4262811
35738: --
35739: -- set accounting line options
35740: --
35741: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
35742: p_natural_side_code => 'D'
35743: , p_gain_or_loss_flag => 'N'
35744: , p_gl_transfer_mode_code => 'S'
35745: , p_acct_entry_type_code => 'A'
35751: --
35752: --
35753: -- set accounting line type info
35754: --
35755: xla_ae_lines_pkg.SetAcctLineType
35756: (p_component_type => l_component_type
35757: ,p_event_type_code => l_event_type_code
35758: ,p_line_definition_owner_code => l_line_definition_owner_code
35759: ,p_line_definition_code => l_line_definition_code
35765: ,p_event_class_code => l_event_class_code);
35766: --
35767: -- set accounting class
35768: --
35769: xla_ae_lines_pkg.SetAcctClass(
35770: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
35771: , p_ae_header_id => l_ae_header_id
35772: );
35773:
35773:
35774: --
35775: -- set rounding class
35776: --
35777: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35778: 'FEDERAL_PROJECT_COST';
35779:
35780: --
35781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35777: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
35778: 'FEDERAL_PROJECT_COST';
35779:
35780: --
35781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35783: --
35784: -- bulk performance
35785: --
35778: 'FEDERAL_PROJECT_COST';
35779:
35780: --
35781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
35782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35783: --
35784: -- bulk performance
35785: --
35786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
35783: --
35784: -- bulk performance
35785: --
35786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35787:
35788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35790:
35784: -- bulk performance
35785: --
35786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
35787:
35788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35790:
35791: -- 4955764
35792: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
35789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
35790:
35791: -- 4955764
35792: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
35793: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
35794:
35795: -- 4458381 Public Sector Enh
35796:
35860: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
35861: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
35862: l_rec_acct_attrs.array_char_value(30) := p_source_35;
35863:
35864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35866:
35867: ---------------------------------------------------------------------------------------------------------------
35868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35861: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
35862: l_rec_acct_attrs.array_char_value(30) := p_source_35;
35863:
35864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35866:
35867: ---------------------------------------------------------------------------------------------------------------
35868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35869: ---------------------------------------------------------------------------------------------------------------
35864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
35865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
35866:
35867: ---------------------------------------------------------------------------------------------------------------
35868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35869: ---------------------------------------------------------------------------------------------------------------
35870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35871:
35872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35866:
35867: ---------------------------------------------------------------------------------------------------------------
35868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35869: ---------------------------------------------------------------------------------------------------------------
35870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35871:
35872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35874:
35868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
35869: ---------------------------------------------------------------------------------------------------------------
35870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35871:
35872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35874:
35875: IF xla_accounting_cache_pkg.GetValueChar
35876: (p_source_code => 'LEDGER_CATEGORY_CODE'
35869: ---------------------------------------------------------------------------------------------------------------
35870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
35871:
35872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
35874:
35875: IF xla_accounting_cache_pkg.GetValueChar
35876: (p_source_code => 'LEDGER_CATEGORY_CODE'
35877: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
35880: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
35881: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
35882: )
35883: THEN
35884: xla_ae_lines_pkg.BflowUpgEntry
35885: (p_business_method_code => l_bflow_method_code
35886: ,p_business_class_code => l_bflow_class_code
35887: ,p_balance_type => l_balance_type_code);
35888: ELSE
35921: , x_value_type_code => l_adr_value_type_code
35922: , p_side => 'NA'
35923: );
35924:
35925: xla_ae_lines_pkg.set_ccid(
35926: p_code_combination_id => l_ccid
35927: , p_value_type_code => l_adr_value_type_code
35928: , p_transaction_coa_id => l_adr_transaction_coa_id
35929: , p_accounting_coa_id => l_adr_accounting_coa_id
35954: );
35955:
35956: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
35957:
35958: xla_ae_lines_pkg.set_segment(
35959: p_to_segment_code => 'GL_ACCOUNT'
35960: , p_segment_value => l_segment
35961: , p_from_segment_code => l_adr_value_segment_code
35962: , p_from_combination_id => l_adr_value_combination_id
35998: xla_accounting_err_pkg.build_message
35999: (p_appli_s_name => 'XLA'
36000: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
36001: ,p_token_1 => 'LINE_NUMBER'
36002: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
36003: ,p_token_2 => 'LINE_TYPE_NAME'
36004: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
36005: l_component_type
36006: ,l_component_code
36034: --
36035: --
36036: ------------------------------------------------------------------------------------------------
36037: -- 4219869 Business Flow
36038: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36039: -- Prior Entry. Currently, the following code is always generated.
36040: ------------------------------------------------------------------------------------------------
36041: XLA_AE_LINES_PKG.ValidateCurrentLine;
36042:
36037: -- 4219869 Business Flow
36038: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36039: -- Prior Entry. Currently, the following code is always generated.
36040: ------------------------------------------------------------------------------------------------
36041: XLA_AE_LINES_PKG.ValidateCurrentLine;
36042:
36043: ------------------------------------------------------------------------------------
36044: -- 4219869 Business Flow
36045: -- Populated credit and debit amounts -- Need to generate this within IF
36043: ------------------------------------------------------------------------------------
36044: -- 4219869 Business Flow
36045: -- Populated credit and debit amounts -- Need to generate this within IF
36046: ------------------------------------------------------------------------------------
36047: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36048:
36049: ----------------------------------------------------------------------------------
36050: -- 4219869 Business Flow
36051: -- Update journal entry status -- Need to generate this within IF
36075: -- To allow MPA report to determine if it should generate report process
36076: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36077: ------------------------------------------------------------------------------------------
36078:
36079: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36080: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36081:
36082: --
36083: -- Update the line information that should be overwritten
36076: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36077: ------------------------------------------------------------------------------------------
36078:
36079: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36080: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36081:
36082: --
36083: -- Update the line information that should be overwritten
36084: --
36081:
36082: --
36083: -- Update the line information that should be overwritten
36084: --
36085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36086: p_header_num => 1);
36087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36088:
36089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36083: -- Update the line information that should be overwritten
36084: --
36085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36086: p_header_num => 1);
36087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36088:
36089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36090:
36091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36086: p_header_num => 1);
36087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36088:
36089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36090:
36091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36092: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36093: END IF;
36088:
36089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36090:
36091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36092: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36093: END IF;
36094:
36095: --
36096: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36095: --
36096: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36097: --
36098: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
36099: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
36100: ELSE
36101: ---------------------------------------------------------------------------------------------------
36102: -- 4262811a Switch Sign
36103: ---------------------------------------------------------------------------------------------------
36100: ELSE
36101: ---------------------------------------------------------------------------------------------------
36102: -- 4262811a Switch Sign
36103: ---------------------------------------------------------------------------------------------------
36104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36101: ---------------------------------------------------------------------------------------------------
36102: -- 4262811a Switch Sign
36103: ---------------------------------------------------------------------------------------------------
36104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36102: -- 4262811a Switch Sign
36103: ---------------------------------------------------------------------------------------------------
36104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36103: ---------------------------------------------------------------------------------------------------
36104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36112:
36106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36112:
36113: END IF;
36114:
36107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36109: -- 5132302
36110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36112:
36113: END IF;
36114:
36115: -- 4955764
36112:
36113: END IF;
36114:
36115: -- 4955764
36116: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36118:
36119:
36120: XLA_AE_LINES_PKG.ValidateCurrentLine;
36116: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36118:
36119:
36120: XLA_AE_LINES_PKG.ValidateCurrentLine;
36121: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36122:
36123: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36124: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36118:
36119:
36120: XLA_AE_LINES_PKG.ValidateCurrentLine;
36121: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36122:
36123: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36124: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36125: ,p_balance_type_code => l_balance_type_code);
36267: --
36268: -- bulk performance
36269: --
36270: l_balance_type_code VARCHAR2(1);
36271: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
36272: l_log_module VARCHAR2(240);
36273:
36274: --
36275: -- Upgrade strategy
36332: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
36333: l_balance_type_code <> 'B' THEN
36334:
36335: --
36336: XLA_AE_LINES_PKG.SetNewLine;
36337:
36338: p_balance_type_code := l_balance_type_code;
36339: -- set the flag so later we will know whether the gain loss line needs to be created
36340:
36344:
36345: --
36346: -- bulk performance
36347: --
36348: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
36349: p_header_num => 0); -- 4262811
36350: --
36351: -- set accounting line options
36352: --
36349: p_header_num => 0); -- 4262811
36350: --
36351: -- set accounting line options
36352: --
36353: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
36354: p_natural_side_code => 'D'
36355: , p_gain_or_loss_flag => 'N'
36356: , p_gl_transfer_mode_code => 'S'
36357: , p_acct_entry_type_code => 'A'
36363: --
36364: --
36365: -- set accounting line type info
36366: --
36367: xla_ae_lines_pkg.SetAcctLineType
36368: (p_component_type => l_component_type
36369: ,p_event_type_code => l_event_type_code
36370: ,p_line_definition_owner_code => l_line_definition_owner_code
36371: ,p_line_definition_code => l_line_definition_code
36377: ,p_event_class_code => l_event_class_code);
36378: --
36379: -- set accounting class
36380: --
36381: xla_ae_lines_pkg.SetAcctClass(
36382: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
36383: , p_ae_header_id => l_ae_header_id
36384: );
36385:
36385:
36386: --
36387: -- set rounding class
36388: --
36389: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36390: 'FEDERAL_PROJECT_COST';
36391:
36392: --
36393: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36389: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
36390: 'FEDERAL_PROJECT_COST';
36391:
36392: --
36393: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36394: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36395: --
36396: -- bulk performance
36397: --
36390: 'FEDERAL_PROJECT_COST';
36391:
36392: --
36393: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36394: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36395: --
36396: -- bulk performance
36397: --
36398: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36394: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
36395: --
36396: -- bulk performance
36397: --
36398: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36399:
36400: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36401: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36402:
36396: -- bulk performance
36397: --
36398: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
36399:
36400: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36401: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36402:
36403: -- 4955764
36404: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36400: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
36401: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
36402:
36403: -- 4955764
36404: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36405: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
36406:
36407: -- 4458381 Public Sector Enh
36408:
36472: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
36473: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
36474: l_rec_acct_attrs.array_char_value(30) := p_source_35;
36475:
36476: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36477: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36478:
36479: ---------------------------------------------------------------------------------------------------------------
36480: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36473: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
36474: l_rec_acct_attrs.array_char_value(30) := p_source_35;
36475:
36476: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36477: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36478:
36479: ---------------------------------------------------------------------------------------------------------------
36480: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36481: ---------------------------------------------------------------------------------------------------------------
36476: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
36477: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
36478:
36479: ---------------------------------------------------------------------------------------------------------------
36480: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36481: ---------------------------------------------------------------------------------------------------------------
36482: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36483:
36484: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36478:
36479: ---------------------------------------------------------------------------------------------------------------
36480: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36481: ---------------------------------------------------------------------------------------------------------------
36482: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36483:
36484: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36485: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36486:
36480: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
36481: ---------------------------------------------------------------------------------------------------------------
36482: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36483:
36484: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36485: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36486:
36487: IF xla_accounting_cache_pkg.GetValueChar
36488: (p_source_code => 'LEDGER_CATEGORY_CODE'
36481: ---------------------------------------------------------------------------------------------------------------
36482: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
36483:
36484: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36485: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
36486:
36487: IF xla_accounting_cache_pkg.GetValueChar
36488: (p_source_code => 'LEDGER_CATEGORY_CODE'
36489: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
36492: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
36493: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
36494: )
36495: THEN
36496: xla_ae_lines_pkg.BflowUpgEntry
36497: (p_business_method_code => l_bflow_method_code
36498: ,p_business_class_code => l_bflow_class_code
36499: ,p_balance_type => l_balance_type_code);
36500: ELSE
36533: , x_value_type_code => l_adr_value_type_code
36534: , p_side => 'NA'
36535: );
36536:
36537: xla_ae_lines_pkg.set_ccid(
36538: p_code_combination_id => l_ccid
36539: , p_value_type_code => l_adr_value_type_code
36540: , p_transaction_coa_id => l_adr_transaction_coa_id
36541: , p_accounting_coa_id => l_adr_accounting_coa_id
36565: );
36566:
36567: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
36568:
36569: xla_ae_lines_pkg.set_segment(
36570: p_to_segment_code => 'GL_ACCOUNT'
36571: , p_segment_value => l_segment
36572: , p_from_segment_code => l_adr_value_segment_code
36573: , p_from_combination_id => l_adr_value_combination_id
36609: xla_accounting_err_pkg.build_message
36610: (p_appli_s_name => 'XLA'
36611: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
36612: ,p_token_1 => 'LINE_NUMBER'
36613: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
36614: ,p_token_2 => 'LINE_TYPE_NAME'
36615: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
36616: l_component_type
36617: ,l_component_code
36645: --
36646: --
36647: ------------------------------------------------------------------------------------------------
36648: -- 4219869 Business Flow
36649: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36650: -- Prior Entry. Currently, the following code is always generated.
36651: ------------------------------------------------------------------------------------------------
36652: XLA_AE_LINES_PKG.ValidateCurrentLine;
36653:
36648: -- 4219869 Business Flow
36649: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
36650: -- Prior Entry. Currently, the following code is always generated.
36651: ------------------------------------------------------------------------------------------------
36652: XLA_AE_LINES_PKG.ValidateCurrentLine;
36653:
36654: ------------------------------------------------------------------------------------
36655: -- 4219869 Business Flow
36656: -- Populated credit and debit amounts -- Need to generate this within IF
36654: ------------------------------------------------------------------------------------
36655: -- 4219869 Business Flow
36656: -- Populated credit and debit amounts -- Need to generate this within IF
36657: ------------------------------------------------------------------------------------
36658: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36659:
36660: ----------------------------------------------------------------------------------
36661: -- 4219869 Business Flow
36662: -- Update journal entry status -- Need to generate this within IF
36686: -- To allow MPA report to determine if it should generate report process
36687: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36688: ------------------------------------------------------------------------------------------
36689:
36690: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36691: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36692:
36693: --
36694: -- Update the line information that should be overwritten
36687: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
36688: ------------------------------------------------------------------------------------------
36689:
36690: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
36691: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
36692:
36693: --
36694: -- Update the line information that should be overwritten
36695: --
36692:
36693: --
36694: -- Update the line information that should be overwritten
36695: --
36696: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36697: p_header_num => 1);
36698: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36699:
36700: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36694: -- Update the line information that should be overwritten
36695: --
36696: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36697: p_header_num => 1);
36698: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36699:
36700: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36701:
36702: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36696: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
36697: p_header_num => 1);
36698: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
36699:
36700: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36701:
36702: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36703: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36704: END IF;
36699:
36700: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
36701:
36702: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
36703: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
36704: END IF;
36705:
36706: --
36707: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36706: --
36707: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
36708: --
36709: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
36710: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
36711: ELSE
36712: ---------------------------------------------------------------------------------------------------
36713: -- 4262811a Switch Sign
36714: ---------------------------------------------------------------------------------------------------
36711: ELSE
36712: ---------------------------------------------------------------------------------------------------
36713: -- 4262811a Switch Sign
36714: ---------------------------------------------------------------------------------------------------
36715: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36712: ---------------------------------------------------------------------------------------------------
36713: -- 4262811a Switch Sign
36714: ---------------------------------------------------------------------------------------------------
36715: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36713: -- 4262811a Switch Sign
36714: ---------------------------------------------------------------------------------------------------
36715: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36714: ---------------------------------------------------------------------------------------------------
36715: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36715: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
36716: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36723:
36717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36723:
36724: END IF;
36725:
36718: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
36719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36720: -- 5132302
36721: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
36722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
36723:
36724: END IF;
36725:
36726: -- 4955764
36723:
36724: END IF;
36725:
36726: -- 4955764
36727: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36728: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36729:
36730:
36731: XLA_AE_LINES_PKG.ValidateCurrentLine;
36727: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
36728: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36729:
36730:
36731: XLA_AE_LINES_PKG.ValidateCurrentLine;
36732: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36733:
36734: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36735: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36728: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
36729:
36730:
36731: XLA_AE_LINES_PKG.ValidateCurrentLine;
36732: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
36733:
36734: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
36735: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
36736: ,p_balance_type_code => l_balance_type_code);
36877: --
36878: -- bulk performance
36879: --
36880: l_balance_type_code VARCHAR2(1);
36881: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
36882: l_log_module VARCHAR2(240);
36883:
36884: --
36885: -- Upgrade strategy
36942: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
36943: l_balance_type_code <> 'B' THEN
36944:
36945: --
36946: XLA_AE_LINES_PKG.SetNewLine;
36947:
36948: p_balance_type_code := l_balance_type_code;
36949: -- set the flag so later we will know whether the gain loss line needs to be created
36950:
36954:
36955: --
36956: -- bulk performance
36957: --
36958: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
36959: p_header_num => 0); -- 4262811
36960: --
36961: -- set accounting line options
36962: --
36959: p_header_num => 0); -- 4262811
36960: --
36961: -- set accounting line options
36962: --
36963: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
36964: p_natural_side_code => 'C'
36965: , p_gain_or_loss_flag => 'N'
36966: , p_gl_transfer_mode_code => 'S'
36967: , p_acct_entry_type_code => 'A'
36973: --
36974: --
36975: -- set accounting line type info
36976: --
36977: xla_ae_lines_pkg.SetAcctLineType
36978: (p_component_type => l_component_type
36979: ,p_event_type_code => l_event_type_code
36980: ,p_line_definition_owner_code => l_line_definition_owner_code
36981: ,p_line_definition_code => l_line_definition_code
36987: ,p_event_class_code => l_event_class_code);
36988: --
36989: -- set accounting class
36990: --
36991: xla_ae_lines_pkg.SetAcctClass(
36992: p_accounting_class_code => 'COST_CLEARING'
36993: , p_ae_header_id => l_ae_header_id
36994: );
36995:
36995:
36996: --
36997: -- set rounding class
36998: --
36999: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37000: 'COST_CLEARING';
37001:
37002: --
37003: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
36999: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37000: 'COST_CLEARING';
37001:
37002: --
37003: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37004: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37005: --
37006: -- bulk performance
37007: --
37000: 'COST_CLEARING';
37001:
37002: --
37003: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37004: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37005: --
37006: -- bulk performance
37007: --
37008: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37004: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37005: --
37006: -- bulk performance
37007: --
37008: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37009:
37010: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37011: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37012:
37006: -- bulk performance
37007: --
37008: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37009:
37010: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37011: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37012:
37013: -- 4955764
37014: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37010: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37011: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37012:
37013: -- 4955764
37014: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37015: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
37016:
37017: -- 4458381 Public Sector Enh
37018:
37082: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
37083: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
37084: l_rec_acct_attrs.array_char_value(30) := p_source_35;
37085:
37086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37088:
37089: ---------------------------------------------------------------------------------------------------------------
37090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37083: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
37084: l_rec_acct_attrs.array_char_value(30) := p_source_35;
37085:
37086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37088:
37089: ---------------------------------------------------------------------------------------------------------------
37090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37091: ---------------------------------------------------------------------------------------------------------------
37086: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37087: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37088:
37089: ---------------------------------------------------------------------------------------------------------------
37090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37091: ---------------------------------------------------------------------------------------------------------------
37092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37093:
37094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37088:
37089: ---------------------------------------------------------------------------------------------------------------
37090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37091: ---------------------------------------------------------------------------------------------------------------
37092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37093:
37094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37096:
37090: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37091: ---------------------------------------------------------------------------------------------------------------
37092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37093:
37094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37096:
37097: IF xla_accounting_cache_pkg.GetValueChar
37098: (p_source_code => 'LEDGER_CATEGORY_CODE'
37091: ---------------------------------------------------------------------------------------------------------------
37092: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37093:
37094: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37095: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37096:
37097: IF xla_accounting_cache_pkg.GetValueChar
37098: (p_source_code => 'LEDGER_CATEGORY_CODE'
37099: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
37102: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
37103: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
37104: )
37105: THEN
37106: xla_ae_lines_pkg.BflowUpgEntry
37107: (p_business_method_code => l_bflow_method_code
37108: ,p_business_class_code => l_bflow_class_code
37109: ,p_balance_type => l_balance_type_code);
37110: ELSE
37144: , x_value_type_code => l_adr_value_type_code
37145: , p_side => 'NA'
37146: );
37147:
37148: xla_ae_lines_pkg.set_ccid(
37149: p_code_combination_id => l_ccid
37150: , p_value_type_code => l_adr_value_type_code
37151: , p_transaction_coa_id => l_adr_transaction_coa_id
37152: , p_accounting_coa_id => l_adr_accounting_coa_id
37180: xla_accounting_err_pkg.build_message
37181: (p_appli_s_name => 'XLA'
37182: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
37183: ,p_token_1 => 'LINE_NUMBER'
37184: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
37185: ,p_token_2 => 'LINE_TYPE_NAME'
37186: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
37187: l_component_type
37188: ,l_component_code
37216: --
37217: --
37218: ------------------------------------------------------------------------------------------------
37219: -- 4219869 Business Flow
37220: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37221: -- Prior Entry. Currently, the following code is always generated.
37222: ------------------------------------------------------------------------------------------------
37223: XLA_AE_LINES_PKG.ValidateCurrentLine;
37224:
37219: -- 4219869 Business Flow
37220: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37221: -- Prior Entry. Currently, the following code is always generated.
37222: ------------------------------------------------------------------------------------------------
37223: XLA_AE_LINES_PKG.ValidateCurrentLine;
37224:
37225: ------------------------------------------------------------------------------------
37226: -- 4219869 Business Flow
37227: -- Populated credit and debit amounts -- Need to generate this within IF
37225: ------------------------------------------------------------------------------------
37226: -- 4219869 Business Flow
37227: -- Populated credit and debit amounts -- Need to generate this within IF
37228: ------------------------------------------------------------------------------------
37229: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37230:
37231: ----------------------------------------------------------------------------------
37232: -- 4219869 Business Flow
37233: -- Update journal entry status -- Need to generate this within IF
37257: -- To allow MPA report to determine if it should generate report process
37258: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37259: ------------------------------------------------------------------------------------------
37260:
37261: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37262: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37263:
37264: --
37265: -- Update the line information that should be overwritten
37258: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37259: ------------------------------------------------------------------------------------------
37260:
37261: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37262: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37263:
37264: --
37265: -- Update the line information that should be overwritten
37266: --
37263:
37264: --
37265: -- Update the line information that should be overwritten
37266: --
37267: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37268: p_header_num => 1);
37269: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37270:
37271: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37265: -- Update the line information that should be overwritten
37266: --
37267: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37268: p_header_num => 1);
37269: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37270:
37271: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37272:
37273: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37267: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37268: p_header_num => 1);
37269: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37270:
37271: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37272:
37273: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37274: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37275: END IF;
37270:
37271: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37272:
37273: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37274: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37275: END IF;
37276:
37277: --
37278: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37277: --
37278: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37279: --
37280: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
37281: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
37282: ELSE
37283: ---------------------------------------------------------------------------------------------------
37284: -- 4262811a Switch Sign
37285: ---------------------------------------------------------------------------------------------------
37282: ELSE
37283: ---------------------------------------------------------------------------------------------------
37284: -- 4262811a Switch Sign
37285: ---------------------------------------------------------------------------------------------------
37286: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37287: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37283: ---------------------------------------------------------------------------------------------------
37284: -- 4262811a Switch Sign
37285: ---------------------------------------------------------------------------------------------------
37286: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37287: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37284: -- 4262811a Switch Sign
37285: ---------------------------------------------------------------------------------------------------
37286: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37287: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37292: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37285: ---------------------------------------------------------------------------------------------------
37286: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37287: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37292: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37286: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37287: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37292: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37294:
37288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37292: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37294:
37295: END IF;
37296:
37289: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37291: -- 5132302
37292: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37294:
37295: END IF;
37296:
37297: -- 4955764
37294:
37295: END IF;
37296:
37297: -- 4955764
37298: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37299: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37300:
37301:
37302: XLA_AE_LINES_PKG.ValidateCurrentLine;
37298: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37299: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37300:
37301:
37302: XLA_AE_LINES_PKG.ValidateCurrentLine;
37303: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37304:
37305: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37306: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37299: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37300:
37301:
37302: XLA_AE_LINES_PKG.ValidateCurrentLine;
37303: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37304:
37305: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37306: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37307: ,p_balance_type_code => l_balance_type_code);
37448: --
37449: -- bulk performance
37450: --
37451: l_balance_type_code VARCHAR2(1);
37452: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
37453: l_log_module VARCHAR2(240);
37454:
37455: --
37456: -- Upgrade strategy
37513: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
37514: l_balance_type_code <> 'B' THEN
37515:
37516: --
37517: XLA_AE_LINES_PKG.SetNewLine;
37518:
37519: p_balance_type_code := l_balance_type_code;
37520: -- set the flag so later we will know whether the gain loss line needs to be created
37521:
37525:
37526: --
37527: -- bulk performance
37528: --
37529: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
37530: p_header_num => 0); -- 4262811
37531: --
37532: -- set accounting line options
37533: --
37530: p_header_num => 0); -- 4262811
37531: --
37532: -- set accounting line options
37533: --
37534: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
37535: p_natural_side_code => 'C'
37536: , p_gain_or_loss_flag => 'N'
37537: , p_gl_transfer_mode_code => 'S'
37538: , p_acct_entry_type_code => 'A'
37544: --
37545: --
37546: -- set accounting line type info
37547: --
37548: xla_ae_lines_pkg.SetAcctLineType
37549: (p_component_type => l_component_type
37550: ,p_event_type_code => l_event_type_code
37551: ,p_line_definition_owner_code => l_line_definition_owner_code
37552: ,p_line_definition_code => l_line_definition_code
37558: ,p_event_class_code => l_event_class_code);
37559: --
37560: -- set accounting class
37561: --
37562: xla_ae_lines_pkg.SetAcctClass(
37563: p_accounting_class_code => 'COST_CLEARING'
37564: , p_ae_header_id => l_ae_header_id
37565: );
37566:
37566:
37567: --
37568: -- set rounding class
37569: --
37570: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37571: 'COST_CLEARING';
37572:
37573: --
37574: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37570: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
37571: 'COST_CLEARING';
37572:
37573: --
37574: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37575: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37576: --
37577: -- bulk performance
37578: --
37571: 'COST_CLEARING';
37572:
37573: --
37574: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
37575: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37576: --
37577: -- bulk performance
37578: --
37579: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37575: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
37576: --
37577: -- bulk performance
37578: --
37579: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37580:
37581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37582: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37583:
37577: -- bulk performance
37578: --
37579: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
37580:
37581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37582: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37583:
37584: -- 4955764
37585: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
37582: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
37583:
37584: -- 4955764
37585: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37586: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
37587:
37588: -- 4458381 Public Sector Enh
37589:
37653: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
37654: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
37655: l_rec_acct_attrs.array_char_value(30) := p_source_35;
37656:
37657: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37658: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37659:
37660: ---------------------------------------------------------------------------------------------------------------
37661: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37654: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
37655: l_rec_acct_attrs.array_char_value(30) := p_source_35;
37656:
37657: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37658: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37659:
37660: ---------------------------------------------------------------------------------------------------------------
37661: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37662: ---------------------------------------------------------------------------------------------------------------
37657: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
37658: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
37659:
37660: ---------------------------------------------------------------------------------------------------------------
37661: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37662: ---------------------------------------------------------------------------------------------------------------
37663: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37664:
37665: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37659:
37660: ---------------------------------------------------------------------------------------------------------------
37661: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37662: ---------------------------------------------------------------------------------------------------------------
37663: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37664:
37665: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37666: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37667:
37661: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
37662: ---------------------------------------------------------------------------------------------------------------
37663: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37664:
37665: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37666: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37667:
37668: IF xla_accounting_cache_pkg.GetValueChar
37669: (p_source_code => 'LEDGER_CATEGORY_CODE'
37662: ---------------------------------------------------------------------------------------------------------------
37663: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
37664:
37665: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37666: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
37667:
37668: IF xla_accounting_cache_pkg.GetValueChar
37669: (p_source_code => 'LEDGER_CATEGORY_CODE'
37670: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
37673: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
37674: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
37675: )
37676: THEN
37677: xla_ae_lines_pkg.BflowUpgEntry
37678: (p_business_method_code => l_bflow_method_code
37679: ,p_business_class_code => l_bflow_class_code
37680: ,p_balance_type => l_balance_type_code);
37681: ELSE
37715: , x_value_type_code => l_adr_value_type_code
37716: , p_side => 'NA'
37717: );
37718:
37719: xla_ae_lines_pkg.set_ccid(
37720: p_code_combination_id => l_ccid
37721: , p_value_type_code => l_adr_value_type_code
37722: , p_transaction_coa_id => l_adr_transaction_coa_id
37723: , p_accounting_coa_id => l_adr_accounting_coa_id
37751: xla_accounting_err_pkg.build_message
37752: (p_appli_s_name => 'XLA'
37753: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
37754: ,p_token_1 => 'LINE_NUMBER'
37755: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
37756: ,p_token_2 => 'LINE_TYPE_NAME'
37757: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
37758: l_component_type
37759: ,l_component_code
37787: --
37788: --
37789: ------------------------------------------------------------------------------------------------
37790: -- 4219869 Business Flow
37791: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37792: -- Prior Entry. Currently, the following code is always generated.
37793: ------------------------------------------------------------------------------------------------
37794: XLA_AE_LINES_PKG.ValidateCurrentLine;
37795:
37790: -- 4219869 Business Flow
37791: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
37792: -- Prior Entry. Currently, the following code is always generated.
37793: ------------------------------------------------------------------------------------------------
37794: XLA_AE_LINES_PKG.ValidateCurrentLine;
37795:
37796: ------------------------------------------------------------------------------------
37797: -- 4219869 Business Flow
37798: -- Populated credit and debit amounts -- Need to generate this within IF
37796: ------------------------------------------------------------------------------------
37797: -- 4219869 Business Flow
37798: -- Populated credit and debit amounts -- Need to generate this within IF
37799: ------------------------------------------------------------------------------------
37800: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37801:
37802: ----------------------------------------------------------------------------------
37803: -- 4219869 Business Flow
37804: -- Update journal entry status -- Need to generate this within IF
37828: -- To allow MPA report to determine if it should generate report process
37829: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37830: ------------------------------------------------------------------------------------------
37831:
37832: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37833: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37834:
37835: --
37836: -- Update the line information that should be overwritten
37829: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
37830: ------------------------------------------------------------------------------------------
37831:
37832: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
37833: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
37834:
37835: --
37836: -- Update the line information that should be overwritten
37837: --
37834:
37835: --
37836: -- Update the line information that should be overwritten
37837: --
37838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37839: p_header_num => 1);
37840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37841:
37842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37836: -- Update the line information that should be overwritten
37837: --
37838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37839: p_header_num => 1);
37840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37841:
37842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37843:
37844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
37839: p_header_num => 1);
37840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
37841:
37842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37843:
37844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37845: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37846: END IF;
37841:
37842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
37843:
37844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
37845: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
37846: END IF;
37847:
37848: --
37849: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37848: --
37849: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
37850: --
37851: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
37852: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
37853: ELSE
37854: ---------------------------------------------------------------------------------------------------
37855: -- 4262811a Switch Sign
37856: ---------------------------------------------------------------------------------------------------
37853: ELSE
37854: ---------------------------------------------------------------------------------------------------
37855: -- 4262811a Switch Sign
37856: ---------------------------------------------------------------------------------------------------
37857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37854: ---------------------------------------------------------------------------------------------------
37855: -- 4262811a Switch Sign
37856: ---------------------------------------------------------------------------------------------------
37857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37855: -- 4262811a Switch Sign
37856: ---------------------------------------------------------------------------------------------------
37857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37856: ---------------------------------------------------------------------------------------------------
37857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
37858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37865:
37859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37865:
37866: END IF;
37867:
37860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
37861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37862: -- 5132302
37863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
37864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
37865:
37866: END IF;
37867:
37868: -- 4955764
37865:
37866: END IF;
37867:
37868: -- 4955764
37869: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37871:
37872:
37873: XLA_AE_LINES_PKG.ValidateCurrentLine;
37869: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
37870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37871:
37872:
37873: XLA_AE_LINES_PKG.ValidateCurrentLine;
37874: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37875:
37876: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37877: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
37871:
37872:
37873: XLA_AE_LINES_PKG.ValidateCurrentLine;
37874: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
37875:
37876: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
37877: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
37878: ,p_balance_type_code => l_balance_type_code);
38019: --
38020: -- bulk performance
38021: --
38022: l_balance_type_code VARCHAR2(1);
38023: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
38024: l_log_module VARCHAR2(240);
38025:
38026: --
38027: -- Upgrade strategy
38084: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
38085: l_balance_type_code <> 'B' THEN
38086:
38087: --
38088: XLA_AE_LINES_PKG.SetNewLine;
38089:
38090: p_balance_type_code := l_balance_type_code;
38091: -- set the flag so later we will know whether the gain loss line needs to be created
38092:
38096:
38097: --
38098: -- bulk performance
38099: --
38100: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
38101: p_header_num => 0); -- 4262811
38102: --
38103: -- set accounting line options
38104: --
38101: p_header_num => 0); -- 4262811
38102: --
38103: -- set accounting line options
38104: --
38105: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
38106: p_natural_side_code => 'C'
38107: , p_gain_or_loss_flag => 'N'
38108: , p_gl_transfer_mode_code => 'S'
38109: , p_acct_entry_type_code => 'A'
38115: --
38116: --
38117: -- set accounting line type info
38118: --
38119: xla_ae_lines_pkg.SetAcctLineType
38120: (p_component_type => l_component_type
38121: ,p_event_type_code => l_event_type_code
38122: ,p_line_definition_owner_code => l_line_definition_owner_code
38123: ,p_line_definition_code => l_line_definition_code
38129: ,p_event_class_code => l_event_class_code);
38130: --
38131: -- set accounting class
38132: --
38133: xla_ae_lines_pkg.SetAcctClass(
38134: p_accounting_class_code => 'COST_CLEARING'
38135: , p_ae_header_id => l_ae_header_id
38136: );
38137:
38137:
38138: --
38139: -- set rounding class
38140: --
38141: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38142: 'COST_CLEARING';
38143:
38144: --
38145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38141: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38142: 'COST_CLEARING';
38143:
38144: --
38145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38147: --
38148: -- bulk performance
38149: --
38142: 'COST_CLEARING';
38143:
38144: --
38145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38147: --
38148: -- bulk performance
38149: --
38150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38147: --
38148: -- bulk performance
38149: --
38150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38151:
38152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38154:
38148: -- bulk performance
38149: --
38150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38151:
38152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38154:
38155: -- 4955764
38156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38154:
38155: -- 4955764
38156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38157: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
38158:
38159: -- 4458381 Public Sector Enh
38160:
38224: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
38225: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
38226: l_rec_acct_attrs.array_char_value(30) := p_source_35;
38227:
38228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38230:
38231: ---------------------------------------------------------------------------------------------------------------
38232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38225: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
38226: l_rec_acct_attrs.array_char_value(30) := p_source_35;
38227:
38228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38230:
38231: ---------------------------------------------------------------------------------------------------------------
38232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38233: ---------------------------------------------------------------------------------------------------------------
38228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38230:
38231: ---------------------------------------------------------------------------------------------------------------
38232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38233: ---------------------------------------------------------------------------------------------------------------
38234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38235:
38236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38230:
38231: ---------------------------------------------------------------------------------------------------------------
38232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38233: ---------------------------------------------------------------------------------------------------------------
38234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38235:
38236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38238:
38232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38233: ---------------------------------------------------------------------------------------------------------------
38234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38235:
38236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38238:
38239: IF xla_accounting_cache_pkg.GetValueChar
38240: (p_source_code => 'LEDGER_CATEGORY_CODE'
38233: ---------------------------------------------------------------------------------------------------------------
38234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38235:
38236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38238:
38239: IF xla_accounting_cache_pkg.GetValueChar
38240: (p_source_code => 'LEDGER_CATEGORY_CODE'
38241: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
38244: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
38245: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
38246: )
38247: THEN
38248: xla_ae_lines_pkg.BflowUpgEntry
38249: (p_business_method_code => l_bflow_method_code
38250: ,p_business_class_code => l_bflow_class_code
38251: ,p_balance_type => l_balance_type_code);
38252: ELSE
38286: , x_value_type_code => l_adr_value_type_code
38287: , p_side => 'NA'
38288: );
38289:
38290: xla_ae_lines_pkg.set_ccid(
38291: p_code_combination_id => l_ccid
38292: , p_value_type_code => l_adr_value_type_code
38293: , p_transaction_coa_id => l_adr_transaction_coa_id
38294: , p_accounting_coa_id => l_adr_accounting_coa_id
38322: xla_accounting_err_pkg.build_message
38323: (p_appli_s_name => 'XLA'
38324: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
38325: ,p_token_1 => 'LINE_NUMBER'
38326: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
38327: ,p_token_2 => 'LINE_TYPE_NAME'
38328: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
38329: l_component_type
38330: ,l_component_code
38358: --
38359: --
38360: ------------------------------------------------------------------------------------------------
38361: -- 4219869 Business Flow
38362: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
38363: -- Prior Entry. Currently, the following code is always generated.
38364: ------------------------------------------------------------------------------------------------
38365: XLA_AE_LINES_PKG.ValidateCurrentLine;
38366:
38361: -- 4219869 Business Flow
38362: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
38363: -- Prior Entry. Currently, the following code is always generated.
38364: ------------------------------------------------------------------------------------------------
38365: XLA_AE_LINES_PKG.ValidateCurrentLine;
38366:
38367: ------------------------------------------------------------------------------------
38368: -- 4219869 Business Flow
38369: -- Populated credit and debit amounts -- Need to generate this within IF
38367: ------------------------------------------------------------------------------------
38368: -- 4219869 Business Flow
38369: -- Populated credit and debit amounts -- Need to generate this within IF
38370: ------------------------------------------------------------------------------------
38371: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38372:
38373: ----------------------------------------------------------------------------------
38374: -- 4219869 Business Flow
38375: -- Update journal entry status -- Need to generate this within IF
38399: -- To allow MPA report to determine if it should generate report process
38400: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38401: ------------------------------------------------------------------------------------------
38402:
38403: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38404: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38405:
38406: --
38407: -- Update the line information that should be overwritten
38400: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38401: ------------------------------------------------------------------------------------------
38402:
38403: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38404: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38405:
38406: --
38407: -- Update the line information that should be overwritten
38408: --
38405:
38406: --
38407: -- Update the line information that should be overwritten
38408: --
38409: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38410: p_header_num => 1);
38411: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38412:
38413: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38407: -- Update the line information that should be overwritten
38408: --
38409: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38410: p_header_num => 1);
38411: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38412:
38413: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38414:
38415: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38409: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38410: p_header_num => 1);
38411: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38412:
38413: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38414:
38415: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38416: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38417: END IF;
38412:
38413: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38414:
38415: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38416: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38417: END IF;
38418:
38419: --
38420: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38419: --
38420: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38421: --
38422: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
38423: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
38424: ELSE
38425: ---------------------------------------------------------------------------------------------------
38426: -- 4262811a Switch Sign
38427: ---------------------------------------------------------------------------------------------------
38424: ELSE
38425: ---------------------------------------------------------------------------------------------------
38426: -- 4262811a Switch Sign
38427: ---------------------------------------------------------------------------------------------------
38428: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38425: ---------------------------------------------------------------------------------------------------
38426: -- 4262811a Switch Sign
38427: ---------------------------------------------------------------------------------------------------
38428: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38426: -- 4262811a Switch Sign
38427: ---------------------------------------------------------------------------------------------------
38428: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38427: ---------------------------------------------------------------------------------------------------
38428: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38428: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
38429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38436:
38430: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38436:
38437: END IF;
38438:
38431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
38432: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38433: -- 5132302
38434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
38435: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
38436:
38437: END IF;
38438:
38439: -- 4955764
38436:
38437: END IF;
38438:
38439: -- 4955764
38440: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38441: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38442:
38443:
38444: XLA_AE_LINES_PKG.ValidateCurrentLine;
38440: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38441: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38442:
38443:
38444: XLA_AE_LINES_PKG.ValidateCurrentLine;
38445: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38446:
38447: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
38448: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
38441: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
38442:
38443:
38444: XLA_AE_LINES_PKG.ValidateCurrentLine;
38445: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38446:
38447: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
38448: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
38449: ,p_balance_type_code => l_balance_type_code);
38592: --
38593: -- bulk performance
38594: --
38595: l_balance_type_code VARCHAR2(1);
38596: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
38597: l_log_module VARCHAR2(240);
38598:
38599: --
38600: -- Upgrade strategy
38660: ') = 'N'
38661: THEN
38662:
38663: --
38664: XLA_AE_LINES_PKG.SetNewLine;
38665:
38666: p_balance_type_code := l_balance_type_code;
38667: -- set the flag so later we will know whether the gain loss line needs to be created
38668:
38672:
38673: --
38674: -- bulk performance
38675: --
38676: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
38677: p_header_num => 0); -- 4262811
38678: --
38679: -- set accounting line options
38680: --
38677: p_header_num => 0); -- 4262811
38678: --
38679: -- set accounting line options
38680: --
38681: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
38682: p_natural_side_code => 'C'
38683: , p_gain_or_loss_flag => 'N'
38684: , p_gl_transfer_mode_code => 'S'
38685: , p_acct_entry_type_code => 'A'
38691: --
38692: --
38693: -- set accounting line type info
38694: --
38695: xla_ae_lines_pkg.SetAcctLineType
38696: (p_component_type => l_component_type
38697: ,p_event_type_code => l_event_type_code
38698: ,p_line_definition_owner_code => l_line_definition_owner_code
38699: ,p_line_definition_code => l_line_definition_code
38705: ,p_event_class_code => l_event_class_code);
38706: --
38707: -- set accounting class
38708: --
38709: xla_ae_lines_pkg.SetAcctClass(
38710: p_accounting_class_code => 'COST_CLEARING'
38711: , p_ae_header_id => l_ae_header_id
38712: );
38713:
38713:
38714: --
38715: -- set rounding class
38716: --
38717: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38718: 'COST_CLEARING';
38719:
38720: --
38721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38717: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
38718: 'COST_CLEARING';
38719:
38720: --
38721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38723: --
38724: -- bulk performance
38725: --
38718: 'COST_CLEARING';
38719:
38720: --
38721: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
38722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38723: --
38724: -- bulk performance
38725: --
38726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38722: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
38723: --
38724: -- bulk performance
38725: --
38726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38727:
38728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38730:
38724: -- bulk performance
38725: --
38726: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
38727:
38728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38730:
38731: -- 4955764
38732: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38728: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
38729: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
38730:
38731: -- 4955764
38732: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
38733: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
38734:
38735: -- 4458381 Public Sector Enh
38736:
38800: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
38801: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
38802: l_rec_acct_attrs.array_char_value(30) := p_source_35;
38803:
38804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38806:
38807: ---------------------------------------------------------------------------------------------------------------
38808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38801: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
38802: l_rec_acct_attrs.array_char_value(30) := p_source_35;
38803:
38804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38806:
38807: ---------------------------------------------------------------------------------------------------------------
38808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38809: ---------------------------------------------------------------------------------------------------------------
38804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
38805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
38806:
38807: ---------------------------------------------------------------------------------------------------------------
38808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38809: ---------------------------------------------------------------------------------------------------------------
38810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38811:
38812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38806:
38807: ---------------------------------------------------------------------------------------------------------------
38808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38809: ---------------------------------------------------------------------------------------------------------------
38810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38811:
38812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38814:
38808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
38809: ---------------------------------------------------------------------------------------------------------------
38810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38811:
38812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38814:
38815: IF xla_accounting_cache_pkg.GetValueChar
38816: (p_source_code => 'LEDGER_CATEGORY_CODE'
38809: ---------------------------------------------------------------------------------------------------------------
38810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
38811:
38812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
38814:
38815: IF xla_accounting_cache_pkg.GetValueChar
38816: (p_source_code => 'LEDGER_CATEGORY_CODE'
38817: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
38820: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
38821: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
38822: )
38823: THEN
38824: xla_ae_lines_pkg.BflowUpgEntry
38825: (p_business_method_code => l_bflow_method_code
38826: ,p_business_class_code => l_bflow_class_code
38827: ,p_balance_type => l_balance_type_code);
38828: ELSE
38862: , x_value_type_code => l_adr_value_type_code
38863: , p_side => 'NA'
38864: );
38865:
38866: xla_ae_lines_pkg.set_ccid(
38867: p_code_combination_id => l_ccid
38868: , p_value_type_code => l_adr_value_type_code
38869: , p_transaction_coa_id => l_adr_transaction_coa_id
38870: , p_accounting_coa_id => l_adr_accounting_coa_id
38898: xla_accounting_err_pkg.build_message
38899: (p_appli_s_name => 'XLA'
38900: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
38901: ,p_token_1 => 'LINE_NUMBER'
38902: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
38903: ,p_token_2 => 'LINE_TYPE_NAME'
38904: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
38905: l_component_type
38906: ,l_component_code
38934: --
38935: --
38936: ------------------------------------------------------------------------------------------------
38937: -- 4219869 Business Flow
38938: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
38939: -- Prior Entry. Currently, the following code is always generated.
38940: ------------------------------------------------------------------------------------------------
38941: XLA_AE_LINES_PKG.ValidateCurrentLine;
38942:
38937: -- 4219869 Business Flow
38938: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
38939: -- Prior Entry. Currently, the following code is always generated.
38940: ------------------------------------------------------------------------------------------------
38941: XLA_AE_LINES_PKG.ValidateCurrentLine;
38942:
38943: ------------------------------------------------------------------------------------
38944: -- 4219869 Business Flow
38945: -- Populated credit and debit amounts -- Need to generate this within IF
38943: ------------------------------------------------------------------------------------
38944: -- 4219869 Business Flow
38945: -- Populated credit and debit amounts -- Need to generate this within IF
38946: ------------------------------------------------------------------------------------
38947: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
38948:
38949: ----------------------------------------------------------------------------------
38950: -- 4219869 Business Flow
38951: -- Update journal entry status -- Need to generate this within IF
38975: -- To allow MPA report to determine if it should generate report process
38976: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38977: ------------------------------------------------------------------------------------------
38978:
38979: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38980: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38981:
38982: --
38983: -- Update the line information that should be overwritten
38976: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
38977: ------------------------------------------------------------------------------------------
38978:
38979: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
38980: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
38981:
38982: --
38983: -- Update the line information that should be overwritten
38984: --
38981:
38982: --
38983: -- Update the line information that should be overwritten
38984: --
38985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38986: p_header_num => 1);
38987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38988:
38989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38983: -- Update the line information that should be overwritten
38984: --
38985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38986: p_header_num => 1);
38987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38988:
38989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38990:
38991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38985: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
38986: p_header_num => 1);
38987: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
38988:
38989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38990:
38991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38992: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38993: END IF;
38988:
38989: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
38990:
38991: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
38992: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
38993: END IF;
38994:
38995: --
38996: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38995: --
38996: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
38997: --
38998: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
38999: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
39000: ELSE
39001: ---------------------------------------------------------------------------------------------------
39002: -- 4262811a Switch Sign
39003: ---------------------------------------------------------------------------------------------------
39000: ELSE
39001: ---------------------------------------------------------------------------------------------------
39002: -- 4262811a Switch Sign
39003: ---------------------------------------------------------------------------------------------------
39004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39001: ---------------------------------------------------------------------------------------------------
39002: -- 4262811a Switch Sign
39003: ---------------------------------------------------------------------------------------------------
39004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39002: -- 4262811a Switch Sign
39003: ---------------------------------------------------------------------------------------------------
39004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39003: ---------------------------------------------------------------------------------------------------
39004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39004: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39005: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39012:
39006: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39012:
39013: END IF;
39014:
39007: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39008: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39009: -- 5132302
39010: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39011: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39012:
39013: END IF;
39014:
39015: -- 4955764
39012:
39013: END IF;
39014:
39015: -- 4955764
39016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39018:
39019:
39020: XLA_AE_LINES_PKG.ValidateCurrentLine;
39016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39018:
39019:
39020: XLA_AE_LINES_PKG.ValidateCurrentLine;
39021: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39022:
39023: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39024: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39018:
39019:
39020: XLA_AE_LINES_PKG.ValidateCurrentLine;
39021: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39022:
39023: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39024: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39025: ,p_balance_type_code => l_balance_type_code);
39167: --
39168: -- bulk performance
39169: --
39170: l_balance_type_code VARCHAR2(1);
39171: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
39172: l_log_module VARCHAR2(240);
39173:
39174: --
39175: -- Upgrade strategy
39232: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
39233: l_balance_type_code <> 'B' THEN
39234:
39235: --
39236: XLA_AE_LINES_PKG.SetNewLine;
39237:
39238: p_balance_type_code := l_balance_type_code;
39239: -- set the flag so later we will know whether the gain loss line needs to be created
39240:
39244:
39245: --
39246: -- bulk performance
39247: --
39248: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
39249: p_header_num => 0); -- 4262811
39250: --
39251: -- set accounting line options
39252: --
39249: p_header_num => 0); -- 4262811
39250: --
39251: -- set accounting line options
39252: --
39253: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
39254: p_natural_side_code => 'C'
39255: , p_gain_or_loss_flag => 'N'
39256: , p_gl_transfer_mode_code => 'S'
39257: , p_acct_entry_type_code => 'A'
39263: --
39264: --
39265: -- set accounting line type info
39266: --
39267: xla_ae_lines_pkg.SetAcctLineType
39268: (p_component_type => l_component_type
39269: ,p_event_type_code => l_event_type_code
39270: ,p_line_definition_owner_code => l_line_definition_owner_code
39271: ,p_line_definition_code => l_line_definition_code
39277: ,p_event_class_code => l_event_class_code);
39278: --
39279: -- set accounting class
39280: --
39281: xla_ae_lines_pkg.SetAcctClass(
39282: p_accounting_class_code => 'COST_CLEARING'
39283: , p_ae_header_id => l_ae_header_id
39284: );
39285:
39285:
39286: --
39287: -- set rounding class
39288: --
39289: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39290: 'COST_CLEARING';
39291:
39292: --
39293: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39289: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39290: 'COST_CLEARING';
39291:
39292: --
39293: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39294: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39295: --
39296: -- bulk performance
39297: --
39290: 'COST_CLEARING';
39291:
39292: --
39293: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39294: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39295: --
39296: -- bulk performance
39297: --
39298: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39294: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39295: --
39296: -- bulk performance
39297: --
39298: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39299:
39300: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39301: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39302:
39296: -- bulk performance
39297: --
39298: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39299:
39300: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39301: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39302:
39303: -- 4955764
39304: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39300: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39301: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39302:
39303: -- 4955764
39304: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39305: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
39306:
39307: -- 4458381 Public Sector Enh
39308:
39372: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
39373: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
39374: l_rec_acct_attrs.array_char_value(30) := p_source_35;
39375:
39376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39378:
39379: ---------------------------------------------------------------------------------------------------------------
39380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39373: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
39374: l_rec_acct_attrs.array_char_value(30) := p_source_35;
39375:
39376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39378:
39379: ---------------------------------------------------------------------------------------------------------------
39380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39381: ---------------------------------------------------------------------------------------------------------------
39376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39378:
39379: ---------------------------------------------------------------------------------------------------------------
39380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39381: ---------------------------------------------------------------------------------------------------------------
39382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39383:
39384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39378:
39379: ---------------------------------------------------------------------------------------------------------------
39380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39381: ---------------------------------------------------------------------------------------------------------------
39382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39383:
39384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39386:
39380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39381: ---------------------------------------------------------------------------------------------------------------
39382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39383:
39384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39386:
39387: IF xla_accounting_cache_pkg.GetValueChar
39388: (p_source_code => 'LEDGER_CATEGORY_CODE'
39381: ---------------------------------------------------------------------------------------------------------------
39382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39383:
39384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39386:
39387: IF xla_accounting_cache_pkg.GetValueChar
39388: (p_source_code => 'LEDGER_CATEGORY_CODE'
39389: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
39392: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
39393: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
39394: )
39395: THEN
39396: xla_ae_lines_pkg.BflowUpgEntry
39397: (p_business_method_code => l_bflow_method_code
39398: ,p_business_class_code => l_bflow_class_code
39399: ,p_balance_type => l_balance_type_code);
39400: ELSE
39434: , x_value_type_code => l_adr_value_type_code
39435: , p_side => 'NA'
39436: );
39437:
39438: xla_ae_lines_pkg.set_ccid(
39439: p_code_combination_id => l_ccid
39440: , p_value_type_code => l_adr_value_type_code
39441: , p_transaction_coa_id => l_adr_transaction_coa_id
39442: , p_accounting_coa_id => l_adr_accounting_coa_id
39470: xla_accounting_err_pkg.build_message
39471: (p_appli_s_name => 'XLA'
39472: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
39473: ,p_token_1 => 'LINE_NUMBER'
39474: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
39475: ,p_token_2 => 'LINE_TYPE_NAME'
39476: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
39477: l_component_type
39478: ,l_component_code
39506: --
39507: --
39508: ------------------------------------------------------------------------------------------------
39509: -- 4219869 Business Flow
39510: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
39511: -- Prior Entry. Currently, the following code is always generated.
39512: ------------------------------------------------------------------------------------------------
39513: XLA_AE_LINES_PKG.ValidateCurrentLine;
39514:
39509: -- 4219869 Business Flow
39510: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
39511: -- Prior Entry. Currently, the following code is always generated.
39512: ------------------------------------------------------------------------------------------------
39513: XLA_AE_LINES_PKG.ValidateCurrentLine;
39514:
39515: ------------------------------------------------------------------------------------
39516: -- 4219869 Business Flow
39517: -- Populated credit and debit amounts -- Need to generate this within IF
39515: ------------------------------------------------------------------------------------
39516: -- 4219869 Business Flow
39517: -- Populated credit and debit amounts -- Need to generate this within IF
39518: ------------------------------------------------------------------------------------
39519: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39520:
39521: ----------------------------------------------------------------------------------
39522: -- 4219869 Business Flow
39523: -- Update journal entry status -- Need to generate this within IF
39547: -- To allow MPA report to determine if it should generate report process
39548: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39549: ------------------------------------------------------------------------------------------
39550:
39551: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39552: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39553:
39554: --
39555: -- Update the line information that should be overwritten
39548: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
39549: ------------------------------------------------------------------------------------------
39550:
39551: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
39552: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
39553:
39554: --
39555: -- Update the line information that should be overwritten
39556: --
39553:
39554: --
39555: -- Update the line information that should be overwritten
39556: --
39557: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39558: p_header_num => 1);
39559: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39560:
39561: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39555: -- Update the line information that should be overwritten
39556: --
39557: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39558: p_header_num => 1);
39559: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39560:
39561: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39562:
39563: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39557: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
39558: p_header_num => 1);
39559: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
39560:
39561: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39562:
39563: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39564: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39565: END IF;
39560:
39561: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
39562:
39563: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
39564: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
39565: END IF;
39566:
39567: --
39568: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39567: --
39568: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
39569: --
39570: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
39571: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
39572: ELSE
39573: ---------------------------------------------------------------------------------------------------
39574: -- 4262811a Switch Sign
39575: ---------------------------------------------------------------------------------------------------
39572: ELSE
39573: ---------------------------------------------------------------------------------------------------
39574: -- 4262811a Switch Sign
39575: ---------------------------------------------------------------------------------------------------
39576: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39577: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39573: ---------------------------------------------------------------------------------------------------
39574: -- 4262811a Switch Sign
39575: ---------------------------------------------------------------------------------------------------
39576: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39577: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39574: -- 4262811a Switch Sign
39575: ---------------------------------------------------------------------------------------------------
39576: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39577: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39582: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39575: ---------------------------------------------------------------------------------------------------
39576: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39577: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39582: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39583: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39576: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
39577: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39582: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39583: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39584:
39578: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39582: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39583: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39584:
39585: END IF;
39586:
39579: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
39580: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39581: -- 5132302
39582: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
39583: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
39584:
39585: END IF;
39586:
39587: -- 4955764
39584:
39585: END IF;
39586:
39587: -- 4955764
39588: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39589: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39590:
39591:
39592: XLA_AE_LINES_PKG.ValidateCurrentLine;
39588: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39589: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39590:
39591:
39592: XLA_AE_LINES_PKG.ValidateCurrentLine;
39593: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39594:
39595: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39596: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39589: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
39590:
39591:
39592: XLA_AE_LINES_PKG.ValidateCurrentLine;
39593: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
39594:
39595: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
39596: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
39597: ,p_balance_type_code => l_balance_type_code);
39738: --
39739: -- bulk performance
39740: --
39741: l_balance_type_code VARCHAR2(1);
39742: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
39743: l_log_module VARCHAR2(240);
39744:
39745: --
39746: -- Upgrade strategy
39803: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
39804: l_balance_type_code <> 'B' THEN
39805:
39806: --
39807: XLA_AE_LINES_PKG.SetNewLine;
39808:
39809: p_balance_type_code := l_balance_type_code;
39810: -- set the flag so later we will know whether the gain loss line needs to be created
39811:
39815:
39816: --
39817: -- bulk performance
39818: --
39819: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
39820: p_header_num => 0); -- 4262811
39821: --
39822: -- set accounting line options
39823: --
39820: p_header_num => 0); -- 4262811
39821: --
39822: -- set accounting line options
39823: --
39824: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
39825: p_natural_side_code => 'C'
39826: , p_gain_or_loss_flag => 'N'
39827: , p_gl_transfer_mode_code => 'S'
39828: , p_acct_entry_type_code => 'A'
39834: --
39835: --
39836: -- set accounting line type info
39837: --
39838: xla_ae_lines_pkg.SetAcctLineType
39839: (p_component_type => l_component_type
39840: ,p_event_type_code => l_event_type_code
39841: ,p_line_definition_owner_code => l_line_definition_owner_code
39842: ,p_line_definition_code => l_line_definition_code
39848: ,p_event_class_code => l_event_class_code);
39849: --
39850: -- set accounting class
39851: --
39852: xla_ae_lines_pkg.SetAcctClass(
39853: p_accounting_class_code => 'COST_CLEARING'
39854: , p_ae_header_id => l_ae_header_id
39855: );
39856:
39856:
39857: --
39858: -- set rounding class
39859: --
39860: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39861: 'COST_CLEARING';
39862:
39863: --
39864: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39860: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
39861: 'COST_CLEARING';
39862:
39863: --
39864: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39865: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39866: --
39867: -- bulk performance
39868: --
39861: 'COST_CLEARING';
39862:
39863: --
39864: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
39865: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39866: --
39867: -- bulk performance
39868: --
39869: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39865: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
39866: --
39867: -- bulk performance
39868: --
39869: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39870:
39871: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39872: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39873:
39867: -- bulk performance
39868: --
39869: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
39870:
39871: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39872: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39873:
39874: -- 4955764
39875: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39871: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
39872: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
39873:
39874: -- 4955764
39875: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
39876: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
39877:
39878: -- 4458381 Public Sector Enh
39879:
39943: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
39944: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
39945: l_rec_acct_attrs.array_char_value(30) := p_source_35;
39946:
39947: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39948: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39949:
39950: ---------------------------------------------------------------------------------------------------------------
39951: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39944: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
39945: l_rec_acct_attrs.array_char_value(30) := p_source_35;
39946:
39947: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39948: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39949:
39950: ---------------------------------------------------------------------------------------------------------------
39951: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39952: ---------------------------------------------------------------------------------------------------------------
39947: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
39948: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
39949:
39950: ---------------------------------------------------------------------------------------------------------------
39951: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39952: ---------------------------------------------------------------------------------------------------------------
39953: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39954:
39955: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39949:
39950: ---------------------------------------------------------------------------------------------------------------
39951: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39952: ---------------------------------------------------------------------------------------------------------------
39953: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39954:
39955: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39956: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39957:
39951: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
39952: ---------------------------------------------------------------------------------------------------------------
39953: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39954:
39955: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39956: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39957:
39958: IF xla_accounting_cache_pkg.GetValueChar
39959: (p_source_code => 'LEDGER_CATEGORY_CODE'
39952: ---------------------------------------------------------------------------------------------------------------
39953: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
39954:
39955: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39956: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
39957:
39958: IF xla_accounting_cache_pkg.GetValueChar
39959: (p_source_code => 'LEDGER_CATEGORY_CODE'
39960: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
39963: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
39964: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
39965: )
39966: THEN
39967: xla_ae_lines_pkg.BflowUpgEntry
39968: (p_business_method_code => l_bflow_method_code
39969: ,p_business_class_code => l_bflow_class_code
39970: ,p_balance_type => l_balance_type_code);
39971: ELSE
40005: , x_value_type_code => l_adr_value_type_code
40006: , p_side => 'NA'
40007: );
40008:
40009: xla_ae_lines_pkg.set_ccid(
40010: p_code_combination_id => l_ccid
40011: , p_value_type_code => l_adr_value_type_code
40012: , p_transaction_coa_id => l_adr_transaction_coa_id
40013: , p_accounting_coa_id => l_adr_accounting_coa_id
40041: xla_accounting_err_pkg.build_message
40042: (p_appli_s_name => 'XLA'
40043: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
40044: ,p_token_1 => 'LINE_NUMBER'
40045: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
40046: ,p_token_2 => 'LINE_TYPE_NAME'
40047: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
40048: l_component_type
40049: ,l_component_code
40077: --
40078: --
40079: ------------------------------------------------------------------------------------------------
40080: -- 4219869 Business Flow
40081: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40082: -- Prior Entry. Currently, the following code is always generated.
40083: ------------------------------------------------------------------------------------------------
40084: XLA_AE_LINES_PKG.ValidateCurrentLine;
40085:
40080: -- 4219869 Business Flow
40081: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40082: -- Prior Entry. Currently, the following code is always generated.
40083: ------------------------------------------------------------------------------------------------
40084: XLA_AE_LINES_PKG.ValidateCurrentLine;
40085:
40086: ------------------------------------------------------------------------------------
40087: -- 4219869 Business Flow
40088: -- Populated credit and debit amounts -- Need to generate this within IF
40086: ------------------------------------------------------------------------------------
40087: -- 4219869 Business Flow
40088: -- Populated credit and debit amounts -- Need to generate this within IF
40089: ------------------------------------------------------------------------------------
40090: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40091:
40092: ----------------------------------------------------------------------------------
40093: -- 4219869 Business Flow
40094: -- Update journal entry status -- Need to generate this within IF
40118: -- To allow MPA report to determine if it should generate report process
40119: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40120: ------------------------------------------------------------------------------------------
40121:
40122: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40123: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40124:
40125: --
40126: -- Update the line information that should be overwritten
40119: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40120: ------------------------------------------------------------------------------------------
40121:
40122: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40123: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40124:
40125: --
40126: -- Update the line information that should be overwritten
40127: --
40124:
40125: --
40126: -- Update the line information that should be overwritten
40127: --
40128: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40129: p_header_num => 1);
40130: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40131:
40132: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40126: -- Update the line information that should be overwritten
40127: --
40128: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40129: p_header_num => 1);
40130: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40131:
40132: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40133:
40134: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40128: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40129: p_header_num => 1);
40130: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40131:
40132: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40133:
40134: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40135: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40136: END IF;
40131:
40132: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40133:
40134: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40135: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40136: END IF;
40137:
40138: --
40139: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40138: --
40139: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40140: --
40141: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
40142: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
40143: ELSE
40144: ---------------------------------------------------------------------------------------------------
40145: -- 4262811a Switch Sign
40146: ---------------------------------------------------------------------------------------------------
40143: ELSE
40144: ---------------------------------------------------------------------------------------------------
40145: -- 4262811a Switch Sign
40146: ---------------------------------------------------------------------------------------------------
40147: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40144: ---------------------------------------------------------------------------------------------------
40145: -- 4262811a Switch Sign
40146: ---------------------------------------------------------------------------------------------------
40147: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40145: -- 4262811a Switch Sign
40146: ---------------------------------------------------------------------------------------------------
40147: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40153: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40146: ---------------------------------------------------------------------------------------------------
40147: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40153: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40154: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40147: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40148: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40153: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40154: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40155:
40149: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40153: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40154: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40155:
40156: END IF;
40157:
40150: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40151: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40152: -- 5132302
40153: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40154: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40155:
40156: END IF;
40157:
40158: -- 4955764
40155:
40156: END IF;
40157:
40158: -- 4955764
40159: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40160: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40161:
40162:
40163: XLA_AE_LINES_PKG.ValidateCurrentLine;
40159: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40160: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40161:
40162:
40163: XLA_AE_LINES_PKG.ValidateCurrentLine;
40164: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40165:
40166: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40167: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40160: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40161:
40162:
40163: XLA_AE_LINES_PKG.ValidateCurrentLine;
40164: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40165:
40166: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40167: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40168: ,p_balance_type_code => l_balance_type_code);
40309: --
40310: -- bulk performance
40311: --
40312: l_balance_type_code VARCHAR2(1);
40313: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
40314: l_log_module VARCHAR2(240);
40315:
40316: --
40317: -- Upgrade strategy
40374: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
40375: l_balance_type_code <> 'B' THEN
40376:
40377: --
40378: XLA_AE_LINES_PKG.SetNewLine;
40379:
40380: p_balance_type_code := l_balance_type_code;
40381: -- set the flag so later we will know whether the gain loss line needs to be created
40382:
40386:
40387: --
40388: -- bulk performance
40389: --
40390: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
40391: p_header_num => 0); -- 4262811
40392: --
40393: -- set accounting line options
40394: --
40391: p_header_num => 0); -- 4262811
40392: --
40393: -- set accounting line options
40394: --
40395: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
40396: p_natural_side_code => 'C'
40397: , p_gain_or_loss_flag => 'N'
40398: , p_gl_transfer_mode_code => 'S'
40399: , p_acct_entry_type_code => 'A'
40405: --
40406: --
40407: -- set accounting line type info
40408: --
40409: xla_ae_lines_pkg.SetAcctLineType
40410: (p_component_type => l_component_type
40411: ,p_event_type_code => l_event_type_code
40412: ,p_line_definition_owner_code => l_line_definition_owner_code
40413: ,p_line_definition_code => l_line_definition_code
40419: ,p_event_class_code => l_event_class_code);
40420: --
40421: -- set accounting class
40422: --
40423: xla_ae_lines_pkg.SetAcctClass(
40424: p_accounting_class_code => 'COST_CLEARING'
40425: , p_ae_header_id => l_ae_header_id
40426: );
40427:
40427:
40428: --
40429: -- set rounding class
40430: --
40431: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40432: 'COST_CLEARING';
40433:
40434: --
40435: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40431: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
40432: 'COST_CLEARING';
40433:
40434: --
40435: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40436: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40437: --
40438: -- bulk performance
40439: --
40432: 'COST_CLEARING';
40433:
40434: --
40435: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
40436: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40437: --
40438: -- bulk performance
40439: --
40440: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40436: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
40437: --
40438: -- bulk performance
40439: --
40440: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40441:
40442: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40443: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40444:
40438: -- bulk performance
40439: --
40440: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
40441:
40442: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40443: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40444:
40445: -- 4955764
40446: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40442: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
40443: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
40444:
40445: -- 4955764
40446: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40447: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
40448:
40449: -- 4458381 Public Sector Enh
40450:
40514: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
40515: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
40516: l_rec_acct_attrs.array_char_value(30) := p_source_35;
40517:
40518: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40519: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40520:
40521: ---------------------------------------------------------------------------------------------------------------
40522: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40515: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
40516: l_rec_acct_attrs.array_char_value(30) := p_source_35;
40517:
40518: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40519: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40520:
40521: ---------------------------------------------------------------------------------------------------------------
40522: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40523: ---------------------------------------------------------------------------------------------------------------
40518: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
40519: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
40520:
40521: ---------------------------------------------------------------------------------------------------------------
40522: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40523: ---------------------------------------------------------------------------------------------------------------
40524: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40525:
40526: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40520:
40521: ---------------------------------------------------------------------------------------------------------------
40522: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40523: ---------------------------------------------------------------------------------------------------------------
40524: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40525:
40526: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40527: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40528:
40522: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
40523: ---------------------------------------------------------------------------------------------------------------
40524: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40525:
40526: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40527: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40528:
40529: IF xla_accounting_cache_pkg.GetValueChar
40530: (p_source_code => 'LEDGER_CATEGORY_CODE'
40523: ---------------------------------------------------------------------------------------------------------------
40524: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
40525:
40526: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40527: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
40528:
40529: IF xla_accounting_cache_pkg.GetValueChar
40530: (p_source_code => 'LEDGER_CATEGORY_CODE'
40531: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
40534: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
40535: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
40536: )
40537: THEN
40538: xla_ae_lines_pkg.BflowUpgEntry
40539: (p_business_method_code => l_bflow_method_code
40540: ,p_business_class_code => l_bflow_class_code
40541: ,p_balance_type => l_balance_type_code);
40542: ELSE
40575: , x_value_type_code => l_adr_value_type_code
40576: , p_side => 'NA'
40577: );
40578:
40579: xla_ae_lines_pkg.set_ccid(
40580: p_code_combination_id => l_ccid
40581: , p_value_type_code => l_adr_value_type_code
40582: , p_transaction_coa_id => l_adr_transaction_coa_id
40583: , p_accounting_coa_id => l_adr_accounting_coa_id
40611: xla_accounting_err_pkg.build_message
40612: (p_appli_s_name => 'XLA'
40613: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
40614: ,p_token_1 => 'LINE_NUMBER'
40615: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
40616: ,p_token_2 => 'LINE_TYPE_NAME'
40617: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
40618: l_component_type
40619: ,l_component_code
40647: --
40648: --
40649: ------------------------------------------------------------------------------------------------
40650: -- 4219869 Business Flow
40651: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40652: -- Prior Entry. Currently, the following code is always generated.
40653: ------------------------------------------------------------------------------------------------
40654: XLA_AE_LINES_PKG.ValidateCurrentLine;
40655:
40650: -- 4219869 Business Flow
40651: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
40652: -- Prior Entry. Currently, the following code is always generated.
40653: ------------------------------------------------------------------------------------------------
40654: XLA_AE_LINES_PKG.ValidateCurrentLine;
40655:
40656: ------------------------------------------------------------------------------------
40657: -- 4219869 Business Flow
40658: -- Populated credit and debit amounts -- Need to generate this within IF
40656: ------------------------------------------------------------------------------------
40657: -- 4219869 Business Flow
40658: -- Populated credit and debit amounts -- Need to generate this within IF
40659: ------------------------------------------------------------------------------------
40660: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40661:
40662: ----------------------------------------------------------------------------------
40663: -- 4219869 Business Flow
40664: -- Update journal entry status -- Need to generate this within IF
40688: -- To allow MPA report to determine if it should generate report process
40689: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40690: ------------------------------------------------------------------------------------------
40691:
40692: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40693: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40694:
40695: --
40696: -- Update the line information that should be overwritten
40689: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
40690: ------------------------------------------------------------------------------------------
40691:
40692: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
40693: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
40694:
40695: --
40696: -- Update the line information that should be overwritten
40697: --
40694:
40695: --
40696: -- Update the line information that should be overwritten
40697: --
40698: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40699: p_header_num => 1);
40700: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40701:
40702: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40696: -- Update the line information that should be overwritten
40697: --
40698: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40699: p_header_num => 1);
40700: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40701:
40702: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40703:
40704: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40698: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
40699: p_header_num => 1);
40700: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
40701:
40702: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40703:
40704: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40705: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40706: END IF;
40701:
40702: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
40703:
40704: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
40705: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
40706: END IF;
40707:
40708: --
40709: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40708: --
40709: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
40710: --
40711: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
40712: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
40713: ELSE
40714: ---------------------------------------------------------------------------------------------------
40715: -- 4262811a Switch Sign
40716: ---------------------------------------------------------------------------------------------------
40713: ELSE
40714: ---------------------------------------------------------------------------------------------------
40715: -- 4262811a Switch Sign
40716: ---------------------------------------------------------------------------------------------------
40717: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40714: ---------------------------------------------------------------------------------------------------
40715: -- 4262811a Switch Sign
40716: ---------------------------------------------------------------------------------------------------
40717: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40715: -- 4262811a Switch Sign
40716: ---------------------------------------------------------------------------------------------------
40717: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40716: ---------------------------------------------------------------------------------------------------
40717: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40724: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40717: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
40718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40724: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40725:
40719: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40724: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40725:
40726: END IF;
40727:
40720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
40721: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40722: -- 5132302
40723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
40724: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
40725:
40726: END IF;
40727:
40728: -- 4955764
40725:
40726: END IF;
40727:
40728: -- 4955764
40729: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40730: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40731:
40732:
40733: XLA_AE_LINES_PKG.ValidateCurrentLine;
40729: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
40730: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40731:
40732:
40733: XLA_AE_LINES_PKG.ValidateCurrentLine;
40734: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40735:
40736: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40737: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40730: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
40731:
40732:
40733: XLA_AE_LINES_PKG.ValidateCurrentLine;
40734: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
40735:
40736: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
40737: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
40738: ,p_balance_type_code => l_balance_type_code);
40879: --
40880: -- bulk performance
40881: --
40882: l_balance_type_code VARCHAR2(1);
40883: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
40884: l_log_module VARCHAR2(240);
40885:
40886: --
40887: -- Upgrade strategy
40944: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
40945: l_balance_type_code <> 'B' THEN
40946:
40947: --
40948: XLA_AE_LINES_PKG.SetNewLine;
40949:
40950: p_balance_type_code := l_balance_type_code;
40951: -- set the flag so later we will know whether the gain loss line needs to be created
40952:
40956:
40957: --
40958: -- bulk performance
40959: --
40960: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
40961: p_header_num => 0); -- 4262811
40962: --
40963: -- set accounting line options
40964: --
40961: p_header_num => 0); -- 4262811
40962: --
40963: -- set accounting line options
40964: --
40965: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
40966: p_natural_side_code => 'C'
40967: , p_gain_or_loss_flag => 'N'
40968: , p_gl_transfer_mode_code => 'S'
40969: , p_acct_entry_type_code => 'A'
40975: --
40976: --
40977: -- set accounting line type info
40978: --
40979: xla_ae_lines_pkg.SetAcctLineType
40980: (p_component_type => l_component_type
40981: ,p_event_type_code => l_event_type_code
40982: ,p_line_definition_owner_code => l_line_definition_owner_code
40983: ,p_line_definition_code => l_line_definition_code
40989: ,p_event_class_code => l_event_class_code);
40990: --
40991: -- set accounting class
40992: --
40993: xla_ae_lines_pkg.SetAcctClass(
40994: p_accounting_class_code => 'COST_CLEARING'
40995: , p_ae_header_id => l_ae_header_id
40996: );
40997:
40997:
40998: --
40999: -- set rounding class
41000: --
41001: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41002: 'COST_CLEARING';
41003:
41004: --
41005: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41001: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41002: 'COST_CLEARING';
41003:
41004: --
41005: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41006: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41007: --
41008: -- bulk performance
41009: --
41002: 'COST_CLEARING';
41003:
41004: --
41005: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41006: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41007: --
41008: -- bulk performance
41009: --
41010: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41006: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41007: --
41008: -- bulk performance
41009: --
41010: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41011:
41012: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41013: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41014:
41008: -- bulk performance
41009: --
41010: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41011:
41012: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41013: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41014:
41015: -- 4955764
41016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41012: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41013: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41014:
41015: -- 4955764
41016: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41017: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
41018:
41019: -- 4458381 Public Sector Enh
41020:
41084: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
41085: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
41086: l_rec_acct_attrs.array_char_value(30) := p_source_35;
41087:
41088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41090:
41091: ---------------------------------------------------------------------------------------------------------------
41092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41085: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
41086: l_rec_acct_attrs.array_char_value(30) := p_source_35;
41087:
41088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41090:
41091: ---------------------------------------------------------------------------------------------------------------
41092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41093: ---------------------------------------------------------------------------------------------------------------
41088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41090:
41091: ---------------------------------------------------------------------------------------------------------------
41092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41093: ---------------------------------------------------------------------------------------------------------------
41094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41095:
41096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41090:
41091: ---------------------------------------------------------------------------------------------------------------
41092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41093: ---------------------------------------------------------------------------------------------------------------
41094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41095:
41096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41098:
41092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41093: ---------------------------------------------------------------------------------------------------------------
41094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41095:
41096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41098:
41099: IF xla_accounting_cache_pkg.GetValueChar
41100: (p_source_code => 'LEDGER_CATEGORY_CODE'
41093: ---------------------------------------------------------------------------------------------------------------
41094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41095:
41096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41098:
41099: IF xla_accounting_cache_pkg.GetValueChar
41100: (p_source_code => 'LEDGER_CATEGORY_CODE'
41101: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
41104: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
41105: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
41106: )
41107: THEN
41108: xla_ae_lines_pkg.BflowUpgEntry
41109: (p_business_method_code => l_bflow_method_code
41110: ,p_business_class_code => l_bflow_class_code
41111: ,p_balance_type => l_balance_type_code);
41112: ELSE
41145: , x_value_type_code => l_adr_value_type_code
41146: , p_side => 'NA'
41147: );
41148:
41149: xla_ae_lines_pkg.set_ccid(
41150: p_code_combination_id => l_ccid
41151: , p_value_type_code => l_adr_value_type_code
41152: , p_transaction_coa_id => l_adr_transaction_coa_id
41153: , p_accounting_coa_id => l_adr_accounting_coa_id
41181: xla_accounting_err_pkg.build_message
41182: (p_appli_s_name => 'XLA'
41183: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
41184: ,p_token_1 => 'LINE_NUMBER'
41185: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
41186: ,p_token_2 => 'LINE_TYPE_NAME'
41187: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
41188: l_component_type
41189: ,l_component_code
41217: --
41218: --
41219: ------------------------------------------------------------------------------------------------
41220: -- 4219869 Business Flow
41221: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
41222: -- Prior Entry. Currently, the following code is always generated.
41223: ------------------------------------------------------------------------------------------------
41224: XLA_AE_LINES_PKG.ValidateCurrentLine;
41225:
41220: -- 4219869 Business Flow
41221: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
41222: -- Prior Entry. Currently, the following code is always generated.
41223: ------------------------------------------------------------------------------------------------
41224: XLA_AE_LINES_PKG.ValidateCurrentLine;
41225:
41226: ------------------------------------------------------------------------------------
41227: -- 4219869 Business Flow
41228: -- Populated credit and debit amounts -- Need to generate this within IF
41226: ------------------------------------------------------------------------------------
41227: -- 4219869 Business Flow
41228: -- Populated credit and debit amounts -- Need to generate this within IF
41229: ------------------------------------------------------------------------------------
41230: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41231:
41232: ----------------------------------------------------------------------------------
41233: -- 4219869 Business Flow
41234: -- Update journal entry status -- Need to generate this within IF
41258: -- To allow MPA report to determine if it should generate report process
41259: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41260: ------------------------------------------------------------------------------------------
41261:
41262: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41263: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41264:
41265: --
41266: -- Update the line information that should be overwritten
41259: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41260: ------------------------------------------------------------------------------------------
41261:
41262: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41263: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41264:
41265: --
41266: -- Update the line information that should be overwritten
41267: --
41264:
41265: --
41266: -- Update the line information that should be overwritten
41267: --
41268: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41269: p_header_num => 1);
41270: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41271:
41272: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41266: -- Update the line information that should be overwritten
41267: --
41268: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41269: p_header_num => 1);
41270: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41271:
41272: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41273:
41274: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41268: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41269: p_header_num => 1);
41270: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41271:
41272: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41273:
41274: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41275: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41276: END IF;
41271:
41272: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41273:
41274: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41275: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41276: END IF;
41277:
41278: --
41279: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41278: --
41279: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41280: --
41281: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
41282: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
41283: ELSE
41284: ---------------------------------------------------------------------------------------------------
41285: -- 4262811a Switch Sign
41286: ---------------------------------------------------------------------------------------------------
41283: ELSE
41284: ---------------------------------------------------------------------------------------------------
41285: -- 4262811a Switch Sign
41286: ---------------------------------------------------------------------------------------------------
41287: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41284: ---------------------------------------------------------------------------------------------------
41285: -- 4262811a Switch Sign
41286: ---------------------------------------------------------------------------------------------------
41287: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41285: -- 4262811a Switch Sign
41286: ---------------------------------------------------------------------------------------------------
41287: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41286: ---------------------------------------------------------------------------------------------------
41287: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41287: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41288: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41295:
41289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41295:
41296: END IF;
41297:
41290: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41292: -- 5132302
41293: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41295:
41296: END IF;
41297:
41298: -- 4955764
41295:
41296: END IF;
41297:
41298: -- 4955764
41299: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41300: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41301:
41302:
41303: XLA_AE_LINES_PKG.ValidateCurrentLine;
41299: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41300: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41301:
41302:
41303: XLA_AE_LINES_PKG.ValidateCurrentLine;
41304: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41305:
41306: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41307: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41300: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41301:
41302:
41303: XLA_AE_LINES_PKG.ValidateCurrentLine;
41304: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41305:
41306: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41307: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41308: ,p_balance_type_code => l_balance_type_code);
41449: --
41450: -- bulk performance
41451: --
41452: l_balance_type_code VARCHAR2(1);
41453: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
41454: l_log_module VARCHAR2(240);
41455:
41456: --
41457: -- Upgrade strategy
41514: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
41515: l_balance_type_code <> 'B' THEN
41516:
41517: --
41518: XLA_AE_LINES_PKG.SetNewLine;
41519:
41520: p_balance_type_code := l_balance_type_code;
41521: -- set the flag so later we will know whether the gain loss line needs to be created
41522:
41526:
41527: --
41528: -- bulk performance
41529: --
41530: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
41531: p_header_num => 0); -- 4262811
41532: --
41533: -- set accounting line options
41534: --
41531: p_header_num => 0); -- 4262811
41532: --
41533: -- set accounting line options
41534: --
41535: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
41536: p_natural_side_code => 'C'
41537: , p_gain_or_loss_flag => 'N'
41538: , p_gl_transfer_mode_code => 'S'
41539: , p_acct_entry_type_code => 'A'
41545: --
41546: --
41547: -- set accounting line type info
41548: --
41549: xla_ae_lines_pkg.SetAcctLineType
41550: (p_component_type => l_component_type
41551: ,p_event_type_code => l_event_type_code
41552: ,p_line_definition_owner_code => l_line_definition_owner_code
41553: ,p_line_definition_code => l_line_definition_code
41559: ,p_event_class_code => l_event_class_code);
41560: --
41561: -- set accounting class
41562: --
41563: xla_ae_lines_pkg.SetAcctClass(
41564: p_accounting_class_code => 'COST_CLEARING'
41565: , p_ae_header_id => l_ae_header_id
41566: );
41567:
41567:
41568: --
41569: -- set rounding class
41570: --
41571: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41572: 'COST_CLEARING';
41573:
41574: --
41575: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41571: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
41572: 'COST_CLEARING';
41573:
41574: --
41575: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41576: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41577: --
41578: -- bulk performance
41579: --
41572: 'COST_CLEARING';
41573:
41574: --
41575: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
41576: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41577: --
41578: -- bulk performance
41579: --
41580: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41576: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
41577: --
41578: -- bulk performance
41579: --
41580: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41581:
41582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41583: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41584:
41578: -- bulk performance
41579: --
41580: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
41581:
41582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41583: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41584:
41585: -- 4955764
41586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
41583: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
41584:
41585: -- 4955764
41586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
41588:
41589: -- 4458381 Public Sector Enh
41590:
41654: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
41655: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
41656: l_rec_acct_attrs.array_char_value(30) := p_source_35;
41657:
41658: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41659: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41660:
41661: ---------------------------------------------------------------------------------------------------------------
41662: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41655: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
41656: l_rec_acct_attrs.array_char_value(30) := p_source_35;
41657:
41658: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41659: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41660:
41661: ---------------------------------------------------------------------------------------------------------------
41662: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41663: ---------------------------------------------------------------------------------------------------------------
41658: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
41659: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
41660:
41661: ---------------------------------------------------------------------------------------------------------------
41662: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41663: ---------------------------------------------------------------------------------------------------------------
41664: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41665:
41666: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41660:
41661: ---------------------------------------------------------------------------------------------------------------
41662: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41663: ---------------------------------------------------------------------------------------------------------------
41664: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41665:
41666: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41667: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41668:
41662: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
41663: ---------------------------------------------------------------------------------------------------------------
41664: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41665:
41666: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41667: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41668:
41669: IF xla_accounting_cache_pkg.GetValueChar
41670: (p_source_code => 'LEDGER_CATEGORY_CODE'
41663: ---------------------------------------------------------------------------------------------------------------
41664: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
41665:
41666: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41667: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
41668:
41669: IF xla_accounting_cache_pkg.GetValueChar
41670: (p_source_code => 'LEDGER_CATEGORY_CODE'
41671: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
41674: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
41675: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
41676: )
41677: THEN
41678: xla_ae_lines_pkg.BflowUpgEntry
41679: (p_business_method_code => l_bflow_method_code
41680: ,p_business_class_code => l_bflow_class_code
41681: ,p_balance_type => l_balance_type_code);
41682: ELSE
41715: , x_value_type_code => l_adr_value_type_code
41716: , p_side => 'NA'
41717: );
41718:
41719: xla_ae_lines_pkg.set_ccid(
41720: p_code_combination_id => l_ccid
41721: , p_value_type_code => l_adr_value_type_code
41722: , p_transaction_coa_id => l_adr_transaction_coa_id
41723: , p_accounting_coa_id => l_adr_accounting_coa_id
41751: xla_accounting_err_pkg.build_message
41752: (p_appli_s_name => 'XLA'
41753: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
41754: ,p_token_1 => 'LINE_NUMBER'
41755: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
41756: ,p_token_2 => 'LINE_TYPE_NAME'
41757: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
41758: l_component_type
41759: ,l_component_code
41787: --
41788: --
41789: ------------------------------------------------------------------------------------------------
41790: -- 4219869 Business Flow
41791: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
41792: -- Prior Entry. Currently, the following code is always generated.
41793: ------------------------------------------------------------------------------------------------
41794: XLA_AE_LINES_PKG.ValidateCurrentLine;
41795:
41790: -- 4219869 Business Flow
41791: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
41792: -- Prior Entry. Currently, the following code is always generated.
41793: ------------------------------------------------------------------------------------------------
41794: XLA_AE_LINES_PKG.ValidateCurrentLine;
41795:
41796: ------------------------------------------------------------------------------------
41797: -- 4219869 Business Flow
41798: -- Populated credit and debit amounts -- Need to generate this within IF
41796: ------------------------------------------------------------------------------------
41797: -- 4219869 Business Flow
41798: -- Populated credit and debit amounts -- Need to generate this within IF
41799: ------------------------------------------------------------------------------------
41800: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41801:
41802: ----------------------------------------------------------------------------------
41803: -- 4219869 Business Flow
41804: -- Update journal entry status -- Need to generate this within IF
41828: -- To allow MPA report to determine if it should generate report process
41829: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41830: ------------------------------------------------------------------------------------------
41831:
41832: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41833: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41834:
41835: --
41836: -- Update the line information that should be overwritten
41829: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
41830: ------------------------------------------------------------------------------------------
41831:
41832: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
41833: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
41834:
41835: --
41836: -- Update the line information that should be overwritten
41837: --
41834:
41835: --
41836: -- Update the line information that should be overwritten
41837: --
41838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41839: p_header_num => 1);
41840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41841:
41842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41836: -- Update the line information that should be overwritten
41837: --
41838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41839: p_header_num => 1);
41840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41841:
41842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41843:
41844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41838: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
41839: p_header_num => 1);
41840: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
41841:
41842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41843:
41844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41845: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41846: END IF;
41841:
41842: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
41843:
41844: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
41845: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
41846: END IF;
41847:
41848: --
41849: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41848: --
41849: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
41850: --
41851: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
41852: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
41853: ELSE
41854: ---------------------------------------------------------------------------------------------------
41855: -- 4262811a Switch Sign
41856: ---------------------------------------------------------------------------------------------------
41853: ELSE
41854: ---------------------------------------------------------------------------------------------------
41855: -- 4262811a Switch Sign
41856: ---------------------------------------------------------------------------------------------------
41857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41854: ---------------------------------------------------------------------------------------------------
41855: -- 4262811a Switch Sign
41856: ---------------------------------------------------------------------------------------------------
41857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41855: -- 4262811a Switch Sign
41856: ---------------------------------------------------------------------------------------------------
41857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41856: ---------------------------------------------------------------------------------------------------
41857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41857: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
41858: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41865:
41859: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41865:
41866: END IF;
41867:
41860: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
41861: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41862: -- 5132302
41863: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
41864: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
41865:
41866: END IF;
41867:
41868: -- 4955764
41865:
41866: END IF;
41867:
41868: -- 4955764
41869: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41871:
41872:
41873: XLA_AE_LINES_PKG.ValidateCurrentLine;
41869: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
41870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41871:
41872:
41873: XLA_AE_LINES_PKG.ValidateCurrentLine;
41874: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41875:
41876: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41877: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41870: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
41871:
41872:
41873: XLA_AE_LINES_PKG.ValidateCurrentLine;
41874: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
41875:
41876: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
41877: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
41878: ,p_balance_type_code => l_balance_type_code);
42019: --
42020: -- bulk performance
42021: --
42022: l_balance_type_code VARCHAR2(1);
42023: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
42024: l_log_module VARCHAR2(240);
42025:
42026: --
42027: -- Upgrade strategy
42084: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
42085: l_balance_type_code <> 'B' THEN
42086:
42087: --
42088: XLA_AE_LINES_PKG.SetNewLine;
42089:
42090: p_balance_type_code := l_balance_type_code;
42091: -- set the flag so later we will know whether the gain loss line needs to be created
42092:
42096:
42097: --
42098: -- bulk performance
42099: --
42100: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
42101: p_header_num => 0); -- 4262811
42102: --
42103: -- set accounting line options
42104: --
42101: p_header_num => 0); -- 4262811
42102: --
42103: -- set accounting line options
42104: --
42105: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
42106: p_natural_side_code => 'C'
42107: , p_gain_or_loss_flag => 'N'
42108: , p_gl_transfer_mode_code => 'S'
42109: , p_acct_entry_type_code => 'A'
42115: --
42116: --
42117: -- set accounting line type info
42118: --
42119: xla_ae_lines_pkg.SetAcctLineType
42120: (p_component_type => l_component_type
42121: ,p_event_type_code => l_event_type_code
42122: ,p_line_definition_owner_code => l_line_definition_owner_code
42123: ,p_line_definition_code => l_line_definition_code
42129: ,p_event_class_code => l_event_class_code);
42130: --
42131: -- set accounting class
42132: --
42133: xla_ae_lines_pkg.SetAcctClass(
42134: p_accounting_class_code => 'COST_CLEARING'
42135: , p_ae_header_id => l_ae_header_id
42136: );
42137:
42137:
42138: --
42139: -- set rounding class
42140: --
42141: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42142: 'COST_CLEARING';
42143:
42144: --
42145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42141: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42142: 'COST_CLEARING';
42143:
42144: --
42145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42147: --
42148: -- bulk performance
42149: --
42142: 'COST_CLEARING';
42143:
42144: --
42145: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42147: --
42148: -- bulk performance
42149: --
42150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42146: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42147: --
42148: -- bulk performance
42149: --
42150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42151:
42152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42154:
42148: -- bulk performance
42149: --
42150: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42151:
42152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42154:
42155: -- 4955764
42156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42152: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42153: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42154:
42155: -- 4955764
42156: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42157: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
42158:
42159: -- 4458381 Public Sector Enh
42160:
42224: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
42225: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
42226: l_rec_acct_attrs.array_char_value(30) := p_source_35;
42227:
42228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42230:
42231: ---------------------------------------------------------------------------------------------------------------
42232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42225: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
42226: l_rec_acct_attrs.array_char_value(30) := p_source_35;
42227:
42228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42230:
42231: ---------------------------------------------------------------------------------------------------------------
42232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42233: ---------------------------------------------------------------------------------------------------------------
42228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42230:
42231: ---------------------------------------------------------------------------------------------------------------
42232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42233: ---------------------------------------------------------------------------------------------------------------
42234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42235:
42236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42230:
42231: ---------------------------------------------------------------------------------------------------------------
42232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42233: ---------------------------------------------------------------------------------------------------------------
42234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42235:
42236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42238:
42232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42233: ---------------------------------------------------------------------------------------------------------------
42234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42235:
42236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42238:
42239: IF xla_accounting_cache_pkg.GetValueChar
42240: (p_source_code => 'LEDGER_CATEGORY_CODE'
42233: ---------------------------------------------------------------------------------------------------------------
42234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42235:
42236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42238:
42239: IF xla_accounting_cache_pkg.GetValueChar
42240: (p_source_code => 'LEDGER_CATEGORY_CODE'
42241: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
42244: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
42245: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
42246: )
42247: THEN
42248: xla_ae_lines_pkg.BflowUpgEntry
42249: (p_business_method_code => l_bflow_method_code
42250: ,p_business_class_code => l_bflow_class_code
42251: ,p_balance_type => l_balance_type_code);
42252: ELSE
42285: , x_value_type_code => l_adr_value_type_code
42286: , p_side => 'NA'
42287: );
42288:
42289: xla_ae_lines_pkg.set_ccid(
42290: p_code_combination_id => l_ccid
42291: , p_value_type_code => l_adr_value_type_code
42292: , p_transaction_coa_id => l_adr_transaction_coa_id
42293: , p_accounting_coa_id => l_adr_accounting_coa_id
42321: xla_accounting_err_pkg.build_message
42322: (p_appli_s_name => 'XLA'
42323: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
42324: ,p_token_1 => 'LINE_NUMBER'
42325: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
42326: ,p_token_2 => 'LINE_TYPE_NAME'
42327: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
42328: l_component_type
42329: ,l_component_code
42357: --
42358: --
42359: ------------------------------------------------------------------------------------------------
42360: -- 4219869 Business Flow
42361: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42362: -- Prior Entry. Currently, the following code is always generated.
42363: ------------------------------------------------------------------------------------------------
42364: XLA_AE_LINES_PKG.ValidateCurrentLine;
42365:
42360: -- 4219869 Business Flow
42361: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42362: -- Prior Entry. Currently, the following code is always generated.
42363: ------------------------------------------------------------------------------------------------
42364: XLA_AE_LINES_PKG.ValidateCurrentLine;
42365:
42366: ------------------------------------------------------------------------------------
42367: -- 4219869 Business Flow
42368: -- Populated credit and debit amounts -- Need to generate this within IF
42366: ------------------------------------------------------------------------------------
42367: -- 4219869 Business Flow
42368: -- Populated credit and debit amounts -- Need to generate this within IF
42369: ------------------------------------------------------------------------------------
42370: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42371:
42372: ----------------------------------------------------------------------------------
42373: -- 4219869 Business Flow
42374: -- Update journal entry status -- Need to generate this within IF
42398: -- To allow MPA report to determine if it should generate report process
42399: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42400: ------------------------------------------------------------------------------------------
42401:
42402: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42403: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42404:
42405: --
42406: -- Update the line information that should be overwritten
42399: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42400: ------------------------------------------------------------------------------------------
42401:
42402: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42403: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42404:
42405: --
42406: -- Update the line information that should be overwritten
42407: --
42404:
42405: --
42406: -- Update the line information that should be overwritten
42407: --
42408: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42409: p_header_num => 1);
42410: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42411:
42412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42406: -- Update the line information that should be overwritten
42407: --
42408: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42409: p_header_num => 1);
42410: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42411:
42412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42413:
42414: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42408: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42409: p_header_num => 1);
42410: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42411:
42412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42413:
42414: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42415: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42416: END IF;
42411:
42412: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42413:
42414: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42415: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42416: END IF;
42417:
42418: --
42419: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42418: --
42419: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42420: --
42421: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
42422: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
42423: ELSE
42424: ---------------------------------------------------------------------------------------------------
42425: -- 4262811a Switch Sign
42426: ---------------------------------------------------------------------------------------------------
42423: ELSE
42424: ---------------------------------------------------------------------------------------------------
42425: -- 4262811a Switch Sign
42426: ---------------------------------------------------------------------------------------------------
42427: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42428: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42424: ---------------------------------------------------------------------------------------------------
42425: -- 4262811a Switch Sign
42426: ---------------------------------------------------------------------------------------------------
42427: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42428: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42425: -- 4262811a Switch Sign
42426: ---------------------------------------------------------------------------------------------------
42427: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42428: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42433: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42426: ---------------------------------------------------------------------------------------------------
42427: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42428: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42433: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42427: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42428: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42433: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42435:
42429: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42433: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42435:
42436: END IF;
42437:
42430: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42431: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42432: -- 5132302
42433: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42434: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42435:
42436: END IF;
42437:
42438: -- 4955764
42435:
42436: END IF;
42437:
42438: -- 4955764
42439: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42440: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42441:
42442:
42443: XLA_AE_LINES_PKG.ValidateCurrentLine;
42439: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42440: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42441:
42442:
42443: XLA_AE_LINES_PKG.ValidateCurrentLine;
42444: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42445:
42446: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42447: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42440: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
42441:
42442:
42443: XLA_AE_LINES_PKG.ValidateCurrentLine;
42444: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42445:
42446: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
42447: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
42448: ,p_balance_type_code => l_balance_type_code);
42589: --
42590: -- bulk performance
42591: --
42592: l_balance_type_code VARCHAR2(1);
42593: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
42594: l_log_module VARCHAR2(240);
42595:
42596: --
42597: -- Upgrade strategy
42654: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
42655: l_balance_type_code <> 'B' THEN
42656:
42657: --
42658: XLA_AE_LINES_PKG.SetNewLine;
42659:
42660: p_balance_type_code := l_balance_type_code;
42661: -- set the flag so later we will know whether the gain loss line needs to be created
42662:
42666:
42667: --
42668: -- bulk performance
42669: --
42670: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
42671: p_header_num => 0); -- 4262811
42672: --
42673: -- set accounting line options
42674: --
42671: p_header_num => 0); -- 4262811
42672: --
42673: -- set accounting line options
42674: --
42675: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
42676: p_natural_side_code => 'C'
42677: , p_gain_or_loss_flag => 'N'
42678: , p_gl_transfer_mode_code => 'S'
42679: , p_acct_entry_type_code => 'A'
42685: --
42686: --
42687: -- set accounting line type info
42688: --
42689: xla_ae_lines_pkg.SetAcctLineType
42690: (p_component_type => l_component_type
42691: ,p_event_type_code => l_event_type_code
42692: ,p_line_definition_owner_code => l_line_definition_owner_code
42693: ,p_line_definition_code => l_line_definition_code
42699: ,p_event_class_code => l_event_class_code);
42700: --
42701: -- set accounting class
42702: --
42703: xla_ae_lines_pkg.SetAcctClass(
42704: p_accounting_class_code => 'COST_CLEARING'
42705: , p_ae_header_id => l_ae_header_id
42706: );
42707:
42707:
42708: --
42709: -- set rounding class
42710: --
42711: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42712: 'COST_CLEARING';
42713:
42714: --
42715: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42711: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
42712: 'COST_CLEARING';
42713:
42714: --
42715: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42716: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42717: --
42718: -- bulk performance
42719: --
42712: 'COST_CLEARING';
42713:
42714: --
42715: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
42716: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42717: --
42718: -- bulk performance
42719: --
42720: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42716: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
42717: --
42718: -- bulk performance
42719: --
42720: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42721:
42722: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42723: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42724:
42718: -- bulk performance
42719: --
42720: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
42721:
42722: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42723: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42724:
42725: -- 4955764
42726: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42722: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
42723: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
42724:
42725: -- 4955764
42726: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
42727: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
42728:
42729: -- 4458381 Public Sector Enh
42730:
42794: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
42795: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
42796: l_rec_acct_attrs.array_char_value(30) := p_source_35;
42797:
42798: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42799: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42800:
42801: ---------------------------------------------------------------------------------------------------------------
42802: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42795: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
42796: l_rec_acct_attrs.array_char_value(30) := p_source_35;
42797:
42798: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42799: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42800:
42801: ---------------------------------------------------------------------------------------------------------------
42802: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42803: ---------------------------------------------------------------------------------------------------------------
42798: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
42799: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
42800:
42801: ---------------------------------------------------------------------------------------------------------------
42802: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42803: ---------------------------------------------------------------------------------------------------------------
42804: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42805:
42806: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42800:
42801: ---------------------------------------------------------------------------------------------------------------
42802: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42803: ---------------------------------------------------------------------------------------------------------------
42804: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42805:
42806: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42807: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42808:
42802: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
42803: ---------------------------------------------------------------------------------------------------------------
42804: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42805:
42806: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42807: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42808:
42809: IF xla_accounting_cache_pkg.GetValueChar
42810: (p_source_code => 'LEDGER_CATEGORY_CODE'
42803: ---------------------------------------------------------------------------------------------------------------
42804: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
42805:
42806: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42807: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
42808:
42809: IF xla_accounting_cache_pkg.GetValueChar
42810: (p_source_code => 'LEDGER_CATEGORY_CODE'
42811: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
42814: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
42815: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
42816: )
42817: THEN
42818: xla_ae_lines_pkg.BflowUpgEntry
42819: (p_business_method_code => l_bflow_method_code
42820: ,p_business_class_code => l_bflow_class_code
42821: ,p_balance_type => l_balance_type_code);
42822: ELSE
42855: , x_value_type_code => l_adr_value_type_code
42856: , p_side => 'NA'
42857: );
42858:
42859: xla_ae_lines_pkg.set_ccid(
42860: p_code_combination_id => l_ccid
42861: , p_value_type_code => l_adr_value_type_code
42862: , p_transaction_coa_id => l_adr_transaction_coa_id
42863: , p_accounting_coa_id => l_adr_accounting_coa_id
42891: xla_accounting_err_pkg.build_message
42892: (p_appli_s_name => 'XLA'
42893: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
42894: ,p_token_1 => 'LINE_NUMBER'
42895: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
42896: ,p_token_2 => 'LINE_TYPE_NAME'
42897: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
42898: l_component_type
42899: ,l_component_code
42927: --
42928: --
42929: ------------------------------------------------------------------------------------------------
42930: -- 4219869 Business Flow
42931: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42932: -- Prior Entry. Currently, the following code is always generated.
42933: ------------------------------------------------------------------------------------------------
42934: XLA_AE_LINES_PKG.ValidateCurrentLine;
42935:
42930: -- 4219869 Business Flow
42931: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
42932: -- Prior Entry. Currently, the following code is always generated.
42933: ------------------------------------------------------------------------------------------------
42934: XLA_AE_LINES_PKG.ValidateCurrentLine;
42935:
42936: ------------------------------------------------------------------------------------
42937: -- 4219869 Business Flow
42938: -- Populated credit and debit amounts -- Need to generate this within IF
42936: ------------------------------------------------------------------------------------
42937: -- 4219869 Business Flow
42938: -- Populated credit and debit amounts -- Need to generate this within IF
42939: ------------------------------------------------------------------------------------
42940: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
42941:
42942: ----------------------------------------------------------------------------------
42943: -- 4219869 Business Flow
42944: -- Update journal entry status -- Need to generate this within IF
42968: -- To allow MPA report to determine if it should generate report process
42969: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42970: ------------------------------------------------------------------------------------------
42971:
42972: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42973: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42974:
42975: --
42976: -- Update the line information that should be overwritten
42969: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
42970: ------------------------------------------------------------------------------------------
42971:
42972: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
42973: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
42974:
42975: --
42976: -- Update the line information that should be overwritten
42977: --
42974:
42975: --
42976: -- Update the line information that should be overwritten
42977: --
42978: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42979: p_header_num => 1);
42980: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42981:
42982: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42976: -- Update the line information that should be overwritten
42977: --
42978: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42979: p_header_num => 1);
42980: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42981:
42982: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42983:
42984: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42978: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
42979: p_header_num => 1);
42980: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
42981:
42982: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42983:
42984: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42985: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42986: END IF;
42981:
42982: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
42983:
42984: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
42985: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
42986: END IF;
42987:
42988: --
42989: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42988: --
42989: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
42990: --
42991: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
42992: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
42993: ELSE
42994: ---------------------------------------------------------------------------------------------------
42995: -- 4262811a Switch Sign
42996: ---------------------------------------------------------------------------------------------------
42993: ELSE
42994: ---------------------------------------------------------------------------------------------------
42995: -- 4262811a Switch Sign
42996: ---------------------------------------------------------------------------------------------------
42997: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42994: ---------------------------------------------------------------------------------------------------
42995: -- 4262811a Switch Sign
42996: ---------------------------------------------------------------------------------------------------
42997: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
42995: -- 4262811a Switch Sign
42996: ---------------------------------------------------------------------------------------------------
42997: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
43003: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
42996: ---------------------------------------------------------------------------------------------------
42997: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
43003: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43004: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
42997: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
42998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
43003: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43004: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43005:
42999: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
43003: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43004: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43005:
43006: END IF;
43007:
43000: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43001: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43002: -- 5132302
43003: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43004: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43005:
43006: END IF;
43007:
43008: -- 4955764
43005:
43006: END IF;
43007:
43008: -- 4955764
43009: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43010: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43011:
43012:
43013: XLA_AE_LINES_PKG.ValidateCurrentLine;
43009: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43010: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43011:
43012:
43013: XLA_AE_LINES_PKG.ValidateCurrentLine;
43014: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43015:
43016: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43017: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43010: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43011:
43012:
43013: XLA_AE_LINES_PKG.ValidateCurrentLine;
43014: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43015:
43016: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43017: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43018: ,p_balance_type_code => l_balance_type_code);
43161: --
43162: -- bulk performance
43163: --
43164: l_balance_type_code VARCHAR2(1);
43165: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
43166: l_log_module VARCHAR2(240);
43167:
43168: --
43169: -- Upgrade strategy
43229: ') = 'N'
43230: THEN
43231:
43232: --
43233: XLA_AE_LINES_PKG.SetNewLine;
43234:
43235: p_balance_type_code := l_balance_type_code;
43236: -- set the flag so later we will know whether the gain loss line needs to be created
43237:
43241:
43242: --
43243: -- bulk performance
43244: --
43245: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
43246: p_header_num => 0); -- 4262811
43247: --
43248: -- set accounting line options
43249: --
43246: p_header_num => 0); -- 4262811
43247: --
43248: -- set accounting line options
43249: --
43250: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
43251: p_natural_side_code => 'C'
43252: , p_gain_or_loss_flag => 'N'
43253: , p_gl_transfer_mode_code => 'S'
43254: , p_acct_entry_type_code => 'A'
43260: --
43261: --
43262: -- set accounting line type info
43263: --
43264: xla_ae_lines_pkg.SetAcctLineType
43265: (p_component_type => l_component_type
43266: ,p_event_type_code => l_event_type_code
43267: ,p_line_definition_owner_code => l_line_definition_owner_code
43268: ,p_line_definition_code => l_line_definition_code
43274: ,p_event_class_code => l_event_class_code);
43275: --
43276: -- set accounting class
43277: --
43278: xla_ae_lines_pkg.SetAcctClass(
43279: p_accounting_class_code => 'COST_CLEARING'
43280: , p_ae_header_id => l_ae_header_id
43281: );
43282:
43282:
43283: --
43284: -- set rounding class
43285: --
43286: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43287: 'COST_CLEARING';
43288:
43289: --
43290: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43286: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43287: 'COST_CLEARING';
43288:
43289: --
43290: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43291: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43292: --
43293: -- bulk performance
43294: --
43287: 'COST_CLEARING';
43288:
43289: --
43290: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43291: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43292: --
43293: -- bulk performance
43294: --
43295: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43291: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43292: --
43293: -- bulk performance
43294: --
43295: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43296:
43297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43298: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43299:
43293: -- bulk performance
43294: --
43295: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43296:
43297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43298: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43299:
43300: -- 4955764
43301: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43298: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43299:
43300: -- 4955764
43301: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43302: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
43303:
43304: -- 4458381 Public Sector Enh
43305:
43369: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
43370: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
43371: l_rec_acct_attrs.array_char_value(30) := p_source_35;
43372:
43373: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43374: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43375:
43376: ---------------------------------------------------------------------------------------------------------------
43377: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43370: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
43371: l_rec_acct_attrs.array_char_value(30) := p_source_35;
43372:
43373: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43374: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43375:
43376: ---------------------------------------------------------------------------------------------------------------
43377: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43378: ---------------------------------------------------------------------------------------------------------------
43373: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43374: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43375:
43376: ---------------------------------------------------------------------------------------------------------------
43377: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43378: ---------------------------------------------------------------------------------------------------------------
43379: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43380:
43381: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43375:
43376: ---------------------------------------------------------------------------------------------------------------
43377: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43378: ---------------------------------------------------------------------------------------------------------------
43379: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43380:
43381: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43382: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43383:
43377: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43378: ---------------------------------------------------------------------------------------------------------------
43379: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43380:
43381: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43382: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43383:
43384: IF xla_accounting_cache_pkg.GetValueChar
43385: (p_source_code => 'LEDGER_CATEGORY_CODE'
43378: ---------------------------------------------------------------------------------------------------------------
43379: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43380:
43381: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43382: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43383:
43384: IF xla_accounting_cache_pkg.GetValueChar
43385: (p_source_code => 'LEDGER_CATEGORY_CODE'
43386: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
43389: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
43390: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
43391: )
43392: THEN
43393: xla_ae_lines_pkg.BflowUpgEntry
43394: (p_business_method_code => l_bflow_method_code
43395: ,p_business_class_code => l_bflow_class_code
43396: ,p_balance_type => l_balance_type_code);
43397: ELSE
43430: , x_value_type_code => l_adr_value_type_code
43431: , p_side => 'NA'
43432: );
43433:
43434: xla_ae_lines_pkg.set_ccid(
43435: p_code_combination_id => l_ccid
43436: , p_value_type_code => l_adr_value_type_code
43437: , p_transaction_coa_id => l_adr_transaction_coa_id
43438: , p_accounting_coa_id => l_adr_accounting_coa_id
43466: xla_accounting_err_pkg.build_message
43467: (p_appli_s_name => 'XLA'
43468: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
43469: ,p_token_1 => 'LINE_NUMBER'
43470: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
43471: ,p_token_2 => 'LINE_TYPE_NAME'
43472: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
43473: l_component_type
43474: ,l_component_code
43502: --
43503: --
43504: ------------------------------------------------------------------------------------------------
43505: -- 4219869 Business Flow
43506: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
43507: -- Prior Entry. Currently, the following code is always generated.
43508: ------------------------------------------------------------------------------------------------
43509: XLA_AE_LINES_PKG.ValidateCurrentLine;
43510:
43505: -- 4219869 Business Flow
43506: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
43507: -- Prior Entry. Currently, the following code is always generated.
43508: ------------------------------------------------------------------------------------------------
43509: XLA_AE_LINES_PKG.ValidateCurrentLine;
43510:
43511: ------------------------------------------------------------------------------------
43512: -- 4219869 Business Flow
43513: -- Populated credit and debit amounts -- Need to generate this within IF
43511: ------------------------------------------------------------------------------------
43512: -- 4219869 Business Flow
43513: -- Populated credit and debit amounts -- Need to generate this within IF
43514: ------------------------------------------------------------------------------------
43515: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43516:
43517: ----------------------------------------------------------------------------------
43518: -- 4219869 Business Flow
43519: -- Update journal entry status -- Need to generate this within IF
43543: -- To allow MPA report to determine if it should generate report process
43544: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43545: ------------------------------------------------------------------------------------------
43546:
43547: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43548: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43549:
43550: --
43551: -- Update the line information that should be overwritten
43544: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
43545: ------------------------------------------------------------------------------------------
43546:
43547: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
43548: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
43549:
43550: --
43551: -- Update the line information that should be overwritten
43552: --
43549:
43550: --
43551: -- Update the line information that should be overwritten
43552: --
43553: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43554: p_header_num => 1);
43555: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43556:
43557: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43551: -- Update the line information that should be overwritten
43552: --
43553: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43554: p_header_num => 1);
43555: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43556:
43557: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43558:
43559: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43553: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
43554: p_header_num => 1);
43555: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
43556:
43557: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43558:
43559: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43560: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43561: END IF;
43556:
43557: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
43558:
43559: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
43560: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
43561: END IF;
43562:
43563: --
43564: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43563: --
43564: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
43565: --
43566: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
43567: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
43568: ELSE
43569: ---------------------------------------------------------------------------------------------------
43570: -- 4262811a Switch Sign
43571: ---------------------------------------------------------------------------------------------------
43568: ELSE
43569: ---------------------------------------------------------------------------------------------------
43570: -- 4262811a Switch Sign
43571: ---------------------------------------------------------------------------------------------------
43572: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43569: ---------------------------------------------------------------------------------------------------
43570: -- 4262811a Switch Sign
43571: ---------------------------------------------------------------------------------------------------
43572: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43570: -- 4262811a Switch Sign
43571: ---------------------------------------------------------------------------------------------------
43572: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43571: ---------------------------------------------------------------------------------------------------
43572: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43572: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
43573: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43580:
43574: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43580:
43581: END IF;
43582:
43575: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
43576: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43577: -- 5132302
43578: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
43579: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
43580:
43581: END IF;
43582:
43583: -- 4955764
43580:
43581: END IF;
43582:
43583: -- 4955764
43584: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43585: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43586:
43587:
43588: XLA_AE_LINES_PKG.ValidateCurrentLine;
43584: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43585: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43586:
43587:
43588: XLA_AE_LINES_PKG.ValidateCurrentLine;
43589: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43590:
43591: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43592: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43585: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
43586:
43587:
43588: XLA_AE_LINES_PKG.ValidateCurrentLine;
43589: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
43590:
43591: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
43592: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
43593: ,p_balance_type_code => l_balance_type_code);
43735: --
43736: -- bulk performance
43737: --
43738: l_balance_type_code VARCHAR2(1);
43739: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
43740: l_log_module VARCHAR2(240);
43741:
43742: --
43743: -- Upgrade strategy
43800: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
43801: l_balance_type_code <> 'B' THEN
43802:
43803: --
43804: XLA_AE_LINES_PKG.SetNewLine;
43805:
43806: p_balance_type_code := l_balance_type_code;
43807: -- set the flag so later we will know whether the gain loss line needs to be created
43808:
43812:
43813: --
43814: -- bulk performance
43815: --
43816: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
43817: p_header_num => 0); -- 4262811
43818: --
43819: -- set accounting line options
43820: --
43817: p_header_num => 0); -- 4262811
43818: --
43819: -- set accounting line options
43820: --
43821: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
43822: p_natural_side_code => 'C'
43823: , p_gain_or_loss_flag => 'N'
43824: , p_gl_transfer_mode_code => 'S'
43825: , p_acct_entry_type_code => 'A'
43831: --
43832: --
43833: -- set accounting line type info
43834: --
43835: xla_ae_lines_pkg.SetAcctLineType
43836: (p_component_type => l_component_type
43837: ,p_event_type_code => l_event_type_code
43838: ,p_line_definition_owner_code => l_line_definition_owner_code
43839: ,p_line_definition_code => l_line_definition_code
43845: ,p_event_class_code => l_event_class_code);
43846: --
43847: -- set accounting class
43848: --
43849: xla_ae_lines_pkg.SetAcctClass(
43850: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
43851: , p_ae_header_id => l_ae_header_id
43852: );
43853:
43853:
43854: --
43855: -- set rounding class
43856: --
43857: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43858: 'FEDERAL_PROJECT_COST_CLEARING';
43859:
43860: --
43861: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43857: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
43858: 'FEDERAL_PROJECT_COST_CLEARING';
43859:
43860: --
43861: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43862: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43863: --
43864: -- bulk performance
43865: --
43858: 'FEDERAL_PROJECT_COST_CLEARING';
43859:
43860: --
43861: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
43862: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43863: --
43864: -- bulk performance
43865: --
43866: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43862: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
43863: --
43864: -- bulk performance
43865: --
43866: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43867:
43868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43869: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43870:
43864: -- bulk performance
43865: --
43866: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
43867:
43868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43869: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43870:
43871: -- 4955764
43872: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
43869: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
43870:
43871: -- 4955764
43872: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
43873: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
43874:
43875: -- 4458381 Public Sector Enh
43876:
43940: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
43941: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
43942: l_rec_acct_attrs.array_char_value(30) := p_source_35;
43943:
43944: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43945: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43946:
43947: ---------------------------------------------------------------------------------------------------------------
43948: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43941: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
43942: l_rec_acct_attrs.array_char_value(30) := p_source_35;
43943:
43944: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43945: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43946:
43947: ---------------------------------------------------------------------------------------------------------------
43948: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43949: ---------------------------------------------------------------------------------------------------------------
43944: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
43945: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
43946:
43947: ---------------------------------------------------------------------------------------------------------------
43948: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43949: ---------------------------------------------------------------------------------------------------------------
43950: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43951:
43952: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43946:
43947: ---------------------------------------------------------------------------------------------------------------
43948: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43949: ---------------------------------------------------------------------------------------------------------------
43950: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43951:
43952: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43953: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43954:
43948: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
43949: ---------------------------------------------------------------------------------------------------------------
43950: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43951:
43952: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43953: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43954:
43955: IF xla_accounting_cache_pkg.GetValueChar
43956: (p_source_code => 'LEDGER_CATEGORY_CODE'
43949: ---------------------------------------------------------------------------------------------------------------
43950: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
43951:
43952: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43953: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
43954:
43955: IF xla_accounting_cache_pkg.GetValueChar
43956: (p_source_code => 'LEDGER_CATEGORY_CODE'
43957: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
43960: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
43961: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
43962: )
43963: THEN
43964: xla_ae_lines_pkg.BflowUpgEntry
43965: (p_business_method_code => l_bflow_method_code
43966: ,p_business_class_code => l_bflow_class_code
43967: ,p_balance_type => l_balance_type_code);
43968: ELSE
44001: , x_value_type_code => l_adr_value_type_code
44002: , p_side => 'NA'
44003: );
44004:
44005: xla_ae_lines_pkg.set_ccid(
44006: p_code_combination_id => l_ccid
44007: , p_value_type_code => l_adr_value_type_code
44008: , p_transaction_coa_id => l_adr_transaction_coa_id
44009: , p_accounting_coa_id => l_adr_accounting_coa_id
44033: );
44034:
44035: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
44036:
44037: xla_ae_lines_pkg.set_segment(
44038: p_to_segment_code => 'GL_ACCOUNT'
44039: , p_segment_value => l_segment
44040: , p_from_segment_code => l_adr_value_segment_code
44041: , p_from_combination_id => l_adr_value_combination_id
44077: xla_accounting_err_pkg.build_message
44078: (p_appli_s_name => 'XLA'
44079: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
44080: ,p_token_1 => 'LINE_NUMBER'
44081: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
44082: ,p_token_2 => 'LINE_TYPE_NAME'
44083: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
44084: l_component_type
44085: ,l_component_code
44113: --
44114: --
44115: ------------------------------------------------------------------------------------------------
44116: -- 4219869 Business Flow
44117: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
44118: -- Prior Entry. Currently, the following code is always generated.
44119: ------------------------------------------------------------------------------------------------
44120: XLA_AE_LINES_PKG.ValidateCurrentLine;
44121:
44116: -- 4219869 Business Flow
44117: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
44118: -- Prior Entry. Currently, the following code is always generated.
44119: ------------------------------------------------------------------------------------------------
44120: XLA_AE_LINES_PKG.ValidateCurrentLine;
44121:
44122: ------------------------------------------------------------------------------------
44123: -- 4219869 Business Flow
44124: -- Populated credit and debit amounts -- Need to generate this within IF
44122: ------------------------------------------------------------------------------------
44123: -- 4219869 Business Flow
44124: -- Populated credit and debit amounts -- Need to generate this within IF
44125: ------------------------------------------------------------------------------------
44126: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44127:
44128: ----------------------------------------------------------------------------------
44129: -- 4219869 Business Flow
44130: -- Update journal entry status -- Need to generate this within IF
44154: -- To allow MPA report to determine if it should generate report process
44155: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44156: ------------------------------------------------------------------------------------------
44157:
44158: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44159: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44160:
44161: --
44162: -- Update the line information that should be overwritten
44155: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44156: ------------------------------------------------------------------------------------------
44157:
44158: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44159: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44160:
44161: --
44162: -- Update the line information that should be overwritten
44163: --
44160:
44161: --
44162: -- Update the line information that should be overwritten
44163: --
44164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44165: p_header_num => 1);
44166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44167:
44168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44162: -- Update the line information that should be overwritten
44163: --
44164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44165: p_header_num => 1);
44166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44167:
44168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44169:
44170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44164: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44165: p_header_num => 1);
44166: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44167:
44168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44169:
44170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44171: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44172: END IF;
44167:
44168: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44169:
44170: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44171: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44172: END IF;
44173:
44174: --
44175: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44174: --
44175: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44176: --
44177: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
44178: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
44179: ELSE
44180: ---------------------------------------------------------------------------------------------------
44181: -- 4262811a Switch Sign
44182: ---------------------------------------------------------------------------------------------------
44179: ELSE
44180: ---------------------------------------------------------------------------------------------------
44181: -- 4262811a Switch Sign
44182: ---------------------------------------------------------------------------------------------------
44183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44180: ---------------------------------------------------------------------------------------------------
44181: -- 4262811a Switch Sign
44182: ---------------------------------------------------------------------------------------------------
44183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44181: -- 4262811a Switch Sign
44182: ---------------------------------------------------------------------------------------------------
44183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44182: ---------------------------------------------------------------------------------------------------
44183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44183: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44184: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44191:
44185: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44191:
44192: END IF;
44193:
44186: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44187: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44188: -- 5132302
44189: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44190: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44191:
44192: END IF;
44193:
44194: -- 4955764
44191:
44192: END IF;
44193:
44194: -- 4955764
44195: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44197:
44198:
44199: XLA_AE_LINES_PKG.ValidateCurrentLine;
44195: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44197:
44198:
44199: XLA_AE_LINES_PKG.ValidateCurrentLine;
44200: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44201:
44202: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44203: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44196: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44197:
44198:
44199: XLA_AE_LINES_PKG.ValidateCurrentLine;
44200: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44201:
44202: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44203: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44204: ,p_balance_type_code => l_balance_type_code);
44345: --
44346: -- bulk performance
44347: --
44348: l_balance_type_code VARCHAR2(1);
44349: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
44350: l_log_module VARCHAR2(240);
44351:
44352: --
44353: -- Upgrade strategy
44410: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
44411: l_balance_type_code <> 'B' THEN
44412:
44413: --
44414: XLA_AE_LINES_PKG.SetNewLine;
44415:
44416: p_balance_type_code := l_balance_type_code;
44417: -- set the flag so later we will know whether the gain loss line needs to be created
44418:
44422:
44423: --
44424: -- bulk performance
44425: --
44426: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
44427: p_header_num => 0); -- 4262811
44428: --
44429: -- set accounting line options
44430: --
44427: p_header_num => 0); -- 4262811
44428: --
44429: -- set accounting line options
44430: --
44431: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
44432: p_natural_side_code => 'C'
44433: , p_gain_or_loss_flag => 'N'
44434: , p_gl_transfer_mode_code => 'S'
44435: , p_acct_entry_type_code => 'A'
44441: --
44442: --
44443: -- set accounting line type info
44444: --
44445: xla_ae_lines_pkg.SetAcctLineType
44446: (p_component_type => l_component_type
44447: ,p_event_type_code => l_event_type_code
44448: ,p_line_definition_owner_code => l_line_definition_owner_code
44449: ,p_line_definition_code => l_line_definition_code
44455: ,p_event_class_code => l_event_class_code);
44456: --
44457: -- set accounting class
44458: --
44459: xla_ae_lines_pkg.SetAcctClass(
44460: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
44461: , p_ae_header_id => l_ae_header_id
44462: );
44463:
44463:
44464: --
44465: -- set rounding class
44466: --
44467: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44468: 'FEDERAL_PROJECT_COST_CLEARING';
44469:
44470: --
44471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44467: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
44468: 'FEDERAL_PROJECT_COST_CLEARING';
44469:
44470: --
44471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44473: --
44474: -- bulk performance
44475: --
44468: 'FEDERAL_PROJECT_COST_CLEARING';
44469:
44470: --
44471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
44472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44473: --
44474: -- bulk performance
44475: --
44476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
44473: --
44474: -- bulk performance
44475: --
44476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44477:
44478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44480:
44474: -- bulk performance
44475: --
44476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
44477:
44478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44480:
44481: -- 4955764
44482: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
44479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
44480:
44481: -- 4955764
44482: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44483: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
44484:
44485: -- 4458381 Public Sector Enh
44486:
44550: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
44551: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
44552: l_rec_acct_attrs.array_char_value(30) := p_source_35;
44553:
44554: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44555: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44556:
44557: ---------------------------------------------------------------------------------------------------------------
44558: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44551: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
44552: l_rec_acct_attrs.array_char_value(30) := p_source_35;
44553:
44554: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44555: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44556:
44557: ---------------------------------------------------------------------------------------------------------------
44558: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44559: ---------------------------------------------------------------------------------------------------------------
44554: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
44555: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
44556:
44557: ---------------------------------------------------------------------------------------------------------------
44558: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44559: ---------------------------------------------------------------------------------------------------------------
44560: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44561:
44562: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44556:
44557: ---------------------------------------------------------------------------------------------------------------
44558: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44559: ---------------------------------------------------------------------------------------------------------------
44560: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44561:
44562: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44563: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44564:
44558: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
44559: ---------------------------------------------------------------------------------------------------------------
44560: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44561:
44562: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44563: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44564:
44565: IF xla_accounting_cache_pkg.GetValueChar
44566: (p_source_code => 'LEDGER_CATEGORY_CODE'
44559: ---------------------------------------------------------------------------------------------------------------
44560: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
44561:
44562: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44563: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
44564:
44565: IF xla_accounting_cache_pkg.GetValueChar
44566: (p_source_code => 'LEDGER_CATEGORY_CODE'
44567: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
44570: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
44571: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
44572: )
44573: THEN
44574: xla_ae_lines_pkg.BflowUpgEntry
44575: (p_business_method_code => l_bflow_method_code
44576: ,p_business_class_code => l_bflow_class_code
44577: ,p_balance_type => l_balance_type_code);
44578: ELSE
44611: , x_value_type_code => l_adr_value_type_code
44612: , p_side => 'NA'
44613: );
44614:
44615: xla_ae_lines_pkg.set_ccid(
44616: p_code_combination_id => l_ccid
44617: , p_value_type_code => l_adr_value_type_code
44618: , p_transaction_coa_id => l_adr_transaction_coa_id
44619: , p_accounting_coa_id => l_adr_accounting_coa_id
44643: );
44644:
44645: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
44646:
44647: xla_ae_lines_pkg.set_segment(
44648: p_to_segment_code => 'GL_ACCOUNT'
44649: , p_segment_value => l_segment
44650: , p_from_segment_code => l_adr_value_segment_code
44651: , p_from_combination_id => l_adr_value_combination_id
44687: xla_accounting_err_pkg.build_message
44688: (p_appli_s_name => 'XLA'
44689: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
44690: ,p_token_1 => 'LINE_NUMBER'
44691: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
44692: ,p_token_2 => 'LINE_TYPE_NAME'
44693: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
44694: l_component_type
44695: ,l_component_code
44723: --
44724: --
44725: ------------------------------------------------------------------------------------------------
44726: -- 4219869 Business Flow
44727: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
44728: -- Prior Entry. Currently, the following code is always generated.
44729: ------------------------------------------------------------------------------------------------
44730: XLA_AE_LINES_PKG.ValidateCurrentLine;
44731:
44726: -- 4219869 Business Flow
44727: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
44728: -- Prior Entry. Currently, the following code is always generated.
44729: ------------------------------------------------------------------------------------------------
44730: XLA_AE_LINES_PKG.ValidateCurrentLine;
44731:
44732: ------------------------------------------------------------------------------------
44733: -- 4219869 Business Flow
44734: -- Populated credit and debit amounts -- Need to generate this within IF
44732: ------------------------------------------------------------------------------------
44733: -- 4219869 Business Flow
44734: -- Populated credit and debit amounts -- Need to generate this within IF
44735: ------------------------------------------------------------------------------------
44736: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44737:
44738: ----------------------------------------------------------------------------------
44739: -- 4219869 Business Flow
44740: -- Update journal entry status -- Need to generate this within IF
44764: -- To allow MPA report to determine if it should generate report process
44765: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44766: ------------------------------------------------------------------------------------------
44767:
44768: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44769: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44770:
44771: --
44772: -- Update the line information that should be overwritten
44765: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
44766: ------------------------------------------------------------------------------------------
44767:
44768: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
44769: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
44770:
44771: --
44772: -- Update the line information that should be overwritten
44773: --
44770:
44771: --
44772: -- Update the line information that should be overwritten
44773: --
44774: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44775: p_header_num => 1);
44776: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44777:
44778: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44772: -- Update the line information that should be overwritten
44773: --
44774: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44775: p_header_num => 1);
44776: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44777:
44778: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44779:
44780: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44774: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
44775: p_header_num => 1);
44776: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
44777:
44778: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44779:
44780: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44781: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44782: END IF;
44777:
44778: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
44779:
44780: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
44781: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
44782: END IF;
44783:
44784: --
44785: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44784: --
44785: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
44786: --
44787: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
44788: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
44789: ELSE
44790: ---------------------------------------------------------------------------------------------------
44791: -- 4262811a Switch Sign
44792: ---------------------------------------------------------------------------------------------------
44789: ELSE
44790: ---------------------------------------------------------------------------------------------------
44791: -- 4262811a Switch Sign
44792: ---------------------------------------------------------------------------------------------------
44793: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44794: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44790: ---------------------------------------------------------------------------------------------------
44791: -- 4262811a Switch Sign
44792: ---------------------------------------------------------------------------------------------------
44793: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44794: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44791: -- 4262811a Switch Sign
44792: ---------------------------------------------------------------------------------------------------
44793: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44794: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44799: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44792: ---------------------------------------------------------------------------------------------------
44793: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44794: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44799: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44800: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44793: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
44794: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44799: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44800: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44801:
44795: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44799: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44800: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44801:
44802: END IF;
44803:
44796: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
44797: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44798: -- 5132302
44799: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
44800: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
44801:
44802: END IF;
44803:
44804: -- 4955764
44801:
44802: END IF;
44803:
44804: -- 4955764
44805: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44806: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44807:
44808:
44809: XLA_AE_LINES_PKG.ValidateCurrentLine;
44805: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
44806: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44807:
44808:
44809: XLA_AE_LINES_PKG.ValidateCurrentLine;
44810: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44811:
44812: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44813: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44806: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
44807:
44808:
44809: XLA_AE_LINES_PKG.ValidateCurrentLine;
44810: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
44811:
44812: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
44813: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
44814: ,p_balance_type_code => l_balance_type_code);
44955: --
44956: -- bulk performance
44957: --
44958: l_balance_type_code VARCHAR2(1);
44959: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
44960: l_log_module VARCHAR2(240);
44961:
44962: --
44963: -- Upgrade strategy
45020: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
45021: l_balance_type_code <> 'B' THEN
45022:
45023: --
45024: XLA_AE_LINES_PKG.SetNewLine;
45025:
45026: p_balance_type_code := l_balance_type_code;
45027: -- set the flag so later we will know whether the gain loss line needs to be created
45028:
45032:
45033: --
45034: -- bulk performance
45035: --
45036: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
45037: p_header_num => 0); -- 4262811
45038: --
45039: -- set accounting line options
45040: --
45037: p_header_num => 0); -- 4262811
45038: --
45039: -- set accounting line options
45040: --
45041: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
45042: p_natural_side_code => 'C'
45043: , p_gain_or_loss_flag => 'N'
45044: , p_gl_transfer_mode_code => 'S'
45045: , p_acct_entry_type_code => 'A'
45051: --
45052: --
45053: -- set accounting line type info
45054: --
45055: xla_ae_lines_pkg.SetAcctLineType
45056: (p_component_type => l_component_type
45057: ,p_event_type_code => l_event_type_code
45058: ,p_line_definition_owner_code => l_line_definition_owner_code
45059: ,p_line_definition_code => l_line_definition_code
45065: ,p_event_class_code => l_event_class_code);
45066: --
45067: -- set accounting class
45068: --
45069: xla_ae_lines_pkg.SetAcctClass(
45070: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
45071: , p_ae_header_id => l_ae_header_id
45072: );
45073:
45073:
45074: --
45075: -- set rounding class
45076: --
45077: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45078: 'FEDERAL_PROJECT_COST_CLEARING';
45079:
45080: --
45081: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45077: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45078: 'FEDERAL_PROJECT_COST_CLEARING';
45079:
45080: --
45081: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45082: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45083: --
45084: -- bulk performance
45085: --
45078: 'FEDERAL_PROJECT_COST_CLEARING';
45079:
45080: --
45081: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45082: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45083: --
45084: -- bulk performance
45085: --
45086: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45082: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45083: --
45084: -- bulk performance
45085: --
45086: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45087:
45088: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45089: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45090:
45084: -- bulk performance
45085: --
45086: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45087:
45088: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45089: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45090:
45091: -- 4955764
45092: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45088: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45089: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45090:
45091: -- 4955764
45092: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45093: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
45094:
45095: -- 4458381 Public Sector Enh
45096:
45160: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
45161: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
45162: l_rec_acct_attrs.array_char_value(30) := p_source_35;
45163:
45164: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45165: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45166:
45167: ---------------------------------------------------------------------------------------------------------------
45168: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45161: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
45162: l_rec_acct_attrs.array_char_value(30) := p_source_35;
45163:
45164: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45165: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45166:
45167: ---------------------------------------------------------------------------------------------------------------
45168: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45169: ---------------------------------------------------------------------------------------------------------------
45164: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45165: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45166:
45167: ---------------------------------------------------------------------------------------------------------------
45168: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45169: ---------------------------------------------------------------------------------------------------------------
45170: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45171:
45172: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45166:
45167: ---------------------------------------------------------------------------------------------------------------
45168: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45169: ---------------------------------------------------------------------------------------------------------------
45170: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45171:
45172: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45173: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45174:
45168: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45169: ---------------------------------------------------------------------------------------------------------------
45170: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45171:
45172: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45173: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45174:
45175: IF xla_accounting_cache_pkg.GetValueChar
45176: (p_source_code => 'LEDGER_CATEGORY_CODE'
45169: ---------------------------------------------------------------------------------------------------------------
45170: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45171:
45172: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45173: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45174:
45175: IF xla_accounting_cache_pkg.GetValueChar
45176: (p_source_code => 'LEDGER_CATEGORY_CODE'
45177: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
45180: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
45181: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
45182: )
45183: THEN
45184: xla_ae_lines_pkg.BflowUpgEntry
45185: (p_business_method_code => l_bflow_method_code
45186: ,p_business_class_code => l_bflow_class_code
45187: ,p_balance_type => l_balance_type_code);
45188: ELSE
45221: , x_value_type_code => l_adr_value_type_code
45222: , p_side => 'NA'
45223: );
45224:
45225: xla_ae_lines_pkg.set_ccid(
45226: p_code_combination_id => l_ccid
45227: , p_value_type_code => l_adr_value_type_code
45228: , p_transaction_coa_id => l_adr_transaction_coa_id
45229: , p_accounting_coa_id => l_adr_accounting_coa_id
45253: );
45254:
45255: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
45256:
45257: xla_ae_lines_pkg.set_segment(
45258: p_to_segment_code => 'GL_ACCOUNT'
45259: , p_segment_value => l_segment
45260: , p_from_segment_code => l_adr_value_segment_code
45261: , p_from_combination_id => l_adr_value_combination_id
45297: xla_accounting_err_pkg.build_message
45298: (p_appli_s_name => 'XLA'
45299: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
45300: ,p_token_1 => 'LINE_NUMBER'
45301: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
45302: ,p_token_2 => 'LINE_TYPE_NAME'
45303: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
45304: l_component_type
45305: ,l_component_code
45333: --
45334: --
45335: ------------------------------------------------------------------------------------------------
45336: -- 4219869 Business Flow
45337: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45338: -- Prior Entry. Currently, the following code is always generated.
45339: ------------------------------------------------------------------------------------------------
45340: XLA_AE_LINES_PKG.ValidateCurrentLine;
45341:
45336: -- 4219869 Business Flow
45337: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45338: -- Prior Entry. Currently, the following code is always generated.
45339: ------------------------------------------------------------------------------------------------
45340: XLA_AE_LINES_PKG.ValidateCurrentLine;
45341:
45342: ------------------------------------------------------------------------------------
45343: -- 4219869 Business Flow
45344: -- Populated credit and debit amounts -- Need to generate this within IF
45342: ------------------------------------------------------------------------------------
45343: -- 4219869 Business Flow
45344: -- Populated credit and debit amounts -- Need to generate this within IF
45345: ------------------------------------------------------------------------------------
45346: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45347:
45348: ----------------------------------------------------------------------------------
45349: -- 4219869 Business Flow
45350: -- Update journal entry status -- Need to generate this within IF
45374: -- To allow MPA report to determine if it should generate report process
45375: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45376: ------------------------------------------------------------------------------------------
45377:
45378: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45379: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45380:
45381: --
45382: -- Update the line information that should be overwritten
45375: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45376: ------------------------------------------------------------------------------------------
45377:
45378: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45379: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45380:
45381: --
45382: -- Update the line information that should be overwritten
45383: --
45380:
45381: --
45382: -- Update the line information that should be overwritten
45383: --
45384: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45385: p_header_num => 1);
45386: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45387:
45388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45382: -- Update the line information that should be overwritten
45383: --
45384: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45385: p_header_num => 1);
45386: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45387:
45388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45389:
45390: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45384: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45385: p_header_num => 1);
45386: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45387:
45388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45389:
45390: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45391: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45392: END IF;
45387:
45388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45389:
45390: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45391: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
45392: END IF;
45393:
45394: --
45395: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45394: --
45395: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
45396: --
45397: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
45398: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
45399: ELSE
45400: ---------------------------------------------------------------------------------------------------
45401: -- 4262811a Switch Sign
45402: ---------------------------------------------------------------------------------------------------
45399: ELSE
45400: ---------------------------------------------------------------------------------------------------
45401: -- 4262811a Switch Sign
45402: ---------------------------------------------------------------------------------------------------
45403: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45400: ---------------------------------------------------------------------------------------------------
45401: -- 4262811a Switch Sign
45402: ---------------------------------------------------------------------------------------------------
45403: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45401: -- 4262811a Switch Sign
45402: ---------------------------------------------------------------------------------------------------
45403: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45402: ---------------------------------------------------------------------------------------------------
45403: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45410: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45403: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
45404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45410: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45411:
45405: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45410: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45411:
45412: END IF;
45413:
45406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
45407: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45408: -- 5132302
45409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
45410: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
45411:
45412: END IF;
45413:
45414: -- 4955764
45411:
45412: END IF;
45413:
45414: -- 4955764
45415: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45416: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45417:
45418:
45419: XLA_AE_LINES_PKG.ValidateCurrentLine;
45415: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45416: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45417:
45418:
45419: XLA_AE_LINES_PKG.ValidateCurrentLine;
45420: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45421:
45422: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45423: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45416: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
45417:
45418:
45419: XLA_AE_LINES_PKG.ValidateCurrentLine;
45420: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45421:
45422: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
45423: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
45424: ,p_balance_type_code => l_balance_type_code);
45565: --
45566: -- bulk performance
45567: --
45568: l_balance_type_code VARCHAR2(1);
45569: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
45570: l_log_module VARCHAR2(240);
45571:
45572: --
45573: -- Upgrade strategy
45630: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
45631: l_balance_type_code <> 'B' THEN
45632:
45633: --
45634: XLA_AE_LINES_PKG.SetNewLine;
45635:
45636: p_balance_type_code := l_balance_type_code;
45637: -- set the flag so later we will know whether the gain loss line needs to be created
45638:
45642:
45643: --
45644: -- bulk performance
45645: --
45646: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
45647: p_header_num => 0); -- 4262811
45648: --
45649: -- set accounting line options
45650: --
45647: p_header_num => 0); -- 4262811
45648: --
45649: -- set accounting line options
45650: --
45651: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
45652: p_natural_side_code => 'C'
45653: , p_gain_or_loss_flag => 'N'
45654: , p_gl_transfer_mode_code => 'S'
45655: , p_acct_entry_type_code => 'A'
45661: --
45662: --
45663: -- set accounting line type info
45664: --
45665: xla_ae_lines_pkg.SetAcctLineType
45666: (p_component_type => l_component_type
45667: ,p_event_type_code => l_event_type_code
45668: ,p_line_definition_owner_code => l_line_definition_owner_code
45669: ,p_line_definition_code => l_line_definition_code
45675: ,p_event_class_code => l_event_class_code);
45676: --
45677: -- set accounting class
45678: --
45679: xla_ae_lines_pkg.SetAcctClass(
45680: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
45681: , p_ae_header_id => l_ae_header_id
45682: );
45683:
45683:
45684: --
45685: -- set rounding class
45686: --
45687: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45688: 'FEDERAL_PROJECT_COST_CLEARING';
45689:
45690: --
45691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45687: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
45688: 'FEDERAL_PROJECT_COST_CLEARING';
45689:
45690: --
45691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45693: --
45694: -- bulk performance
45695: --
45688: 'FEDERAL_PROJECT_COST_CLEARING';
45689:
45690: --
45691: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
45692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45693: --
45694: -- bulk performance
45695: --
45696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45692: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
45693: --
45694: -- bulk performance
45695: --
45696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45697:
45698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45700:
45694: -- bulk performance
45695: --
45696: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
45697:
45698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45700:
45701: -- 4955764
45702: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45698: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
45699: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
45700:
45701: -- 4955764
45702: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
45703: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
45704:
45705: -- 4458381 Public Sector Enh
45706:
45770: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
45771: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
45772: l_rec_acct_attrs.array_char_value(30) := p_source_35;
45773:
45774: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45775: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45776:
45777: ---------------------------------------------------------------------------------------------------------------
45778: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45771: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
45772: l_rec_acct_attrs.array_char_value(30) := p_source_35;
45773:
45774: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45775: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45776:
45777: ---------------------------------------------------------------------------------------------------------------
45778: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45779: ---------------------------------------------------------------------------------------------------------------
45774: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
45775: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
45776:
45777: ---------------------------------------------------------------------------------------------------------------
45778: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45779: ---------------------------------------------------------------------------------------------------------------
45780: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45781:
45782: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45776:
45777: ---------------------------------------------------------------------------------------------------------------
45778: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45779: ---------------------------------------------------------------------------------------------------------------
45780: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45781:
45782: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45783: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45784:
45778: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
45779: ---------------------------------------------------------------------------------------------------------------
45780: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45781:
45782: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45783: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45784:
45785: IF xla_accounting_cache_pkg.GetValueChar
45786: (p_source_code => 'LEDGER_CATEGORY_CODE'
45779: ---------------------------------------------------------------------------------------------------------------
45780: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
45781:
45782: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45783: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
45784:
45785: IF xla_accounting_cache_pkg.GetValueChar
45786: (p_source_code => 'LEDGER_CATEGORY_CODE'
45787: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
45790: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
45791: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
45792: )
45793: THEN
45794: xla_ae_lines_pkg.BflowUpgEntry
45795: (p_business_method_code => l_bflow_method_code
45796: ,p_business_class_code => l_bflow_class_code
45797: ,p_balance_type => l_balance_type_code);
45798: ELSE
45831: , x_value_type_code => l_adr_value_type_code
45832: , p_side => 'NA'
45833: );
45834:
45835: xla_ae_lines_pkg.set_ccid(
45836: p_code_combination_id => l_ccid
45837: , p_value_type_code => l_adr_value_type_code
45838: , p_transaction_coa_id => l_adr_transaction_coa_id
45839: , p_accounting_coa_id => l_adr_accounting_coa_id
45863: );
45864:
45865: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
45866:
45867: xla_ae_lines_pkg.set_segment(
45868: p_to_segment_code => 'GL_ACCOUNT'
45869: , p_segment_value => l_segment
45870: , p_from_segment_code => l_adr_value_segment_code
45871: , p_from_combination_id => l_adr_value_combination_id
45907: xla_accounting_err_pkg.build_message
45908: (p_appli_s_name => 'XLA'
45909: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
45910: ,p_token_1 => 'LINE_NUMBER'
45911: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
45912: ,p_token_2 => 'LINE_TYPE_NAME'
45913: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
45914: l_component_type
45915: ,l_component_code
45943: --
45944: --
45945: ------------------------------------------------------------------------------------------------
45946: -- 4219869 Business Flow
45947: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45948: -- Prior Entry. Currently, the following code is always generated.
45949: ------------------------------------------------------------------------------------------------
45950: XLA_AE_LINES_PKG.ValidateCurrentLine;
45951:
45946: -- 4219869 Business Flow
45947: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
45948: -- Prior Entry. Currently, the following code is always generated.
45949: ------------------------------------------------------------------------------------------------
45950: XLA_AE_LINES_PKG.ValidateCurrentLine;
45951:
45952: ------------------------------------------------------------------------------------
45953: -- 4219869 Business Flow
45954: -- Populated credit and debit amounts -- Need to generate this within IF
45952: ------------------------------------------------------------------------------------
45953: -- 4219869 Business Flow
45954: -- Populated credit and debit amounts -- Need to generate this within IF
45955: ------------------------------------------------------------------------------------
45956: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
45957:
45958: ----------------------------------------------------------------------------------
45959: -- 4219869 Business Flow
45960: -- Update journal entry status -- Need to generate this within IF
45984: -- To allow MPA report to determine if it should generate report process
45985: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45986: ------------------------------------------------------------------------------------------
45987:
45988: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45989: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45990:
45991: --
45992: -- Update the line information that should be overwritten
45985: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
45986: ------------------------------------------------------------------------------------------
45987:
45988: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
45989: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
45990:
45991: --
45992: -- Update the line information that should be overwritten
45993: --
45990:
45991: --
45992: -- Update the line information that should be overwritten
45993: --
45994: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45995: p_header_num => 1);
45996: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45997:
45998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45992: -- Update the line information that should be overwritten
45993: --
45994: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45995: p_header_num => 1);
45996: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45997:
45998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45999:
46000: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
45994: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
45995: p_header_num => 1);
45996: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
45997:
45998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45999:
46000: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46001: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46002: END IF;
45997:
45998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
45999:
46000: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46001: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46002: END IF;
46003:
46004: --
46005: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46004: --
46005: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46006: --
46007: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
46008: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
46009: ELSE
46010: ---------------------------------------------------------------------------------------------------
46011: -- 4262811a Switch Sign
46012: ---------------------------------------------------------------------------------------------------
46009: ELSE
46010: ---------------------------------------------------------------------------------------------------
46011: -- 4262811a Switch Sign
46012: ---------------------------------------------------------------------------------------------------
46013: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46010: ---------------------------------------------------------------------------------------------------
46011: -- 4262811a Switch Sign
46012: ---------------------------------------------------------------------------------------------------
46013: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46011: -- 4262811a Switch Sign
46012: ---------------------------------------------------------------------------------------------------
46013: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46019: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46012: ---------------------------------------------------------------------------------------------------
46013: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46019: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46020: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46013: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46019: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46020: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46021:
46015: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46019: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46020: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46021:
46022: END IF;
46023:
46016: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46017: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46018: -- 5132302
46019: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46020: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46021:
46022: END IF;
46023:
46024: -- 4955764
46021:
46022: END IF;
46023:
46024: -- 4955764
46025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46026: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46027:
46028:
46029: XLA_AE_LINES_PKG.ValidateCurrentLine;
46025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46026: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46027:
46028:
46029: XLA_AE_LINES_PKG.ValidateCurrentLine;
46030: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46031:
46032: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46033: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46026: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46027:
46028:
46029: XLA_AE_LINES_PKG.ValidateCurrentLine;
46030: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46031:
46032: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46033: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46034: ,p_balance_type_code => l_balance_type_code);
46175: --
46176: -- bulk performance
46177: --
46178: l_balance_type_code VARCHAR2(1);
46179: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
46180: l_log_module VARCHAR2(240);
46181:
46182: --
46183: -- Upgrade strategy
46240: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
46241: l_balance_type_code <> 'B' THEN
46242:
46243: --
46244: XLA_AE_LINES_PKG.SetNewLine;
46245:
46246: p_balance_type_code := l_balance_type_code;
46247: -- set the flag so later we will know whether the gain loss line needs to be created
46248:
46252:
46253: --
46254: -- bulk performance
46255: --
46256: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
46257: p_header_num => 0); -- 4262811
46258: --
46259: -- set accounting line options
46260: --
46257: p_header_num => 0); -- 4262811
46258: --
46259: -- set accounting line options
46260: --
46261: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
46262: p_natural_side_code => 'C'
46263: , p_gain_or_loss_flag => 'N'
46264: , p_gl_transfer_mode_code => 'S'
46265: , p_acct_entry_type_code => 'A'
46271: --
46272: --
46273: -- set accounting line type info
46274: --
46275: xla_ae_lines_pkg.SetAcctLineType
46276: (p_component_type => l_component_type
46277: ,p_event_type_code => l_event_type_code
46278: ,p_line_definition_owner_code => l_line_definition_owner_code
46279: ,p_line_definition_code => l_line_definition_code
46285: ,p_event_class_code => l_event_class_code);
46286: --
46287: -- set accounting class
46288: --
46289: xla_ae_lines_pkg.SetAcctClass(
46290: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
46291: , p_ae_header_id => l_ae_header_id
46292: );
46293:
46293:
46294: --
46295: -- set rounding class
46296: --
46297: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46298: 'FEDERAL_PROJECT_COST_CLEARING';
46299:
46300: --
46301: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46297: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46298: 'FEDERAL_PROJECT_COST_CLEARING';
46299:
46300: --
46301: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46302: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46303: --
46304: -- bulk performance
46305: --
46298: 'FEDERAL_PROJECT_COST_CLEARING';
46299:
46300: --
46301: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46302: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46303: --
46304: -- bulk performance
46305: --
46306: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46302: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46303: --
46304: -- bulk performance
46305: --
46306: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46307:
46308: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46309: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46310:
46304: -- bulk performance
46305: --
46306: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46307:
46308: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46309: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46310:
46311: -- 4955764
46312: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46308: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46309: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46310:
46311: -- 4955764
46312: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46313: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
46314:
46315: -- 4458381 Public Sector Enh
46316:
46380: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
46381: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
46382: l_rec_acct_attrs.array_char_value(30) := p_source_35;
46383:
46384: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46385: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46386:
46387: ---------------------------------------------------------------------------------------------------------------
46388: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46381: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
46382: l_rec_acct_attrs.array_char_value(30) := p_source_35;
46383:
46384: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46385: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46386:
46387: ---------------------------------------------------------------------------------------------------------------
46388: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46389: ---------------------------------------------------------------------------------------------------------------
46384: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46385: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46386:
46387: ---------------------------------------------------------------------------------------------------------------
46388: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46389: ---------------------------------------------------------------------------------------------------------------
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46391:
46392: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46386:
46387: ---------------------------------------------------------------------------------------------------------------
46388: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46389: ---------------------------------------------------------------------------------------------------------------
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46391:
46392: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46393: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46394:
46388: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46389: ---------------------------------------------------------------------------------------------------------------
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46391:
46392: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46393: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46394:
46395: IF xla_accounting_cache_pkg.GetValueChar
46396: (p_source_code => 'LEDGER_CATEGORY_CODE'
46389: ---------------------------------------------------------------------------------------------------------------
46390: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
46391:
46392: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46393: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46394:
46395: IF xla_accounting_cache_pkg.GetValueChar
46396: (p_source_code => 'LEDGER_CATEGORY_CODE'
46397: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
46400: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
46401: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
46402: )
46403: THEN
46404: xla_ae_lines_pkg.BflowUpgEntry
46405: (p_business_method_code => l_bflow_method_code
46406: ,p_business_class_code => l_bflow_class_code
46407: ,p_balance_type => l_balance_type_code);
46408: ELSE
46441: , x_value_type_code => l_adr_value_type_code
46442: , p_side => 'NA'
46443: );
46444:
46445: xla_ae_lines_pkg.set_ccid(
46446: p_code_combination_id => l_ccid
46447: , p_value_type_code => l_adr_value_type_code
46448: , p_transaction_coa_id => l_adr_transaction_coa_id
46449: , p_accounting_coa_id => l_adr_accounting_coa_id
46473: );
46474:
46475: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
46476:
46477: xla_ae_lines_pkg.set_segment(
46478: p_to_segment_code => 'GL_ACCOUNT'
46479: , p_segment_value => l_segment
46480: , p_from_segment_code => l_adr_value_segment_code
46481: , p_from_combination_id => l_adr_value_combination_id
46517: xla_accounting_err_pkg.build_message
46518: (p_appli_s_name => 'XLA'
46519: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
46520: ,p_token_1 => 'LINE_NUMBER'
46521: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
46522: ,p_token_2 => 'LINE_TYPE_NAME'
46523: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
46524: l_component_type
46525: ,l_component_code
46553: --
46554: --
46555: ------------------------------------------------------------------------------------------------
46556: -- 4219869 Business Flow
46557: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
46558: -- Prior Entry. Currently, the following code is always generated.
46559: ------------------------------------------------------------------------------------------------
46560: XLA_AE_LINES_PKG.ValidateCurrentLine;
46561:
46556: -- 4219869 Business Flow
46557: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
46558: -- Prior Entry. Currently, the following code is always generated.
46559: ------------------------------------------------------------------------------------------------
46560: XLA_AE_LINES_PKG.ValidateCurrentLine;
46561:
46562: ------------------------------------------------------------------------------------
46563: -- 4219869 Business Flow
46564: -- Populated credit and debit amounts -- Need to generate this within IF
46562: ------------------------------------------------------------------------------------
46563: -- 4219869 Business Flow
46564: -- Populated credit and debit amounts -- Need to generate this within IF
46565: ------------------------------------------------------------------------------------
46566: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46567:
46568: ----------------------------------------------------------------------------------
46569: -- 4219869 Business Flow
46570: -- Update journal entry status -- Need to generate this within IF
46594: -- To allow MPA report to determine if it should generate report process
46595: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
46596: ------------------------------------------------------------------------------------------
46597:
46598: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
46599: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
46600:
46601: --
46602: -- Update the line information that should be overwritten
46595: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
46596: ------------------------------------------------------------------------------------------
46597:
46598: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
46599: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
46600:
46601: --
46602: -- Update the line information that should be overwritten
46603: --
46600:
46601: --
46602: -- Update the line information that should be overwritten
46603: --
46604: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46605: p_header_num => 1);
46606: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46607:
46608: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46602: -- Update the line information that should be overwritten
46603: --
46604: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46605: p_header_num => 1);
46606: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46607:
46608: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46609:
46610: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46604: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
46605: p_header_num => 1);
46606: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
46607:
46608: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46609:
46610: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46611: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46612: END IF;
46607:
46608: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
46609:
46610: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
46611: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
46612: END IF;
46613:
46614: --
46615: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46614: --
46615: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
46616: --
46617: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
46618: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
46619: ELSE
46620: ---------------------------------------------------------------------------------------------------
46621: -- 4262811a Switch Sign
46622: ---------------------------------------------------------------------------------------------------
46619: ELSE
46620: ---------------------------------------------------------------------------------------------------
46621: -- 4262811a Switch Sign
46622: ---------------------------------------------------------------------------------------------------
46623: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46624: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46620: ---------------------------------------------------------------------------------------------------
46621: -- 4262811a Switch Sign
46622: ---------------------------------------------------------------------------------------------------
46623: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46624: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46621: -- 4262811a Switch Sign
46622: ---------------------------------------------------------------------------------------------------
46623: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46624: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46629: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46622: ---------------------------------------------------------------------------------------------------
46623: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46624: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46629: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46630: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46623: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
46624: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46629: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46630: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46631:
46625: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46629: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46630: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46631:
46632: END IF;
46633:
46626: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
46627: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46628: -- 5132302
46629: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
46630: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
46631:
46632: END IF;
46633:
46634: -- 4955764
46631:
46632: END IF;
46633:
46634: -- 4955764
46635: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46636: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46637:
46638:
46639: XLA_AE_LINES_PKG.ValidateCurrentLine;
46635: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46636: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46637:
46638:
46639: XLA_AE_LINES_PKG.ValidateCurrentLine;
46640: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46641:
46642: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46643: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46636: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
46637:
46638:
46639: XLA_AE_LINES_PKG.ValidateCurrentLine;
46640: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
46641:
46642: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
46643: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
46644: ,p_balance_type_code => l_balance_type_code);
46785: --
46786: -- bulk performance
46787: --
46788: l_balance_type_code VARCHAR2(1);
46789: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
46790: l_log_module VARCHAR2(240);
46791:
46792: --
46793: -- Upgrade strategy
46850: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
46851: l_balance_type_code <> 'B' THEN
46852:
46853: --
46854: XLA_AE_LINES_PKG.SetNewLine;
46855:
46856: p_balance_type_code := l_balance_type_code;
46857: -- set the flag so later we will know whether the gain loss line needs to be created
46858:
46862:
46863: --
46864: -- bulk performance
46865: --
46866: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
46867: p_header_num => 0); -- 4262811
46868: --
46869: -- set accounting line options
46870: --
46867: p_header_num => 0); -- 4262811
46868: --
46869: -- set accounting line options
46870: --
46871: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
46872: p_natural_side_code => 'C'
46873: , p_gain_or_loss_flag => 'N'
46874: , p_gl_transfer_mode_code => 'S'
46875: , p_acct_entry_type_code => 'A'
46881: --
46882: --
46883: -- set accounting line type info
46884: --
46885: xla_ae_lines_pkg.SetAcctLineType
46886: (p_component_type => l_component_type
46887: ,p_event_type_code => l_event_type_code
46888: ,p_line_definition_owner_code => l_line_definition_owner_code
46889: ,p_line_definition_code => l_line_definition_code
46895: ,p_event_class_code => l_event_class_code);
46896: --
46897: -- set accounting class
46898: --
46899: xla_ae_lines_pkg.SetAcctClass(
46900: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
46901: , p_ae_header_id => l_ae_header_id
46902: );
46903:
46903:
46904: --
46905: -- set rounding class
46906: --
46907: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46908: 'FEDERAL_PROJECT_COST_CLEARING';
46909:
46910: --
46911: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46907: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
46908: 'FEDERAL_PROJECT_COST_CLEARING';
46909:
46910: --
46911: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46912: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46913: --
46914: -- bulk performance
46915: --
46908: 'FEDERAL_PROJECT_COST_CLEARING';
46909:
46910: --
46911: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
46912: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46913: --
46914: -- bulk performance
46915: --
46916: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46912: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
46913: --
46914: -- bulk performance
46915: --
46916: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46917:
46918: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46919: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46920:
46914: -- bulk performance
46915: --
46916: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
46917:
46918: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46919: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46920:
46921: -- 4955764
46922: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46918: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
46919: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
46920:
46921: -- 4955764
46922: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
46923: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
46924:
46925: -- 4458381 Public Sector Enh
46926:
46990: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
46991: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
46992: l_rec_acct_attrs.array_char_value(30) := p_source_35;
46993:
46994: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46995: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46996:
46997: ---------------------------------------------------------------------------------------------------------------
46998: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46991: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
46992: l_rec_acct_attrs.array_char_value(30) := p_source_35;
46993:
46994: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46995: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46996:
46997: ---------------------------------------------------------------------------------------------------------------
46998: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46999: ---------------------------------------------------------------------------------------------------------------
46994: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
46995: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
46996:
46997: ---------------------------------------------------------------------------------------------------------------
46998: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46999: ---------------------------------------------------------------------------------------------------------------
47000: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47001:
47002: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
46996:
46997: ---------------------------------------------------------------------------------------------------------------
46998: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46999: ---------------------------------------------------------------------------------------------------------------
47000: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47001:
47002: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47003: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47004:
46998: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
46999: ---------------------------------------------------------------------------------------------------------------
47000: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47001:
47002: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47003: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47004:
47005: IF xla_accounting_cache_pkg.GetValueChar
47006: (p_source_code => 'LEDGER_CATEGORY_CODE'
46999: ---------------------------------------------------------------------------------------------------------------
47000: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47001:
47002: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47003: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47004:
47005: IF xla_accounting_cache_pkg.GetValueChar
47006: (p_source_code => 'LEDGER_CATEGORY_CODE'
47007: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
47010: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
47011: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
47012: )
47013: THEN
47014: xla_ae_lines_pkg.BflowUpgEntry
47015: (p_business_method_code => l_bflow_method_code
47016: ,p_business_class_code => l_bflow_class_code
47017: ,p_balance_type => l_balance_type_code);
47018: ELSE
47052: , x_value_type_code => l_adr_value_type_code
47053: , p_side => 'NA'
47054: );
47055:
47056: xla_ae_lines_pkg.set_ccid(
47057: p_code_combination_id => l_ccid
47058: , p_value_type_code => l_adr_value_type_code
47059: , p_transaction_coa_id => l_adr_transaction_coa_id
47060: , p_accounting_coa_id => l_adr_accounting_coa_id
47084: );
47085:
47086: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
47087:
47088: xla_ae_lines_pkg.set_segment(
47089: p_to_segment_code => 'GL_ACCOUNT'
47090: , p_segment_value => l_segment
47091: , p_from_segment_code => l_adr_value_segment_code
47092: , p_from_combination_id => l_adr_value_combination_id
47128: xla_accounting_err_pkg.build_message
47129: (p_appli_s_name => 'XLA'
47130: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
47131: ,p_token_1 => 'LINE_NUMBER'
47132: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
47133: ,p_token_2 => 'LINE_TYPE_NAME'
47134: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
47135: l_component_type
47136: ,l_component_code
47164: --
47165: --
47166: ------------------------------------------------------------------------------------------------
47167: -- 4219869 Business Flow
47168: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
47169: -- Prior Entry. Currently, the following code is always generated.
47170: ------------------------------------------------------------------------------------------------
47171: XLA_AE_LINES_PKG.ValidateCurrentLine;
47172:
47167: -- 4219869 Business Flow
47168: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
47169: -- Prior Entry. Currently, the following code is always generated.
47170: ------------------------------------------------------------------------------------------------
47171: XLA_AE_LINES_PKG.ValidateCurrentLine;
47172:
47173: ------------------------------------------------------------------------------------
47174: -- 4219869 Business Flow
47175: -- Populated credit and debit amounts -- Need to generate this within IF
47173: ------------------------------------------------------------------------------------
47174: -- 4219869 Business Flow
47175: -- Populated credit and debit amounts -- Need to generate this within IF
47176: ------------------------------------------------------------------------------------
47177: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47178:
47179: ----------------------------------------------------------------------------------
47180: -- 4219869 Business Flow
47181: -- Update journal entry status -- Need to generate this within IF
47205: -- To allow MPA report to determine if it should generate report process
47206: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47207: ------------------------------------------------------------------------------------------
47208:
47209: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47210: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47211:
47212: --
47213: -- Update the line information that should be overwritten
47206: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47207: ------------------------------------------------------------------------------------------
47208:
47209: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47210: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47211:
47212: --
47213: -- Update the line information that should be overwritten
47214: --
47211:
47212: --
47213: -- Update the line information that should be overwritten
47214: --
47215: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47216: p_header_num => 1);
47217: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47218:
47219: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47213: -- Update the line information that should be overwritten
47214: --
47215: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47216: p_header_num => 1);
47217: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47218:
47219: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47220:
47221: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47215: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47216: p_header_num => 1);
47217: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47218:
47219: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47220:
47221: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47222: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47223: END IF;
47218:
47219: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47220:
47221: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47222: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47223: END IF;
47224:
47225: --
47226: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47225: --
47226: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47227: --
47228: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
47229: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
47230: ELSE
47231: ---------------------------------------------------------------------------------------------------
47232: -- 4262811a Switch Sign
47233: ---------------------------------------------------------------------------------------------------
47230: ELSE
47231: ---------------------------------------------------------------------------------------------------
47232: -- 4262811a Switch Sign
47233: ---------------------------------------------------------------------------------------------------
47234: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47231: ---------------------------------------------------------------------------------------------------
47232: -- 4262811a Switch Sign
47233: ---------------------------------------------------------------------------------------------------
47234: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47232: -- 4262811a Switch Sign
47233: ---------------------------------------------------------------------------------------------------
47234: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47233: ---------------------------------------------------------------------------------------------------
47234: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47241: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47234: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47241: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47242:
47236: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47241: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47242:
47243: END IF;
47244:
47237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47238: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47239: -- 5132302
47240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47241: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47242:
47243: END IF;
47244:
47245: -- 4955764
47242:
47243: END IF;
47244:
47245: -- 4955764
47246: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47247: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47248:
47249:
47250: XLA_AE_LINES_PKG.ValidateCurrentLine;
47246: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47247: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47248:
47249:
47250: XLA_AE_LINES_PKG.ValidateCurrentLine;
47251: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47252:
47253: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47254: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47247: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47248:
47249:
47250: XLA_AE_LINES_PKG.ValidateCurrentLine;
47251: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47252:
47253: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47254: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47255: ,p_balance_type_code => l_balance_type_code);
47396: --
47397: -- bulk performance
47398: --
47399: l_balance_type_code VARCHAR2(1);
47400: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
47401: l_log_module VARCHAR2(240);
47402:
47403: --
47404: -- Upgrade strategy
47461: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
47462: l_balance_type_code <> 'B' THEN
47463:
47464: --
47465: XLA_AE_LINES_PKG.SetNewLine;
47466:
47467: p_balance_type_code := l_balance_type_code;
47468: -- set the flag so later we will know whether the gain loss line needs to be created
47469:
47473:
47474: --
47475: -- bulk performance
47476: --
47477: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
47478: p_header_num => 0); -- 4262811
47479: --
47480: -- set accounting line options
47481: --
47478: p_header_num => 0); -- 4262811
47479: --
47480: -- set accounting line options
47481: --
47482: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
47483: p_natural_side_code => 'C'
47484: , p_gain_or_loss_flag => 'N'
47485: , p_gl_transfer_mode_code => 'S'
47486: , p_acct_entry_type_code => 'A'
47492: --
47493: --
47494: -- set accounting line type info
47495: --
47496: xla_ae_lines_pkg.SetAcctLineType
47497: (p_component_type => l_component_type
47498: ,p_event_type_code => l_event_type_code
47499: ,p_line_definition_owner_code => l_line_definition_owner_code
47500: ,p_line_definition_code => l_line_definition_code
47506: ,p_event_class_code => l_event_class_code);
47507: --
47508: -- set accounting class
47509: --
47510: xla_ae_lines_pkg.SetAcctClass(
47511: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
47512: , p_ae_header_id => l_ae_header_id
47513: );
47514:
47514:
47515: --
47516: -- set rounding class
47517: --
47518: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
47519: 'FEDERAL_PROJECT_COST_CLEARING';
47520:
47521: --
47522: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47518: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
47519: 'FEDERAL_PROJECT_COST_CLEARING';
47520:
47521: --
47522: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47523: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47524: --
47525: -- bulk performance
47526: --
47519: 'FEDERAL_PROJECT_COST_CLEARING';
47520:
47521: --
47522: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
47523: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47524: --
47525: -- bulk performance
47526: --
47527: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47523: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
47524: --
47525: -- bulk performance
47526: --
47527: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47528:
47529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47530: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47531:
47525: -- bulk performance
47526: --
47527: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
47528:
47529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47530: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47531:
47532: -- 4955764
47533: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47529: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
47530: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
47531:
47532: -- 4955764
47533: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47534: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
47535:
47536: -- 4458381 Public Sector Enh
47537:
47601: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
47602: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
47603: l_rec_acct_attrs.array_char_value(30) := p_source_35;
47604:
47605: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47606: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47607:
47608: ---------------------------------------------------------------------------------------------------------------
47609: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47602: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
47603: l_rec_acct_attrs.array_char_value(30) := p_source_35;
47604:
47605: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47606: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47607:
47608: ---------------------------------------------------------------------------------------------------------------
47609: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47610: ---------------------------------------------------------------------------------------------------------------
47605: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
47606: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
47607:
47608: ---------------------------------------------------------------------------------------------------------------
47609: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47610: ---------------------------------------------------------------------------------------------------------------
47611: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47612:
47613: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47607:
47608: ---------------------------------------------------------------------------------------------------------------
47609: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47610: ---------------------------------------------------------------------------------------------------------------
47611: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47612:
47613: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47614: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47615:
47609: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
47610: ---------------------------------------------------------------------------------------------------------------
47611: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47612:
47613: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47614: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47615:
47616: IF xla_accounting_cache_pkg.GetValueChar
47617: (p_source_code => 'LEDGER_CATEGORY_CODE'
47610: ---------------------------------------------------------------------------------------------------------------
47611: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
47612:
47613: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47614: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
47615:
47616: IF xla_accounting_cache_pkg.GetValueChar
47617: (p_source_code => 'LEDGER_CATEGORY_CODE'
47618: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
47621: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
47622: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
47623: )
47624: THEN
47625: xla_ae_lines_pkg.BflowUpgEntry
47626: (p_business_method_code => l_bflow_method_code
47627: ,p_business_class_code => l_bflow_class_code
47628: ,p_balance_type => l_balance_type_code);
47629: ELSE
47663: , x_value_type_code => l_adr_value_type_code
47664: , p_side => 'NA'
47665: );
47666:
47667: xla_ae_lines_pkg.set_ccid(
47668: p_code_combination_id => l_ccid
47669: , p_value_type_code => l_adr_value_type_code
47670: , p_transaction_coa_id => l_adr_transaction_coa_id
47671: , p_accounting_coa_id => l_adr_accounting_coa_id
47695: );
47696:
47697: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
47698:
47699: xla_ae_lines_pkg.set_segment(
47700: p_to_segment_code => 'GL_ACCOUNT'
47701: , p_segment_value => l_segment
47702: , p_from_segment_code => l_adr_value_segment_code
47703: , p_from_combination_id => l_adr_value_combination_id
47739: xla_accounting_err_pkg.build_message
47740: (p_appli_s_name => 'XLA'
47741: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
47742: ,p_token_1 => 'LINE_NUMBER'
47743: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
47744: ,p_token_2 => 'LINE_TYPE_NAME'
47745: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
47746: l_component_type
47747: ,l_component_code
47775: --
47776: --
47777: ------------------------------------------------------------------------------------------------
47778: -- 4219869 Business Flow
47779: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
47780: -- Prior Entry. Currently, the following code is always generated.
47781: ------------------------------------------------------------------------------------------------
47782: XLA_AE_LINES_PKG.ValidateCurrentLine;
47783:
47778: -- 4219869 Business Flow
47779: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
47780: -- Prior Entry. Currently, the following code is always generated.
47781: ------------------------------------------------------------------------------------------------
47782: XLA_AE_LINES_PKG.ValidateCurrentLine;
47783:
47784: ------------------------------------------------------------------------------------
47785: -- 4219869 Business Flow
47786: -- Populated credit and debit amounts -- Need to generate this within IF
47784: ------------------------------------------------------------------------------------
47785: -- 4219869 Business Flow
47786: -- Populated credit and debit amounts -- Need to generate this within IF
47787: ------------------------------------------------------------------------------------
47788: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47789:
47790: ----------------------------------------------------------------------------------
47791: -- 4219869 Business Flow
47792: -- Update journal entry status -- Need to generate this within IF
47816: -- To allow MPA report to determine if it should generate report process
47817: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47818: ------------------------------------------------------------------------------------------
47819:
47820: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47821: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47822:
47823: --
47824: -- Update the line information that should be overwritten
47817: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
47818: ------------------------------------------------------------------------------------------
47819:
47820: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
47821: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
47822:
47823: --
47824: -- Update the line information that should be overwritten
47825: --
47822:
47823: --
47824: -- Update the line information that should be overwritten
47825: --
47826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47827: p_header_num => 1);
47828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47829:
47830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47824: -- Update the line information that should be overwritten
47825: --
47826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47827: p_header_num => 1);
47828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47829:
47830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47831:
47832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47826: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
47827: p_header_num => 1);
47828: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
47829:
47830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47831:
47832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47833: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47834: END IF;
47829:
47830: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
47831:
47832: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
47833: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
47834: END IF;
47835:
47836: --
47837: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47836: --
47837: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
47838: --
47839: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
47840: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
47841: ELSE
47842: ---------------------------------------------------------------------------------------------------
47843: -- 4262811a Switch Sign
47844: ---------------------------------------------------------------------------------------------------
47841: ELSE
47842: ---------------------------------------------------------------------------------------------------
47843: -- 4262811a Switch Sign
47844: ---------------------------------------------------------------------------------------------------
47845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47842: ---------------------------------------------------------------------------------------------------
47843: -- 4262811a Switch Sign
47844: ---------------------------------------------------------------------------------------------------
47845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47843: -- 4262811a Switch Sign
47844: ---------------------------------------------------------------------------------------------------
47845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47844: ---------------------------------------------------------------------------------------------------
47845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47845: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
47846: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47853:
47847: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47853:
47854: END IF;
47855:
47848: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
47849: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47850: -- 5132302
47851: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
47852: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
47853:
47854: END IF;
47855:
47856: -- 4955764
47853:
47854: END IF;
47855:
47856: -- 4955764
47857: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47859:
47860:
47861: XLA_AE_LINES_PKG.ValidateCurrentLine;
47857: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
47858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47859:
47860:
47861: XLA_AE_LINES_PKG.ValidateCurrentLine;
47862: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47863:
47864: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47865: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47858: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
47859:
47860:
47861: XLA_AE_LINES_PKG.ValidateCurrentLine;
47862: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
47863:
47864: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
47865: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
47866: ,p_balance_type_code => l_balance_type_code);
48007: --
48008: -- bulk performance
48009: --
48010: l_balance_type_code VARCHAR2(1);
48011: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
48012: l_log_module VARCHAR2(240);
48013:
48014: --
48015: -- Upgrade strategy
48072: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
48073: l_balance_type_code <> 'B' THEN
48074:
48075: --
48076: XLA_AE_LINES_PKG.SetNewLine;
48077:
48078: p_balance_type_code := l_balance_type_code;
48079: -- set the flag so later we will know whether the gain loss line needs to be created
48080:
48084:
48085: --
48086: -- bulk performance
48087: --
48088: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
48089: p_header_num => 0); -- 4262811
48090: --
48091: -- set accounting line options
48092: --
48089: p_header_num => 0); -- 4262811
48090: --
48091: -- set accounting line options
48092: --
48093: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
48094: p_natural_side_code => 'C'
48095: , p_gain_or_loss_flag => 'N'
48096: , p_gl_transfer_mode_code => 'S'
48097: , p_acct_entry_type_code => 'A'
48103: --
48104: --
48105: -- set accounting line type info
48106: --
48107: xla_ae_lines_pkg.SetAcctLineType
48108: (p_component_type => l_component_type
48109: ,p_event_type_code => l_event_type_code
48110: ,p_line_definition_owner_code => l_line_definition_owner_code
48111: ,p_line_definition_code => l_line_definition_code
48117: ,p_event_class_code => l_event_class_code);
48118: --
48119: -- set accounting class
48120: --
48121: xla_ae_lines_pkg.SetAcctClass(
48122: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
48123: , p_ae_header_id => l_ae_header_id
48124: );
48125:
48125:
48126: --
48127: -- set rounding class
48128: --
48129: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48130: 'FEDERAL_PROJECT_COST_CLEARING';
48131:
48132: --
48133: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48129: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48130: 'FEDERAL_PROJECT_COST_CLEARING';
48131:
48132: --
48133: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48134: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48135: --
48136: -- bulk performance
48137: --
48130: 'FEDERAL_PROJECT_COST_CLEARING';
48131:
48132: --
48133: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48134: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48135: --
48136: -- bulk performance
48137: --
48138: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48134: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48135: --
48136: -- bulk performance
48137: --
48138: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48139:
48140: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48141: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48142:
48136: -- bulk performance
48137: --
48138: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48139:
48140: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48141: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48142:
48143: -- 4955764
48144: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48140: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48141: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48142:
48143: -- 4955764
48144: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48145: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
48146:
48147: -- 4458381 Public Sector Enh
48148:
48212: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
48213: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
48214: l_rec_acct_attrs.array_char_value(30) := p_source_35;
48215:
48216: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48217: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48218:
48219: ---------------------------------------------------------------------------------------------------------------
48220: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48213: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
48214: l_rec_acct_attrs.array_char_value(30) := p_source_35;
48215:
48216: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48217: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48218:
48219: ---------------------------------------------------------------------------------------------------------------
48220: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48221: ---------------------------------------------------------------------------------------------------------------
48216: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48217: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48218:
48219: ---------------------------------------------------------------------------------------------------------------
48220: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48221: ---------------------------------------------------------------------------------------------------------------
48222: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48223:
48224: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48218:
48219: ---------------------------------------------------------------------------------------------------------------
48220: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48221: ---------------------------------------------------------------------------------------------------------------
48222: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48223:
48224: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48225: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48226:
48220: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48221: ---------------------------------------------------------------------------------------------------------------
48222: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48223:
48224: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48225: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48226:
48227: IF xla_accounting_cache_pkg.GetValueChar
48228: (p_source_code => 'LEDGER_CATEGORY_CODE'
48221: ---------------------------------------------------------------------------------------------------------------
48222: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48223:
48224: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48225: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48226:
48227: IF xla_accounting_cache_pkg.GetValueChar
48228: (p_source_code => 'LEDGER_CATEGORY_CODE'
48229: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
48232: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
48233: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
48234: )
48235: THEN
48236: xla_ae_lines_pkg.BflowUpgEntry
48237: (p_business_method_code => l_bflow_method_code
48238: ,p_business_class_code => l_bflow_class_code
48239: ,p_balance_type => l_balance_type_code);
48240: ELSE
48274: , x_value_type_code => l_adr_value_type_code
48275: , p_side => 'NA'
48276: );
48277:
48278: xla_ae_lines_pkg.set_ccid(
48279: p_code_combination_id => l_ccid
48280: , p_value_type_code => l_adr_value_type_code
48281: , p_transaction_coa_id => l_adr_transaction_coa_id
48282: , p_accounting_coa_id => l_adr_accounting_coa_id
48306: );
48307:
48308: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
48309:
48310: xla_ae_lines_pkg.set_segment(
48311: p_to_segment_code => 'GL_ACCOUNT'
48312: , p_segment_value => l_segment
48313: , p_from_segment_code => l_adr_value_segment_code
48314: , p_from_combination_id => l_adr_value_combination_id
48350: xla_accounting_err_pkg.build_message
48351: (p_appli_s_name => 'XLA'
48352: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
48353: ,p_token_1 => 'LINE_NUMBER'
48354: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
48355: ,p_token_2 => 'LINE_TYPE_NAME'
48356: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
48357: l_component_type
48358: ,l_component_code
48386: --
48387: --
48388: ------------------------------------------------------------------------------------------------
48389: -- 4219869 Business Flow
48390: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
48391: -- Prior Entry. Currently, the following code is always generated.
48392: ------------------------------------------------------------------------------------------------
48393: XLA_AE_LINES_PKG.ValidateCurrentLine;
48394:
48389: -- 4219869 Business Flow
48390: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
48391: -- Prior Entry. Currently, the following code is always generated.
48392: ------------------------------------------------------------------------------------------------
48393: XLA_AE_LINES_PKG.ValidateCurrentLine;
48394:
48395: ------------------------------------------------------------------------------------
48396: -- 4219869 Business Flow
48397: -- Populated credit and debit amounts -- Need to generate this within IF
48395: ------------------------------------------------------------------------------------
48396: -- 4219869 Business Flow
48397: -- Populated credit and debit amounts -- Need to generate this within IF
48398: ------------------------------------------------------------------------------------
48399: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48400:
48401: ----------------------------------------------------------------------------------
48402: -- 4219869 Business Flow
48403: -- Update journal entry status -- Need to generate this within IF
48427: -- To allow MPA report to determine if it should generate report process
48428: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
48429: ------------------------------------------------------------------------------------------
48430:
48431: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
48432: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
48433:
48434: --
48435: -- Update the line information that should be overwritten
48428: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
48429: ------------------------------------------------------------------------------------------
48430:
48431: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
48432: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
48433:
48434: --
48435: -- Update the line information that should be overwritten
48436: --
48433:
48434: --
48435: -- Update the line information that should be overwritten
48436: --
48437: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48438: p_header_num => 1);
48439: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48440:
48441: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48435: -- Update the line information that should be overwritten
48436: --
48437: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48438: p_header_num => 1);
48439: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48440:
48441: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48442:
48443: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48437: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
48438: p_header_num => 1);
48439: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
48440:
48441: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48442:
48443: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48444: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
48445: END IF;
48440:
48441: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
48442:
48443: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
48444: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
48445: END IF;
48446:
48447: --
48448: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
48447: --
48448: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
48449: --
48450: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
48451: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
48452: ELSE
48453: ---------------------------------------------------------------------------------------------------
48454: -- 4262811a Switch Sign
48455: ---------------------------------------------------------------------------------------------------
48452: ELSE
48453: ---------------------------------------------------------------------------------------------------
48454: -- 4262811a Switch Sign
48455: ---------------------------------------------------------------------------------------------------
48456: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48457: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48453: ---------------------------------------------------------------------------------------------------
48454: -- 4262811a Switch Sign
48455: ---------------------------------------------------------------------------------------------------
48456: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48457: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48454: -- 4262811a Switch Sign
48455: ---------------------------------------------------------------------------------------------------
48456: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48457: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48462: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48455: ---------------------------------------------------------------------------------------------------
48456: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48457: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48462: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48456: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
48457: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48462: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48464:
48458: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48462: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48464:
48465: END IF;
48466:
48459: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
48460: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48461: -- 5132302
48462: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
48463: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
48464:
48465: END IF;
48466:
48467: -- 4955764
48464:
48465: END IF;
48466:
48467: -- 4955764
48468: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48469: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48470:
48471:
48472: XLA_AE_LINES_PKG.ValidateCurrentLine;
48468: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48469: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48470:
48471:
48472: XLA_AE_LINES_PKG.ValidateCurrentLine;
48473: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48474:
48475: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
48476: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
48469: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
48470:
48471:
48472: XLA_AE_LINES_PKG.ValidateCurrentLine;
48473: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
48474:
48475: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
48476: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
48477: ,p_balance_type_code => l_balance_type_code);
48618: --
48619: -- bulk performance
48620: --
48621: l_balance_type_code VARCHAR2(1);
48622: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
48623: l_log_module VARCHAR2(240);
48624:
48625: --
48626: -- Upgrade strategy
48683: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
48684: l_balance_type_code <> 'B' THEN
48685:
48686: --
48687: XLA_AE_LINES_PKG.SetNewLine;
48688:
48689: p_balance_type_code := l_balance_type_code;
48690: -- set the flag so later we will know whether the gain loss line needs to be created
48691:
48695:
48696: --
48697: -- bulk performance
48698: --
48699: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
48700: p_header_num => 0); -- 4262811
48701: --
48702: -- set accounting line options
48703: --
48700: p_header_num => 0); -- 4262811
48701: --
48702: -- set accounting line options
48703: --
48704: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
48705: p_natural_side_code => 'C'
48706: , p_gain_or_loss_flag => 'N'
48707: , p_gl_transfer_mode_code => 'S'
48708: , p_acct_entry_type_code => 'A'
48714: --
48715: --
48716: -- set accounting line type info
48717: --
48718: xla_ae_lines_pkg.SetAcctLineType
48719: (p_component_type => l_component_type
48720: ,p_event_type_code => l_event_type_code
48721: ,p_line_definition_owner_code => l_line_definition_owner_code
48722: ,p_line_definition_code => l_line_definition_code
48728: ,p_event_class_code => l_event_class_code);
48729: --
48730: -- set accounting class
48731: --
48732: xla_ae_lines_pkg.SetAcctClass(
48733: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
48734: , p_ae_header_id => l_ae_header_id
48735: );
48736:
48736:
48737: --
48738: -- set rounding class
48739: --
48740: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48741: 'FEDERAL_PROJECT_COST_CLEARING';
48742:
48743: --
48744: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48740: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
48741: 'FEDERAL_PROJECT_COST_CLEARING';
48742:
48743: --
48744: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48745: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48746: --
48747: -- bulk performance
48748: --
48741: 'FEDERAL_PROJECT_COST_CLEARING';
48742:
48743: --
48744: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
48745: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48746: --
48747: -- bulk performance
48748: --
48749: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48745: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
48746: --
48747: -- bulk performance
48748: --
48749: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48750:
48751: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48752: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48753:
48747: -- bulk performance
48748: --
48749: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
48750:
48751: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48752: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48753:
48754: -- 4955764
48755: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48751: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
48752: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
48753:
48754: -- 4955764
48755: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
48756: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
48757:
48758: -- 4458381 Public Sector Enh
48759:
48823: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
48824: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
48825: l_rec_acct_attrs.array_char_value(30) := p_source_35;
48826:
48827: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48828: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48829:
48830: ---------------------------------------------------------------------------------------------------------------
48831: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48824: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
48825: l_rec_acct_attrs.array_char_value(30) := p_source_35;
48826:
48827: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48828: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48829:
48830: ---------------------------------------------------------------------------------------------------------------
48831: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48832: ---------------------------------------------------------------------------------------------------------------
48827: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
48828: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
48829:
48830: ---------------------------------------------------------------------------------------------------------------
48831: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48832: ---------------------------------------------------------------------------------------------------------------
48833: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48834:
48835: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48829:
48830: ---------------------------------------------------------------------------------------------------------------
48831: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48832: ---------------------------------------------------------------------------------------------------------------
48833: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48834:
48835: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48836: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48837:
48831: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
48832: ---------------------------------------------------------------------------------------------------------------
48833: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48834:
48835: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48836: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48837:
48838: IF xla_accounting_cache_pkg.GetValueChar
48839: (p_source_code => 'LEDGER_CATEGORY_CODE'
48832: ---------------------------------------------------------------------------------------------------------------
48833: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
48834:
48835: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48836: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
48837:
48838: IF xla_accounting_cache_pkg.GetValueChar
48839: (p_source_code => 'LEDGER_CATEGORY_CODE'
48840: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
48843: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
48844: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
48845: )
48846: THEN
48847: xla_ae_lines_pkg.BflowUpgEntry
48848: (p_business_method_code => l_bflow_method_code
48849: ,p_business_class_code => l_bflow_class_code
48850: ,p_balance_type => l_balance_type_code);
48851: ELSE
48885: , x_value_type_code => l_adr_value_type_code
48886: , p_side => 'NA'
48887: );
48888:
48889: xla_ae_lines_pkg.set_ccid(
48890: p_code_combination_id => l_ccid
48891: , p_value_type_code => l_adr_value_type_code
48892: , p_transaction_coa_id => l_adr_transaction_coa_id
48893: , p_accounting_coa_id => l_adr_accounting_coa_id
48917: );
48918:
48919: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
48920:
48921: xla_ae_lines_pkg.set_segment(
48922: p_to_segment_code => 'GL_ACCOUNT'
48923: , p_segment_value => l_segment
48924: , p_from_segment_code => l_adr_value_segment_code
48925: , p_from_combination_id => l_adr_value_combination_id
48961: xla_accounting_err_pkg.build_message
48962: (p_appli_s_name => 'XLA'
48963: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
48964: ,p_token_1 => 'LINE_NUMBER'
48965: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
48966: ,p_token_2 => 'LINE_TYPE_NAME'
48967: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
48968: l_component_type
48969: ,l_component_code
48997: --
48998: --
48999: ------------------------------------------------------------------------------------------------
49000: -- 4219869 Business Flow
49001: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
49002: -- Prior Entry. Currently, the following code is always generated.
49003: ------------------------------------------------------------------------------------------------
49004: XLA_AE_LINES_PKG.ValidateCurrentLine;
49005:
49000: -- 4219869 Business Flow
49001: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
49002: -- Prior Entry. Currently, the following code is always generated.
49003: ------------------------------------------------------------------------------------------------
49004: XLA_AE_LINES_PKG.ValidateCurrentLine;
49005:
49006: ------------------------------------------------------------------------------------
49007: -- 4219869 Business Flow
49008: -- Populated credit and debit amounts -- Need to generate this within IF
49006: ------------------------------------------------------------------------------------
49007: -- 4219869 Business Flow
49008: -- Populated credit and debit amounts -- Need to generate this within IF
49009: ------------------------------------------------------------------------------------
49010: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49011:
49012: ----------------------------------------------------------------------------------
49013: -- 4219869 Business Flow
49014: -- Update journal entry status -- Need to generate this within IF
49038: -- To allow MPA report to determine if it should generate report process
49039: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
49040: ------------------------------------------------------------------------------------------
49041:
49042: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
49043: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
49044:
49045: --
49046: -- Update the line information that should be overwritten
49039: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
49040: ------------------------------------------------------------------------------------------
49041:
49042: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
49043: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
49044:
49045: --
49046: -- Update the line information that should be overwritten
49047: --
49044:
49045: --
49046: -- Update the line information that should be overwritten
49047: --
49048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49049: p_header_num => 1);
49050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49051:
49052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49046: -- Update the line information that should be overwritten
49047: --
49048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49049: p_header_num => 1);
49050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49051:
49052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49053:
49054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49049: p_header_num => 1);
49050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49051:
49052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49053:
49054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49055: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
49056: END IF;
49051:
49052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49053:
49054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49055: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
49056: END IF;
49057:
49058: --
49059: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
49058: --
49059: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
49060: --
49061: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
49062: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
49063: ELSE
49064: ---------------------------------------------------------------------------------------------------
49065: -- 4262811a Switch Sign
49066: ---------------------------------------------------------------------------------------------------
49063: ELSE
49064: ---------------------------------------------------------------------------------------------------
49065: -- 4262811a Switch Sign
49066: ---------------------------------------------------------------------------------------------------
49067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49064: ---------------------------------------------------------------------------------------------------
49065: -- 4262811a Switch Sign
49066: ---------------------------------------------------------------------------------------------------
49067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49065: -- 4262811a Switch Sign
49066: ---------------------------------------------------------------------------------------------------
49067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49066: ---------------------------------------------------------------------------------------------------
49067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49075:
49069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49075:
49076: END IF;
49077:
49070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49072: -- 5132302
49073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49075:
49076: END IF;
49077:
49078: -- 4955764
49075:
49076: END IF;
49077:
49078: -- 4955764
49079: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49081:
49082:
49083: XLA_AE_LINES_PKG.ValidateCurrentLine;
49079: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49081:
49082:
49083: XLA_AE_LINES_PKG.ValidateCurrentLine;
49084: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49085:
49086: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
49087: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
49080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49081:
49082:
49083: XLA_AE_LINES_PKG.ValidateCurrentLine;
49084: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49085:
49086: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
49087: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
49088: ,p_balance_type_code => l_balance_type_code);
49231: --
49232: -- bulk performance
49233: --
49234: l_balance_type_code VARCHAR2(1);
49235: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
49236: l_log_module VARCHAR2(240);
49237:
49238: --
49239: -- Upgrade strategy
49299: ') = 'N'
49300: THEN
49301:
49302: --
49303: XLA_AE_LINES_PKG.SetNewLine;
49304:
49305: p_balance_type_code := l_balance_type_code;
49306: -- set the flag so later we will know whether the gain loss line needs to be created
49307:
49311:
49312: --
49313: -- bulk performance
49314: --
49315: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
49316: p_header_num => 0); -- 4262811
49317: --
49318: -- set accounting line options
49319: --
49316: p_header_num => 0); -- 4262811
49317: --
49318: -- set accounting line options
49319: --
49320: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
49321: p_natural_side_code => 'C'
49322: , p_gain_or_loss_flag => 'N'
49323: , p_gl_transfer_mode_code => 'S'
49324: , p_acct_entry_type_code => 'A'
49330: --
49331: --
49332: -- set accounting line type info
49333: --
49334: xla_ae_lines_pkg.SetAcctLineType
49335: (p_component_type => l_component_type
49336: ,p_event_type_code => l_event_type_code
49337: ,p_line_definition_owner_code => l_line_definition_owner_code
49338: ,p_line_definition_code => l_line_definition_code
49344: ,p_event_class_code => l_event_class_code);
49345: --
49346: -- set accounting class
49347: --
49348: xla_ae_lines_pkg.SetAcctClass(
49349: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
49350: , p_ae_header_id => l_ae_header_id
49351: );
49352:
49352:
49353: --
49354: -- set rounding class
49355: --
49356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
49357: 'FEDERAL_PROJECT_COST_CLEARING';
49358:
49359: --
49360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49356: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
49357: 'FEDERAL_PROJECT_COST_CLEARING';
49358:
49359: --
49360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49362: --
49363: -- bulk performance
49364: --
49357: 'FEDERAL_PROJECT_COST_CLEARING';
49358:
49359: --
49360: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49362: --
49363: -- bulk performance
49364: --
49365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49361: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49362: --
49363: -- bulk performance
49364: --
49365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49366:
49367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49369:
49363: -- bulk performance
49364: --
49365: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49366:
49367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49369:
49370: -- 4955764
49371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49367: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49368: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49369:
49370: -- 4955764
49371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
49373:
49374: -- 4458381 Public Sector Enh
49375:
49439: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
49440: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
49441: l_rec_acct_attrs.array_char_value(30) := p_source_35;
49442:
49443: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
49444: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
49445:
49446: ---------------------------------------------------------------------------------------------------------------
49447: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
49440: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
49441: l_rec_acct_attrs.array_char_value(30) := p_source_35;
49442:
49443: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
49444: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
49445:
49446: ---------------------------------------------------------------------------------------------------------------
49447: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
49448: ---------------------------------------------------------------------------------------------------------------
49443: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
49444: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
49445:
49446: ---------------------------------------------------------------------------------------------------------------
49447: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
49448: ---------------------------------------------------------------------------------------------------------------
49449: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
49450:
49451: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49445:
49446: ---------------------------------------------------------------------------------------------------------------
49447: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
49448: ---------------------------------------------------------------------------------------------------------------
49449: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
49450:
49451: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49452: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49453:
49447: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
49448: ---------------------------------------------------------------------------------------------------------------
49449: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
49450:
49451: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49452: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49453:
49454: IF xla_accounting_cache_pkg.GetValueChar
49455: (p_source_code => 'LEDGER_CATEGORY_CODE'
49448: ---------------------------------------------------------------------------------------------------------------
49449: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
49450:
49451: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49452: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
49453:
49454: IF xla_accounting_cache_pkg.GetValueChar
49455: (p_source_code => 'LEDGER_CATEGORY_CODE'
49456: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
49459: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
49460: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
49461: )
49462: THEN
49463: xla_ae_lines_pkg.BflowUpgEntry
49464: (p_business_method_code => l_bflow_method_code
49465: ,p_business_class_code => l_bflow_class_code
49466: ,p_balance_type => l_balance_type_code);
49467: ELSE
49501: , x_value_type_code => l_adr_value_type_code
49502: , p_side => 'NA'
49503: );
49504:
49505: xla_ae_lines_pkg.set_ccid(
49506: p_code_combination_id => l_ccid
49507: , p_value_type_code => l_adr_value_type_code
49508: , p_transaction_coa_id => l_adr_transaction_coa_id
49509: , p_accounting_coa_id => l_adr_accounting_coa_id
49533: );
49534:
49535: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
49536:
49537: xla_ae_lines_pkg.set_segment(
49538: p_to_segment_code => 'GL_ACCOUNT'
49539: , p_segment_value => l_segment
49540: , p_from_segment_code => l_adr_value_segment_code
49541: , p_from_combination_id => l_adr_value_combination_id
49577: xla_accounting_err_pkg.build_message
49578: (p_appli_s_name => 'XLA'
49579: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
49580: ,p_token_1 => 'LINE_NUMBER'
49581: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
49582: ,p_token_2 => 'LINE_TYPE_NAME'
49583: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
49584: l_component_type
49585: ,l_component_code
49613: --
49614: --
49615: ------------------------------------------------------------------------------------------------
49616: -- 4219869 Business Flow
49617: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
49618: -- Prior Entry. Currently, the following code is always generated.
49619: ------------------------------------------------------------------------------------------------
49620: XLA_AE_LINES_PKG.ValidateCurrentLine;
49621:
49616: -- 4219869 Business Flow
49617: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
49618: -- Prior Entry. Currently, the following code is always generated.
49619: ------------------------------------------------------------------------------------------------
49620: XLA_AE_LINES_PKG.ValidateCurrentLine;
49621:
49622: ------------------------------------------------------------------------------------
49623: -- 4219869 Business Flow
49624: -- Populated credit and debit amounts -- Need to generate this within IF
49622: ------------------------------------------------------------------------------------
49623: -- 4219869 Business Flow
49624: -- Populated credit and debit amounts -- Need to generate this within IF
49625: ------------------------------------------------------------------------------------
49626: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49627:
49628: ----------------------------------------------------------------------------------
49629: -- 4219869 Business Flow
49630: -- Update journal entry status -- Need to generate this within IF
49654: -- To allow MPA report to determine if it should generate report process
49655: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
49656: ------------------------------------------------------------------------------------------
49657:
49658: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
49659: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
49660:
49661: --
49662: -- Update the line information that should be overwritten
49655: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
49656: ------------------------------------------------------------------------------------------
49657:
49658: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
49659: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
49660:
49661: --
49662: -- Update the line information that should be overwritten
49663: --
49660:
49661: --
49662: -- Update the line information that should be overwritten
49663: --
49664: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49665: p_header_num => 1);
49666: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49667:
49668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49662: -- Update the line information that should be overwritten
49663: --
49664: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49665: p_header_num => 1);
49666: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49667:
49668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49669:
49670: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49664: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
49665: p_header_num => 1);
49666: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
49667:
49668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49669:
49670: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49671: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
49672: END IF;
49667:
49668: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
49669:
49670: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
49671: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
49672: END IF;
49673:
49674: --
49675: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
49674: --
49675: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
49676: --
49677: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
49678: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
49679: ELSE
49680: ---------------------------------------------------------------------------------------------------
49681: -- 4262811a Switch Sign
49682: ---------------------------------------------------------------------------------------------------
49679: ELSE
49680: ---------------------------------------------------------------------------------------------------
49681: -- 4262811a Switch Sign
49682: ---------------------------------------------------------------------------------------------------
49683: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49680: ---------------------------------------------------------------------------------------------------
49681: -- 4262811a Switch Sign
49682: ---------------------------------------------------------------------------------------------------
49683: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49681: -- 4262811a Switch Sign
49682: ---------------------------------------------------------------------------------------------------
49683: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49682: ---------------------------------------------------------------------------------------------------
49683: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49690: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49683: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
49684: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49690: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49691:
49685: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49690: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49691:
49692: END IF;
49693:
49686: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
49687: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49688: -- 5132302
49689: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
49690: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
49691:
49692: END IF;
49693:
49694: -- 4955764
49691:
49692: END IF;
49693:
49694: -- 4955764
49695: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49696: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49697:
49698:
49699: XLA_AE_LINES_PKG.ValidateCurrentLine;
49695: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49696: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49697:
49698:
49699: XLA_AE_LINES_PKG.ValidateCurrentLine;
49700: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49701:
49702: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
49703: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
49696: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
49697:
49698:
49699: XLA_AE_LINES_PKG.ValidateCurrentLine;
49700: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
49701:
49702: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
49703: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
49704: ,p_balance_type_code => l_balance_type_code);
49846: --
49847: -- bulk performance
49848: --
49849: l_balance_type_code VARCHAR2(1);
49850: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
49851: l_log_module VARCHAR2(240);
49852:
49853: --
49854: -- Upgrade strategy
49911: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
49912: l_balance_type_code <> 'B' THEN
49913:
49914: --
49915: XLA_AE_LINES_PKG.SetNewLine;
49916:
49917: p_balance_type_code := l_balance_type_code;
49918: -- set the flag so later we will know whether the gain loss line needs to be created
49919:
49923:
49924: --
49925: -- bulk performance
49926: --
49927: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
49928: p_header_num => 0); -- 4262811
49929: --
49930: -- set accounting line options
49931: --
49928: p_header_num => 0); -- 4262811
49929: --
49930: -- set accounting line options
49931: --
49932: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
49933: p_natural_side_code => 'C'
49934: , p_gain_or_loss_flag => 'N'
49935: , p_gl_transfer_mode_code => 'S'
49936: , p_acct_entry_type_code => 'A'
49942: --
49943: --
49944: -- set accounting line type info
49945: --
49946: xla_ae_lines_pkg.SetAcctLineType
49947: (p_component_type => l_component_type
49948: ,p_event_type_code => l_event_type_code
49949: ,p_line_definition_owner_code => l_line_definition_owner_code
49950: ,p_line_definition_code => l_line_definition_code
49956: ,p_event_class_code => l_event_class_code);
49957: --
49958: -- set accounting class
49959: --
49960: xla_ae_lines_pkg.SetAcctClass(
49961: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
49962: , p_ae_header_id => l_ae_header_id
49963: );
49964:
49964:
49965: --
49966: -- set rounding class
49967: --
49968: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
49969: 'FEDERAL_PROJECT_COST_CLEARING';
49970:
49971: --
49972: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49968: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
49969: 'FEDERAL_PROJECT_COST_CLEARING';
49970:
49971: --
49972: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49973: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49974: --
49975: -- bulk performance
49976: --
49969: 'FEDERAL_PROJECT_COST_CLEARING';
49970:
49971: --
49972: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
49973: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49974: --
49975: -- bulk performance
49976: --
49977: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49973: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
49974: --
49975: -- bulk performance
49976: --
49977: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49978:
49979: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49980: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49981:
49975: -- bulk performance
49976: --
49977: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
49978:
49979: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49980: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49981:
49982: -- 4955764
49983: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49979: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
49980: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
49981:
49982: -- 4955764
49983: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
49984: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
49985:
49986: -- 4458381 Public Sector Enh
49987:
50051: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
50052: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
50053: l_rec_acct_attrs.array_char_value(30) := p_source_35;
50054:
50055: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50056: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50057:
50058: ---------------------------------------------------------------------------------------------------------------
50059: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50052: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
50053: l_rec_acct_attrs.array_char_value(30) := p_source_35;
50054:
50055: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50056: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50057:
50058: ---------------------------------------------------------------------------------------------------------------
50059: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50060: ---------------------------------------------------------------------------------------------------------------
50055: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50056: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50057:
50058: ---------------------------------------------------------------------------------------------------------------
50059: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50060: ---------------------------------------------------------------------------------------------------------------
50061: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50062:
50063: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50057:
50058: ---------------------------------------------------------------------------------------------------------------
50059: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50060: ---------------------------------------------------------------------------------------------------------------
50061: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50062:
50063: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50064: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50065:
50059: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50060: ---------------------------------------------------------------------------------------------------------------
50061: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50062:
50063: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50064: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50065:
50066: IF xla_accounting_cache_pkg.GetValueChar
50067: (p_source_code => 'LEDGER_CATEGORY_CODE'
50060: ---------------------------------------------------------------------------------------------------------------
50061: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50062:
50063: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50064: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50065:
50066: IF xla_accounting_cache_pkg.GetValueChar
50067: (p_source_code => 'LEDGER_CATEGORY_CODE'
50068: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
50071: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
50072: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
50073: )
50074: THEN
50075: xla_ae_lines_pkg.BflowUpgEntry
50076: (p_business_method_code => l_bflow_method_code
50077: ,p_business_class_code => l_bflow_class_code
50078: ,p_balance_type => l_balance_type_code);
50079: ELSE
50113: , x_value_type_code => l_adr_value_type_code
50114: , p_side => 'NA'
50115: );
50116:
50117: xla_ae_lines_pkg.set_ccid(
50118: p_code_combination_id => l_ccid
50119: , p_value_type_code => l_adr_value_type_code
50120: , p_transaction_coa_id => l_adr_transaction_coa_id
50121: , p_accounting_coa_id => l_adr_accounting_coa_id
50145: );
50146:
50147: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
50148:
50149: xla_ae_lines_pkg.set_segment(
50150: p_to_segment_code => 'GL_ACCOUNT'
50151: , p_segment_value => l_segment
50152: , p_from_segment_code => l_adr_value_segment_code
50153: , p_from_combination_id => l_adr_value_combination_id
50189: xla_accounting_err_pkg.build_message
50190: (p_appli_s_name => 'XLA'
50191: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
50192: ,p_token_1 => 'LINE_NUMBER'
50193: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
50194: ,p_token_2 => 'LINE_TYPE_NAME'
50195: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
50196: l_component_type
50197: ,l_component_code
50225: --
50226: --
50227: ------------------------------------------------------------------------------------------------
50228: -- 4219869 Business Flow
50229: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
50230: -- Prior Entry. Currently, the following code is always generated.
50231: ------------------------------------------------------------------------------------------------
50232: XLA_AE_LINES_PKG.ValidateCurrentLine;
50233:
50228: -- 4219869 Business Flow
50229: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
50230: -- Prior Entry. Currently, the following code is always generated.
50231: ------------------------------------------------------------------------------------------------
50232: XLA_AE_LINES_PKG.ValidateCurrentLine;
50233:
50234: ------------------------------------------------------------------------------------
50235: -- 4219869 Business Flow
50236: -- Populated credit and debit amounts -- Need to generate this within IF
50234: ------------------------------------------------------------------------------------
50235: -- 4219869 Business Flow
50236: -- Populated credit and debit amounts -- Need to generate this within IF
50237: ------------------------------------------------------------------------------------
50238: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50239:
50240: ----------------------------------------------------------------------------------
50241: -- 4219869 Business Flow
50242: -- Update journal entry status -- Need to generate this within IF
50266: -- To allow MPA report to determine if it should generate report process
50267: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
50268: ------------------------------------------------------------------------------------------
50269:
50270: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
50271: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
50272:
50273: --
50274: -- Update the line information that should be overwritten
50267: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
50268: ------------------------------------------------------------------------------------------
50269:
50270: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
50271: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
50272:
50273: --
50274: -- Update the line information that should be overwritten
50275: --
50272:
50273: --
50274: -- Update the line information that should be overwritten
50275: --
50276: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50277: p_header_num => 1);
50278: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50279:
50280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50274: -- Update the line information that should be overwritten
50275: --
50276: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50277: p_header_num => 1);
50278: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50279:
50280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50281:
50282: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50276: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50277: p_header_num => 1);
50278: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50279:
50280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50281:
50282: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50283: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
50284: END IF;
50279:
50280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50281:
50282: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50283: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
50284: END IF;
50285:
50286: --
50287: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
50286: --
50287: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
50288: --
50289: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
50290: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
50291: ELSE
50292: ---------------------------------------------------------------------------------------------------
50293: -- 4262811a Switch Sign
50294: ---------------------------------------------------------------------------------------------------
50291: ELSE
50292: ---------------------------------------------------------------------------------------------------
50293: -- 4262811a Switch Sign
50294: ---------------------------------------------------------------------------------------------------
50295: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50292: ---------------------------------------------------------------------------------------------------
50293: -- 4262811a Switch Sign
50294: ---------------------------------------------------------------------------------------------------
50295: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50293: -- 4262811a Switch Sign
50294: ---------------------------------------------------------------------------------------------------
50295: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50294: ---------------------------------------------------------------------------------------------------
50295: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50295: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50303:
50297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50303:
50304: END IF;
50305:
50298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50300: -- 5132302
50301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50303:
50304: END IF;
50305:
50306: -- 4955764
50303:
50304: END IF;
50305:
50306: -- 4955764
50307: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50308: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50309:
50310:
50311: XLA_AE_LINES_PKG.ValidateCurrentLine;
50307: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50308: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50309:
50310:
50311: XLA_AE_LINES_PKG.ValidateCurrentLine;
50312: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50313:
50314: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
50315: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
50308: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50309:
50310:
50311: XLA_AE_LINES_PKG.ValidateCurrentLine;
50312: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50313:
50314: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
50315: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
50316: ,p_balance_type_code => l_balance_type_code);
50457: --
50458: -- bulk performance
50459: --
50460: l_balance_type_code VARCHAR2(1);
50461: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
50462: l_log_module VARCHAR2(240);
50463:
50464: --
50465: -- Upgrade strategy
50522: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
50523: l_balance_type_code <> 'B' THEN
50524:
50525: --
50526: XLA_AE_LINES_PKG.SetNewLine;
50527:
50528: p_balance_type_code := l_balance_type_code;
50529: -- set the flag so later we will know whether the gain loss line needs to be created
50530:
50534:
50535: --
50536: -- bulk performance
50537: --
50538: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
50539: p_header_num => 0); -- 4262811
50540: --
50541: -- set accounting line options
50542: --
50539: p_header_num => 0); -- 4262811
50540: --
50541: -- set accounting line options
50542: --
50543: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
50544: p_natural_side_code => 'D'
50545: , p_gain_or_loss_flag => 'N'
50546: , p_gl_transfer_mode_code => 'S'
50547: , p_acct_entry_type_code => 'A'
50553: --
50554: --
50555: -- set accounting line type info
50556: --
50557: xla_ae_lines_pkg.SetAcctLineType
50558: (p_component_type => l_component_type
50559: ,p_event_type_code => l_event_type_code
50560: ,p_line_definition_owner_code => l_line_definition_owner_code
50561: ,p_line_definition_code => l_line_definition_code
50567: ,p_event_class_code => l_event_class_code);
50568: --
50569: -- set accounting class
50570: --
50571: xla_ae_lines_pkg.SetAcctClass(
50572: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
50573: , p_ae_header_id => l_ae_header_id
50574: );
50575:
50575:
50576: --
50577: -- set rounding class
50578: --
50579: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
50580: 'FEDERAL_PROJECT_COST';
50581:
50582: --
50583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
50579: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
50580: 'FEDERAL_PROJECT_COST';
50581:
50582: --
50583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
50584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
50585: --
50586: -- bulk performance
50587: --
50580: 'FEDERAL_PROJECT_COST';
50581:
50582: --
50583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
50584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
50585: --
50586: -- bulk performance
50587: --
50588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
50584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
50585: --
50586: -- bulk performance
50587: --
50588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
50589:
50590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
50591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
50592:
50586: -- bulk performance
50587: --
50588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
50589:
50590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
50591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
50592:
50593: -- 4955764
50594: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
50591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
50592:
50593: -- 4955764
50594: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50595: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
50596:
50597: -- 4458381 Public Sector Enh
50598:
50662: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
50663: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
50664: l_rec_acct_attrs.array_char_value(30) := p_source_35;
50665:
50666: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50667: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50668:
50669: ---------------------------------------------------------------------------------------------------------------
50670: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50663: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
50664: l_rec_acct_attrs.array_char_value(30) := p_source_35;
50665:
50666: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50667: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50668:
50669: ---------------------------------------------------------------------------------------------------------------
50670: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50671: ---------------------------------------------------------------------------------------------------------------
50666: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
50667: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
50668:
50669: ---------------------------------------------------------------------------------------------------------------
50670: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50671: ---------------------------------------------------------------------------------------------------------------
50672: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50673:
50674: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50668:
50669: ---------------------------------------------------------------------------------------------------------------
50670: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50671: ---------------------------------------------------------------------------------------------------------------
50672: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50673:
50674: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50675: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50676:
50670: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
50671: ---------------------------------------------------------------------------------------------------------------
50672: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50673:
50674: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50675: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50676:
50677: IF xla_accounting_cache_pkg.GetValueChar
50678: (p_source_code => 'LEDGER_CATEGORY_CODE'
50671: ---------------------------------------------------------------------------------------------------------------
50672: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
50673:
50674: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50675: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
50676:
50677: IF xla_accounting_cache_pkg.GetValueChar
50678: (p_source_code => 'LEDGER_CATEGORY_CODE'
50679: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
50682: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
50683: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
50684: )
50685: THEN
50686: xla_ae_lines_pkg.BflowUpgEntry
50687: (p_business_method_code => l_bflow_method_code
50688: ,p_business_class_code => l_bflow_class_code
50689: ,p_balance_type => l_balance_type_code);
50690: ELSE
50724: , x_value_type_code => l_adr_value_type_code
50725: , p_side => 'NA'
50726: );
50727:
50728: xla_ae_lines_pkg.set_ccid(
50729: p_code_combination_id => l_ccid
50730: , p_value_type_code => l_adr_value_type_code
50731: , p_transaction_coa_id => l_adr_transaction_coa_id
50732: , p_accounting_coa_id => l_adr_accounting_coa_id
50756: );
50757:
50758: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
50759:
50760: xla_ae_lines_pkg.set_segment(
50761: p_to_segment_code => 'GL_ACCOUNT'
50762: , p_segment_value => l_segment
50763: , p_from_segment_code => l_adr_value_segment_code
50764: , p_from_combination_id => l_adr_value_combination_id
50800: xla_accounting_err_pkg.build_message
50801: (p_appli_s_name => 'XLA'
50802: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
50803: ,p_token_1 => 'LINE_NUMBER'
50804: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
50805: ,p_token_2 => 'LINE_TYPE_NAME'
50806: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
50807: l_component_type
50808: ,l_component_code
50836: --
50837: --
50838: ------------------------------------------------------------------------------------------------
50839: -- 4219869 Business Flow
50840: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
50841: -- Prior Entry. Currently, the following code is always generated.
50842: ------------------------------------------------------------------------------------------------
50843: XLA_AE_LINES_PKG.ValidateCurrentLine;
50844:
50839: -- 4219869 Business Flow
50840: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
50841: -- Prior Entry. Currently, the following code is always generated.
50842: ------------------------------------------------------------------------------------------------
50843: XLA_AE_LINES_PKG.ValidateCurrentLine;
50844:
50845: ------------------------------------------------------------------------------------
50846: -- 4219869 Business Flow
50847: -- Populated credit and debit amounts -- Need to generate this within IF
50845: ------------------------------------------------------------------------------------
50846: -- 4219869 Business Flow
50847: -- Populated credit and debit amounts -- Need to generate this within IF
50848: ------------------------------------------------------------------------------------
50849: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50850:
50851: ----------------------------------------------------------------------------------
50852: -- 4219869 Business Flow
50853: -- Update journal entry status -- Need to generate this within IF
50877: -- To allow MPA report to determine if it should generate report process
50878: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
50879: ------------------------------------------------------------------------------------------
50880:
50881: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
50882: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
50883:
50884: --
50885: -- Update the line information that should be overwritten
50878: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
50879: ------------------------------------------------------------------------------------------
50880:
50881: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
50882: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
50883:
50884: --
50885: -- Update the line information that should be overwritten
50886: --
50883:
50884: --
50885: -- Update the line information that should be overwritten
50886: --
50887: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50888: p_header_num => 1);
50889: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50890:
50891: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50885: -- Update the line information that should be overwritten
50886: --
50887: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50888: p_header_num => 1);
50889: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50890:
50891: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50892:
50893: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50887: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
50888: p_header_num => 1);
50889: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
50890:
50891: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50892:
50893: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50894: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
50895: END IF;
50890:
50891: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
50892:
50893: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
50894: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
50895: END IF;
50896:
50897: --
50898: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
50897: --
50898: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
50899: --
50900: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
50901: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
50902: ELSE
50903: ---------------------------------------------------------------------------------------------------
50904: -- 4262811a Switch Sign
50905: ---------------------------------------------------------------------------------------------------
50902: ELSE
50903: ---------------------------------------------------------------------------------------------------
50904: -- 4262811a Switch Sign
50905: ---------------------------------------------------------------------------------------------------
50906: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50907: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50903: ---------------------------------------------------------------------------------------------------
50904: -- 4262811a Switch Sign
50905: ---------------------------------------------------------------------------------------------------
50906: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50907: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50904: -- 4262811a Switch Sign
50905: ---------------------------------------------------------------------------------------------------
50906: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50907: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50912: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50905: ---------------------------------------------------------------------------------------------------
50906: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50907: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50912: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50913: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50906: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
50907: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50912: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50913: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50914:
50908: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50912: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50913: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50914:
50915: END IF;
50916:
50909: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
50910: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50911: -- 5132302
50912: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
50913: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
50914:
50915: END IF;
50916:
50917: -- 4955764
50914:
50915: END IF;
50916:
50917: -- 4955764
50918: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50919: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50920:
50921:
50922: XLA_AE_LINES_PKG.ValidateCurrentLine;
50918: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
50919: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50920:
50921:
50922: XLA_AE_LINES_PKG.ValidateCurrentLine;
50923: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50924:
50925: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
50926: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
50919: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
50920:
50921:
50922: XLA_AE_LINES_PKG.ValidateCurrentLine;
50923: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
50924:
50925: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
50926: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
50927: ,p_balance_type_code => l_balance_type_code);
51068: --
51069: -- bulk performance
51070: --
51071: l_balance_type_code VARCHAR2(1);
51072: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
51073: l_log_module VARCHAR2(240);
51074:
51075: --
51076: -- Upgrade strategy
51133: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
51134: l_balance_type_code <> 'B' THEN
51135:
51136: --
51137: XLA_AE_LINES_PKG.SetNewLine;
51138:
51139: p_balance_type_code := l_balance_type_code;
51140: -- set the flag so later we will know whether the gain loss line needs to be created
51141:
51145:
51146: --
51147: -- bulk performance
51148: --
51149: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
51150: p_header_num => 0); -- 4262811
51151: --
51152: -- set accounting line options
51153: --
51150: p_header_num => 0); -- 4262811
51151: --
51152: -- set accounting line options
51153: --
51154: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
51155: p_natural_side_code => 'D'
51156: , p_gain_or_loss_flag => 'N'
51157: , p_gl_transfer_mode_code => 'S'
51158: , p_acct_entry_type_code => 'A'
51164: --
51165: --
51166: -- set accounting line type info
51167: --
51168: xla_ae_lines_pkg.SetAcctLineType
51169: (p_component_type => l_component_type
51170: ,p_event_type_code => l_event_type_code
51171: ,p_line_definition_owner_code => l_line_definition_owner_code
51172: ,p_line_definition_code => l_line_definition_code
51178: ,p_event_class_code => l_event_class_code);
51179: --
51180: -- set accounting class
51181: --
51182: xla_ae_lines_pkg.SetAcctClass(
51183: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
51184: , p_ae_header_id => l_ae_header_id
51185: );
51186:
51186:
51187: --
51188: -- set rounding class
51189: --
51190: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
51191: 'FEDERAL_PROJECT_COST';
51192:
51193: --
51194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51190: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
51191: 'FEDERAL_PROJECT_COST';
51192:
51193: --
51194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51196: --
51197: -- bulk performance
51198: --
51191: 'FEDERAL_PROJECT_COST';
51192:
51193: --
51194: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51196: --
51197: -- bulk performance
51198: --
51199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51195: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51196: --
51197: -- bulk performance
51198: --
51199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51200:
51201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51203:
51197: -- bulk performance
51198: --
51199: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51200:
51201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51203:
51204: -- 4955764
51205: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51201: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51202: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51203:
51204: -- 4955764
51205: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51206: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
51207:
51208: -- 4458381 Public Sector Enh
51209:
51273: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
51274: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
51275: l_rec_acct_attrs.array_char_value(30) := p_source_35;
51276:
51277: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51278: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51279:
51280: ---------------------------------------------------------------------------------------------------------------
51281: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51274: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
51275: l_rec_acct_attrs.array_char_value(30) := p_source_35;
51276:
51277: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51278: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51279:
51280: ---------------------------------------------------------------------------------------------------------------
51281: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51282: ---------------------------------------------------------------------------------------------------------------
51277: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51278: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51279:
51280: ---------------------------------------------------------------------------------------------------------------
51281: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51282: ---------------------------------------------------------------------------------------------------------------
51283: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51284:
51285: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51279:
51280: ---------------------------------------------------------------------------------------------------------------
51281: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51282: ---------------------------------------------------------------------------------------------------------------
51283: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51284:
51285: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51286: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51287:
51281: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51282: ---------------------------------------------------------------------------------------------------------------
51283: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51284:
51285: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51286: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51287:
51288: IF xla_accounting_cache_pkg.GetValueChar
51289: (p_source_code => 'LEDGER_CATEGORY_CODE'
51282: ---------------------------------------------------------------------------------------------------------------
51283: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51284:
51285: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51286: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51287:
51288: IF xla_accounting_cache_pkg.GetValueChar
51289: (p_source_code => 'LEDGER_CATEGORY_CODE'
51290: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
51293: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
51294: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
51295: )
51296: THEN
51297: xla_ae_lines_pkg.BflowUpgEntry
51298: (p_business_method_code => l_bflow_method_code
51299: ,p_business_class_code => l_bflow_class_code
51300: ,p_balance_type => l_balance_type_code);
51301: ELSE
51335: , x_value_type_code => l_adr_value_type_code
51336: , p_side => 'NA'
51337: );
51338:
51339: xla_ae_lines_pkg.set_ccid(
51340: p_code_combination_id => l_ccid
51341: , p_value_type_code => l_adr_value_type_code
51342: , p_transaction_coa_id => l_adr_transaction_coa_id
51343: , p_accounting_coa_id => l_adr_accounting_coa_id
51367: );
51368:
51369: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
51370:
51371: xla_ae_lines_pkg.set_segment(
51372: p_to_segment_code => 'GL_ACCOUNT'
51373: , p_segment_value => l_segment
51374: , p_from_segment_code => l_adr_value_segment_code
51375: , p_from_combination_id => l_adr_value_combination_id
51411: xla_accounting_err_pkg.build_message
51412: (p_appli_s_name => 'XLA'
51413: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
51414: ,p_token_1 => 'LINE_NUMBER'
51415: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
51416: ,p_token_2 => 'LINE_TYPE_NAME'
51417: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
51418: l_component_type
51419: ,l_component_code
51447: --
51448: --
51449: ------------------------------------------------------------------------------------------------
51450: -- 4219869 Business Flow
51451: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
51452: -- Prior Entry. Currently, the following code is always generated.
51453: ------------------------------------------------------------------------------------------------
51454: XLA_AE_LINES_PKG.ValidateCurrentLine;
51455:
51450: -- 4219869 Business Flow
51451: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
51452: -- Prior Entry. Currently, the following code is always generated.
51453: ------------------------------------------------------------------------------------------------
51454: XLA_AE_LINES_PKG.ValidateCurrentLine;
51455:
51456: ------------------------------------------------------------------------------------
51457: -- 4219869 Business Flow
51458: -- Populated credit and debit amounts -- Need to generate this within IF
51456: ------------------------------------------------------------------------------------
51457: -- 4219869 Business Flow
51458: -- Populated credit and debit amounts -- Need to generate this within IF
51459: ------------------------------------------------------------------------------------
51460: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
51461:
51462: ----------------------------------------------------------------------------------
51463: -- 4219869 Business Flow
51464: -- Update journal entry status -- Need to generate this within IF
51488: -- To allow MPA report to determine if it should generate report process
51489: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
51490: ------------------------------------------------------------------------------------------
51491:
51492: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
51493: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
51494:
51495: --
51496: -- Update the line information that should be overwritten
51489: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
51490: ------------------------------------------------------------------------------------------
51491:
51492: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
51493: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
51494:
51495: --
51496: -- Update the line information that should be overwritten
51497: --
51494:
51495: --
51496: -- Update the line information that should be overwritten
51497: --
51498: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
51499: p_header_num => 1);
51500: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
51501:
51502: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
51496: -- Update the line information that should be overwritten
51497: --
51498: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
51499: p_header_num => 1);
51500: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
51501:
51502: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
51503:
51504: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
51498: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
51499: p_header_num => 1);
51500: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
51501:
51502: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
51503:
51504: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
51505: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
51506: END IF;
51501:
51502: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
51503:
51504: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
51505: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
51506: END IF;
51507:
51508: --
51509: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
51508: --
51509: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
51510: --
51511: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
51512: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
51513: ELSE
51514: ---------------------------------------------------------------------------------------------------
51515: -- 4262811a Switch Sign
51516: ---------------------------------------------------------------------------------------------------
51513: ELSE
51514: ---------------------------------------------------------------------------------------------------
51515: -- 4262811a Switch Sign
51516: ---------------------------------------------------------------------------------------------------
51517: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
51518: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51514: ---------------------------------------------------------------------------------------------------
51515: -- 4262811a Switch Sign
51516: ---------------------------------------------------------------------------------------------------
51517: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
51518: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51515: -- 4262811a Switch Sign
51516: ---------------------------------------------------------------------------------------------------
51517: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
51518: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51523: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
51516: ---------------------------------------------------------------------------------------------------
51517: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
51518: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51523: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
51524: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51517: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
51518: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51523: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
51524: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51525:
51519: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51523: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
51524: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51525:
51526: END IF;
51527:
51520: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
51521: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51522: -- 5132302
51523: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
51524: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
51525:
51526: END IF;
51527:
51528: -- 4955764
51525:
51526: END IF;
51527:
51528: -- 4955764
51529: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51530: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
51531:
51532:
51533: XLA_AE_LINES_PKG.ValidateCurrentLine;
51529: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51530: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
51531:
51532:
51533: XLA_AE_LINES_PKG.ValidateCurrentLine;
51534: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
51535:
51536: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
51537: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
51530: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
51531:
51532:
51533: XLA_AE_LINES_PKG.ValidateCurrentLine;
51534: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
51535:
51536: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
51537: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
51538: ,p_balance_type_code => l_balance_type_code);
51683: --
51684: -- bulk performance
51685: --
51686: l_balance_type_code VARCHAR2(1);
51687: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
51688: l_log_module VARCHAR2(240);
51689:
51690: --
51691: -- Upgrade strategy
51751: ') = 'N'
51752: THEN
51753:
51754: --
51755: XLA_AE_LINES_PKG.SetNewLine;
51756:
51757: p_balance_type_code := l_balance_type_code;
51758: -- set the flag so later we will know whether the gain loss line needs to be created
51759:
51763:
51764: --
51765: -- bulk performance
51766: --
51767: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
51768: p_header_num => 0); -- 4262811
51769: --
51770: -- set accounting line options
51771: --
51768: p_header_num => 0); -- 4262811
51769: --
51770: -- set accounting line options
51771: --
51772: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
51773: p_natural_side_code => 'D'
51774: , p_gain_or_loss_flag => 'N'
51775: , p_gl_transfer_mode_code => 'S'
51776: , p_acct_entry_type_code => 'A'
51782: --
51783: --
51784: -- set accounting line type info
51785: --
51786: xla_ae_lines_pkg.SetAcctLineType
51787: (p_component_type => l_component_type
51788: ,p_event_type_code => l_event_type_code
51789: ,p_line_definition_owner_code => l_line_definition_owner_code
51790: ,p_line_definition_code => l_line_definition_code
51796: ,p_event_class_code => l_event_class_code);
51797: --
51798: -- set accounting class
51799: --
51800: xla_ae_lines_pkg.SetAcctClass(
51801: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
51802: , p_ae_header_id => l_ae_header_id
51803: );
51804:
51804:
51805: --
51806: -- set rounding class
51807: --
51808: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
51809: 'FEDERAL_PROJECT_COST';
51810:
51811: --
51812: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51808: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
51809: 'FEDERAL_PROJECT_COST';
51810:
51811: --
51812: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51813: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51814: --
51815: -- bulk performance
51816: --
51809: 'FEDERAL_PROJECT_COST';
51810:
51811: --
51812: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
51813: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51814: --
51815: -- bulk performance
51816: --
51817: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51813: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
51814: --
51815: -- bulk performance
51816: --
51817: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51818:
51819: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51820: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51821:
51815: -- bulk performance
51816: --
51817: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
51818:
51819: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51820: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51821:
51822: -- 4955764
51823: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51819: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
51820: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
51821:
51822: -- 4955764
51823: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
51824: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
51825:
51826: -- 4458381 Public Sector Enh
51827:
51891: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
51892: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
51893: l_rec_acct_attrs.array_char_value(30) := p_source_35;
51894:
51895: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51896: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51897:
51898: ---------------------------------------------------------------------------------------------------------------
51899: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51892: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
51893: l_rec_acct_attrs.array_char_value(30) := p_source_35;
51894:
51895: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51896: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51897:
51898: ---------------------------------------------------------------------------------------------------------------
51899: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51900: ---------------------------------------------------------------------------------------------------------------
51895: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
51896: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
51897:
51898: ---------------------------------------------------------------------------------------------------------------
51899: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51900: ---------------------------------------------------------------------------------------------------------------
51901: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51902:
51903: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51897:
51898: ---------------------------------------------------------------------------------------------------------------
51899: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51900: ---------------------------------------------------------------------------------------------------------------
51901: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51902:
51903: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51904: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51905:
51899: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
51900: ---------------------------------------------------------------------------------------------------------------
51901: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51902:
51903: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51904: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51905:
51906: IF xla_accounting_cache_pkg.GetValueChar
51907: (p_source_code => 'LEDGER_CATEGORY_CODE'
51900: ---------------------------------------------------------------------------------------------------------------
51901: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
51902:
51903: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51904: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
51905:
51906: IF xla_accounting_cache_pkg.GetValueChar
51907: (p_source_code => 'LEDGER_CATEGORY_CODE'
51908: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
51911: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
51912: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
51913: )
51914: THEN
51915: xla_ae_lines_pkg.BflowUpgEntry
51916: (p_business_method_code => l_bflow_method_code
51917: ,p_business_class_code => l_bflow_class_code
51918: ,p_balance_type => l_balance_type_code);
51919: ELSE
51953: , x_value_type_code => l_adr_value_type_code
51954: , p_side => 'NA'
51955: );
51956:
51957: xla_ae_lines_pkg.set_ccid(
51958: p_code_combination_id => l_ccid
51959: , p_value_type_code => l_adr_value_type_code
51960: , p_transaction_coa_id => l_adr_transaction_coa_id
51961: , p_accounting_coa_id => l_adr_accounting_coa_id
51986: );
51987:
51988: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
51989:
51990: xla_ae_lines_pkg.set_segment(
51991: p_to_segment_code => 'GL_ACCOUNT'
51992: , p_segment_value => l_segment
51993: , p_from_segment_code => l_adr_value_segment_code
51994: , p_from_combination_id => l_adr_value_combination_id
52030: xla_accounting_err_pkg.build_message
52031: (p_appli_s_name => 'XLA'
52032: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
52033: ,p_token_1 => 'LINE_NUMBER'
52034: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
52035: ,p_token_2 => 'LINE_TYPE_NAME'
52036: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
52037: l_component_type
52038: ,l_component_code
52066: --
52067: --
52068: ------------------------------------------------------------------------------------------------
52069: -- 4219869 Business Flow
52070: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
52071: -- Prior Entry. Currently, the following code is always generated.
52072: ------------------------------------------------------------------------------------------------
52073: XLA_AE_LINES_PKG.ValidateCurrentLine;
52074:
52069: -- 4219869 Business Flow
52070: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
52071: -- Prior Entry. Currently, the following code is always generated.
52072: ------------------------------------------------------------------------------------------------
52073: XLA_AE_LINES_PKG.ValidateCurrentLine;
52074:
52075: ------------------------------------------------------------------------------------
52076: -- 4219869 Business Flow
52077: -- Populated credit and debit amounts -- Need to generate this within IF
52075: ------------------------------------------------------------------------------------
52076: -- 4219869 Business Flow
52077: -- Populated credit and debit amounts -- Need to generate this within IF
52078: ------------------------------------------------------------------------------------
52079: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52080:
52081: ----------------------------------------------------------------------------------
52082: -- 4219869 Business Flow
52083: -- Update journal entry status -- Need to generate this within IF
52107: -- To allow MPA report to determine if it should generate report process
52108: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
52109: ------------------------------------------------------------------------------------------
52110:
52111: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
52112: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
52113:
52114: --
52115: -- Update the line information that should be overwritten
52108: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
52109: ------------------------------------------------------------------------------------------
52110:
52111: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
52112: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
52113:
52114: --
52115: -- Update the line information that should be overwritten
52116: --
52113:
52114: --
52115: -- Update the line information that should be overwritten
52116: --
52117: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52118: p_header_num => 1);
52119: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52120:
52121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52115: -- Update the line information that should be overwritten
52116: --
52117: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52118: p_header_num => 1);
52119: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52120:
52121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52122:
52123: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52117: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52118: p_header_num => 1);
52119: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52120:
52121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52122:
52123: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52124: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
52125: END IF;
52120:
52121: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52122:
52123: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52124: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
52125: END IF;
52126:
52127: --
52128: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
52127: --
52128: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
52129: --
52130: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
52131: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
52132: ELSE
52133: ---------------------------------------------------------------------------------------------------
52134: -- 4262811a Switch Sign
52135: ---------------------------------------------------------------------------------------------------
52132: ELSE
52133: ---------------------------------------------------------------------------------------------------
52134: -- 4262811a Switch Sign
52135: ---------------------------------------------------------------------------------------------------
52136: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52133: ---------------------------------------------------------------------------------------------------
52134: -- 4262811a Switch Sign
52135: ---------------------------------------------------------------------------------------------------
52136: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52134: -- 4262811a Switch Sign
52135: ---------------------------------------------------------------------------------------------------
52136: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52135: ---------------------------------------------------------------------------------------------------
52136: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52143: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52136: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52143: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52144:
52138: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52143: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52144:
52145: END IF;
52146:
52139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52140: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52141: -- 5132302
52142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52143: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52144:
52145: END IF;
52146:
52147: -- 4955764
52144:
52145: END IF;
52146:
52147: -- 4955764
52148: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52149: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52150:
52151:
52152: XLA_AE_LINES_PKG.ValidateCurrentLine;
52148: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52149: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52150:
52151:
52152: XLA_AE_LINES_PKG.ValidateCurrentLine;
52153: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52154:
52155: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
52156: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
52149: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52150:
52151:
52152: XLA_AE_LINES_PKG.ValidateCurrentLine;
52153: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52154:
52155: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
52156: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
52157: ,p_balance_type_code => l_balance_type_code);
52299: --
52300: -- bulk performance
52301: --
52302: l_balance_type_code VARCHAR2(1);
52303: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
52304: l_log_module VARCHAR2(240);
52305:
52306: --
52307: -- Upgrade strategy
52364: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
52365: l_balance_type_code <> 'B' THEN
52366:
52367: --
52368: XLA_AE_LINES_PKG.SetNewLine;
52369:
52370: p_balance_type_code := l_balance_type_code;
52371: -- set the flag so later we will know whether the gain loss line needs to be created
52372:
52376:
52377: --
52378: -- bulk performance
52379: --
52380: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
52381: p_header_num => 0); -- 4262811
52382: --
52383: -- set accounting line options
52384: --
52381: p_header_num => 0); -- 4262811
52382: --
52383: -- set accounting line options
52384: --
52385: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
52386: p_natural_side_code => 'D'
52387: , p_gain_or_loss_flag => 'N'
52388: , p_gl_transfer_mode_code => 'S'
52389: , p_acct_entry_type_code => 'A'
52395: --
52396: --
52397: -- set accounting line type info
52398: --
52399: xla_ae_lines_pkg.SetAcctLineType
52400: (p_component_type => l_component_type
52401: ,p_event_type_code => l_event_type_code
52402: ,p_line_definition_owner_code => l_line_definition_owner_code
52403: ,p_line_definition_code => l_line_definition_code
52409: ,p_event_class_code => l_event_class_code);
52410: --
52411: -- set accounting class
52412: --
52413: xla_ae_lines_pkg.SetAcctClass(
52414: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
52415: , p_ae_header_id => l_ae_header_id
52416: );
52417:
52417:
52418: --
52419: -- set rounding class
52420: --
52421: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
52422: 'FEDERAL_PROJECT_COST';
52423:
52424: --
52425: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
52421: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
52422: 'FEDERAL_PROJECT_COST';
52423:
52424: --
52425: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
52426: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
52427: --
52428: -- bulk performance
52429: --
52422: 'FEDERAL_PROJECT_COST';
52423:
52424: --
52425: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
52426: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
52427: --
52428: -- bulk performance
52429: --
52430: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
52426: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
52427: --
52428: -- bulk performance
52429: --
52430: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
52431:
52432: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
52433: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
52434:
52428: -- bulk performance
52429: --
52430: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
52431:
52432: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
52433: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
52434:
52435: -- 4955764
52436: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52432: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
52433: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
52434:
52435: -- 4955764
52436: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52437: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
52438:
52439: -- 4458381 Public Sector Enh
52440:
52504: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
52505: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
52506: l_rec_acct_attrs.array_char_value(30) := p_source_35;
52507:
52508: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
52509: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
52510:
52511: ---------------------------------------------------------------------------------------------------------------
52512: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
52505: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
52506: l_rec_acct_attrs.array_char_value(30) := p_source_35;
52507:
52508: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
52509: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
52510:
52511: ---------------------------------------------------------------------------------------------------------------
52512: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
52513: ---------------------------------------------------------------------------------------------------------------
52508: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
52509: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
52510:
52511: ---------------------------------------------------------------------------------------------------------------
52512: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
52513: ---------------------------------------------------------------------------------------------------------------
52514: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
52515:
52516: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52510:
52511: ---------------------------------------------------------------------------------------------------------------
52512: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
52513: ---------------------------------------------------------------------------------------------------------------
52514: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
52515:
52516: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52517: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52518:
52512: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
52513: ---------------------------------------------------------------------------------------------------------------
52514: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
52515:
52516: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52517: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52518:
52519: IF xla_accounting_cache_pkg.GetValueChar
52520: (p_source_code => 'LEDGER_CATEGORY_CODE'
52513: ---------------------------------------------------------------------------------------------------------------
52514: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
52515:
52516: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52517: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
52518:
52519: IF xla_accounting_cache_pkg.GetValueChar
52520: (p_source_code => 'LEDGER_CATEGORY_CODE'
52521: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
52524: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
52525: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
52526: )
52527: THEN
52528: xla_ae_lines_pkg.BflowUpgEntry
52529: (p_business_method_code => l_bflow_method_code
52530: ,p_business_class_code => l_bflow_class_code
52531: ,p_balance_type => l_balance_type_code);
52532: ELSE
52566: , x_value_type_code => l_adr_value_type_code
52567: , p_side => 'NA'
52568: );
52569:
52570: xla_ae_lines_pkg.set_ccid(
52571: p_code_combination_id => l_ccid
52572: , p_value_type_code => l_adr_value_type_code
52573: , p_transaction_coa_id => l_adr_transaction_coa_id
52574: , p_accounting_coa_id => l_adr_accounting_coa_id
52598: );
52599:
52600: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
52601:
52602: xla_ae_lines_pkg.set_segment(
52603: p_to_segment_code => 'GL_ACCOUNT'
52604: , p_segment_value => l_segment
52605: , p_from_segment_code => l_adr_value_segment_code
52606: , p_from_combination_id => l_adr_value_combination_id
52642: xla_accounting_err_pkg.build_message
52643: (p_appli_s_name => 'XLA'
52644: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
52645: ,p_token_1 => 'LINE_NUMBER'
52646: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
52647: ,p_token_2 => 'LINE_TYPE_NAME'
52648: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
52649: l_component_type
52650: ,l_component_code
52678: --
52679: --
52680: ------------------------------------------------------------------------------------------------
52681: -- 4219869 Business Flow
52682: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
52683: -- Prior Entry. Currently, the following code is always generated.
52684: ------------------------------------------------------------------------------------------------
52685: XLA_AE_LINES_PKG.ValidateCurrentLine;
52686:
52681: -- 4219869 Business Flow
52682: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
52683: -- Prior Entry. Currently, the following code is always generated.
52684: ------------------------------------------------------------------------------------------------
52685: XLA_AE_LINES_PKG.ValidateCurrentLine;
52686:
52687: ------------------------------------------------------------------------------------
52688: -- 4219869 Business Flow
52689: -- Populated credit and debit amounts -- Need to generate this within IF
52687: ------------------------------------------------------------------------------------
52688: -- 4219869 Business Flow
52689: -- Populated credit and debit amounts -- Need to generate this within IF
52690: ------------------------------------------------------------------------------------
52691: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52692:
52693: ----------------------------------------------------------------------------------
52694: -- 4219869 Business Flow
52695: -- Update journal entry status -- Need to generate this within IF
52719: -- To allow MPA report to determine if it should generate report process
52720: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
52721: ------------------------------------------------------------------------------------------
52722:
52723: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
52724: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
52725:
52726: --
52727: -- Update the line information that should be overwritten
52720: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
52721: ------------------------------------------------------------------------------------------
52722:
52723: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
52724: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
52725:
52726: --
52727: -- Update the line information that should be overwritten
52728: --
52725:
52726: --
52727: -- Update the line information that should be overwritten
52728: --
52729: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52730: p_header_num => 1);
52731: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52732:
52733: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52727: -- Update the line information that should be overwritten
52728: --
52729: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52730: p_header_num => 1);
52731: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52732:
52733: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52734:
52735: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52729: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
52730: p_header_num => 1);
52731: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
52732:
52733: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52734:
52735: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52736: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
52737: END IF;
52732:
52733: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
52734:
52735: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
52736: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
52737: END IF;
52738:
52739: --
52740: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
52739: --
52740: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
52741: --
52742: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
52743: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
52744: ELSE
52745: ---------------------------------------------------------------------------------------------------
52746: -- 4262811a Switch Sign
52747: ---------------------------------------------------------------------------------------------------
52744: ELSE
52745: ---------------------------------------------------------------------------------------------------
52746: -- 4262811a Switch Sign
52747: ---------------------------------------------------------------------------------------------------
52748: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52749: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52745: ---------------------------------------------------------------------------------------------------
52746: -- 4262811a Switch Sign
52747: ---------------------------------------------------------------------------------------------------
52748: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52749: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52746: -- 4262811a Switch Sign
52747: ---------------------------------------------------------------------------------------------------
52748: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52749: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52754: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52747: ---------------------------------------------------------------------------------------------------
52748: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52749: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52754: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52755: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52748: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
52749: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52754: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52755: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52756:
52750: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52754: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52755: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52756:
52757: END IF;
52758:
52751: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
52752: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52753: -- 5132302
52754: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
52755: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
52756:
52757: END IF;
52758:
52759: -- 4955764
52756:
52757: END IF;
52758:
52759: -- 4955764
52760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52761: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52762:
52763:
52764: XLA_AE_LINES_PKG.ValidateCurrentLine;
52760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
52761: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52762:
52763:
52764: XLA_AE_LINES_PKG.ValidateCurrentLine;
52765: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52766:
52767: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
52768: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
52761: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
52762:
52763:
52764: XLA_AE_LINES_PKG.ValidateCurrentLine;
52765: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
52766:
52767: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
52768: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
52769: ,p_balance_type_code => l_balance_type_code);
52910: --
52911: -- bulk performance
52912: --
52913: l_balance_type_code VARCHAR2(1);
52914: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
52915: l_log_module VARCHAR2(240);
52916:
52917: --
52918: -- Upgrade strategy
52975: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
52976: l_balance_type_code <> 'B' THEN
52977:
52978: --
52979: XLA_AE_LINES_PKG.SetNewLine;
52980:
52981: p_balance_type_code := l_balance_type_code;
52982: -- set the flag so later we will know whether the gain loss line needs to be created
52983:
52987:
52988: --
52989: -- bulk performance
52990: --
52991: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
52992: p_header_num => 0); -- 4262811
52993: --
52994: -- set accounting line options
52995: --
52992: p_header_num => 0); -- 4262811
52993: --
52994: -- set accounting line options
52995: --
52996: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
52997: p_natural_side_code => 'D'
52998: , p_gain_or_loss_flag => 'N'
52999: , p_gl_transfer_mode_code => 'S'
53000: , p_acct_entry_type_code => 'A'
53006: --
53007: --
53008: -- set accounting line type info
53009: --
53010: xla_ae_lines_pkg.SetAcctLineType
53011: (p_component_type => l_component_type
53012: ,p_event_type_code => l_event_type_code
53013: ,p_line_definition_owner_code => l_line_definition_owner_code
53014: ,p_line_definition_code => l_line_definition_code
53020: ,p_event_class_code => l_event_class_code);
53021: --
53022: -- set accounting class
53023: --
53024: xla_ae_lines_pkg.SetAcctClass(
53025: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
53026: , p_ae_header_id => l_ae_header_id
53027: );
53028:
53028:
53029: --
53030: -- set rounding class
53031: --
53032: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
53033: 'FEDERAL_PROJECT_COST';
53034:
53035: --
53036: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53032: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
53033: 'FEDERAL_PROJECT_COST';
53034:
53035: --
53036: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53037: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53038: --
53039: -- bulk performance
53040: --
53033: 'FEDERAL_PROJECT_COST';
53034:
53035: --
53036: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53037: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53038: --
53039: -- bulk performance
53040: --
53041: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53037: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53038: --
53039: -- bulk performance
53040: --
53041: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53042:
53043: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53044: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53045:
53039: -- bulk performance
53040: --
53041: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53042:
53043: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53044: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53045:
53046: -- 4955764
53047: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53043: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53044: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53045:
53046: -- 4955764
53047: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53048: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
53049:
53050: -- 4458381 Public Sector Enh
53051:
53115: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
53116: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
53117: l_rec_acct_attrs.array_char_value(30) := p_source_35;
53118:
53119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53121:
53122: ---------------------------------------------------------------------------------------------------------------
53123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53116: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
53117: l_rec_acct_attrs.array_char_value(30) := p_source_35;
53118:
53119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53121:
53122: ---------------------------------------------------------------------------------------------------------------
53123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53124: ---------------------------------------------------------------------------------------------------------------
53119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53121:
53122: ---------------------------------------------------------------------------------------------------------------
53123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53124: ---------------------------------------------------------------------------------------------------------------
53125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53126:
53127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53121:
53122: ---------------------------------------------------------------------------------------------------------------
53123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53124: ---------------------------------------------------------------------------------------------------------------
53125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53126:
53127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53129:
53123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53124: ---------------------------------------------------------------------------------------------------------------
53125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53126:
53127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53129:
53130: IF xla_accounting_cache_pkg.GetValueChar
53131: (p_source_code => 'LEDGER_CATEGORY_CODE'
53124: ---------------------------------------------------------------------------------------------------------------
53125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53126:
53127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53129:
53130: IF xla_accounting_cache_pkg.GetValueChar
53131: (p_source_code => 'LEDGER_CATEGORY_CODE'
53132: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
53135: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
53136: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
53137: )
53138: THEN
53139: xla_ae_lines_pkg.BflowUpgEntry
53140: (p_business_method_code => l_bflow_method_code
53141: ,p_business_class_code => l_bflow_class_code
53142: ,p_balance_type => l_balance_type_code);
53143: ELSE
53177: , x_value_type_code => l_adr_value_type_code
53178: , p_side => 'NA'
53179: );
53180:
53181: xla_ae_lines_pkg.set_ccid(
53182: p_code_combination_id => l_ccid
53183: , p_value_type_code => l_adr_value_type_code
53184: , p_transaction_coa_id => l_adr_transaction_coa_id
53185: , p_accounting_coa_id => l_adr_accounting_coa_id
53209: );
53210:
53211: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
53212:
53213: xla_ae_lines_pkg.set_segment(
53214: p_to_segment_code => 'GL_ACCOUNT'
53215: , p_segment_value => l_segment
53216: , p_from_segment_code => l_adr_value_segment_code
53217: , p_from_combination_id => l_adr_value_combination_id
53253: xla_accounting_err_pkg.build_message
53254: (p_appli_s_name => 'XLA'
53255: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
53256: ,p_token_1 => 'LINE_NUMBER'
53257: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
53258: ,p_token_2 => 'LINE_TYPE_NAME'
53259: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
53260: l_component_type
53261: ,l_component_code
53289: --
53290: --
53291: ------------------------------------------------------------------------------------------------
53292: -- 4219869 Business Flow
53293: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
53294: -- Prior Entry. Currently, the following code is always generated.
53295: ------------------------------------------------------------------------------------------------
53296: XLA_AE_LINES_PKG.ValidateCurrentLine;
53297:
53292: -- 4219869 Business Flow
53293: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
53294: -- Prior Entry. Currently, the following code is always generated.
53295: ------------------------------------------------------------------------------------------------
53296: XLA_AE_LINES_PKG.ValidateCurrentLine;
53297:
53298: ------------------------------------------------------------------------------------
53299: -- 4219869 Business Flow
53300: -- Populated credit and debit amounts -- Need to generate this within IF
53298: ------------------------------------------------------------------------------------
53299: -- 4219869 Business Flow
53300: -- Populated credit and debit amounts -- Need to generate this within IF
53301: ------------------------------------------------------------------------------------
53302: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53303:
53304: ----------------------------------------------------------------------------------
53305: -- 4219869 Business Flow
53306: -- Update journal entry status -- Need to generate this within IF
53330: -- To allow MPA report to determine if it should generate report process
53331: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
53332: ------------------------------------------------------------------------------------------
53333:
53334: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
53335: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
53336:
53337: --
53338: -- Update the line information that should be overwritten
53331: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
53332: ------------------------------------------------------------------------------------------
53333:
53334: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
53335: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
53336:
53337: --
53338: -- Update the line information that should be overwritten
53339: --
53336:
53337: --
53338: -- Update the line information that should be overwritten
53339: --
53340: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53341: p_header_num => 1);
53342: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53343:
53344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53338: -- Update the line information that should be overwritten
53339: --
53340: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53341: p_header_num => 1);
53342: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53343:
53344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53345:
53346: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53340: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53341: p_header_num => 1);
53342: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53343:
53344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53345:
53346: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53347: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
53348: END IF;
53343:
53344: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53345:
53346: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53347: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
53348: END IF;
53349:
53350: --
53351: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
53350: --
53351: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
53352: --
53353: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
53354: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
53355: ELSE
53356: ---------------------------------------------------------------------------------------------------
53357: -- 4262811a Switch Sign
53358: ---------------------------------------------------------------------------------------------------
53355: ELSE
53356: ---------------------------------------------------------------------------------------------------
53357: -- 4262811a Switch Sign
53358: ---------------------------------------------------------------------------------------------------
53359: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53356: ---------------------------------------------------------------------------------------------------
53357: -- 4262811a Switch Sign
53358: ---------------------------------------------------------------------------------------------------
53359: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53357: -- 4262811a Switch Sign
53358: ---------------------------------------------------------------------------------------------------
53359: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53365: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53358: ---------------------------------------------------------------------------------------------------
53359: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53365: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53359: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53360: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53365: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53367:
53361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53365: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53367:
53368: END IF;
53369:
53362: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53364: -- 5132302
53365: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53367:
53368: END IF;
53369:
53370: -- 4955764
53367:
53368: END IF;
53369:
53370: -- 4955764
53371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53373:
53374:
53375: XLA_AE_LINES_PKG.ValidateCurrentLine;
53371: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53373:
53374:
53375: XLA_AE_LINES_PKG.ValidateCurrentLine;
53376: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53377:
53378: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
53379: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
53372: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53373:
53374:
53375: XLA_AE_LINES_PKG.ValidateCurrentLine;
53376: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53377:
53378: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
53379: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
53380: ,p_balance_type_code => l_balance_type_code);
53521: --
53522: -- bulk performance
53523: --
53524: l_balance_type_code VARCHAR2(1);
53525: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
53526: l_log_module VARCHAR2(240);
53527:
53528: --
53529: -- Upgrade strategy
53586: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
53587: l_balance_type_code <> 'B' THEN
53588:
53589: --
53590: XLA_AE_LINES_PKG.SetNewLine;
53591:
53592: p_balance_type_code := l_balance_type_code;
53593: -- set the flag so later we will know whether the gain loss line needs to be created
53594:
53598:
53599: --
53600: -- bulk performance
53601: --
53602: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
53603: p_header_num => 0); -- 4262811
53604: --
53605: -- set accounting line options
53606: --
53603: p_header_num => 0); -- 4262811
53604: --
53605: -- set accounting line options
53606: --
53607: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
53608: p_natural_side_code => 'D'
53609: , p_gain_or_loss_flag => 'N'
53610: , p_gl_transfer_mode_code => 'S'
53611: , p_acct_entry_type_code => 'A'
53617: --
53618: --
53619: -- set accounting line type info
53620: --
53621: xla_ae_lines_pkg.SetAcctLineType
53622: (p_component_type => l_component_type
53623: ,p_event_type_code => l_event_type_code
53624: ,p_line_definition_owner_code => l_line_definition_owner_code
53625: ,p_line_definition_code => l_line_definition_code
53631: ,p_event_class_code => l_event_class_code);
53632: --
53633: -- set accounting class
53634: --
53635: xla_ae_lines_pkg.SetAcctClass(
53636: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
53637: , p_ae_header_id => l_ae_header_id
53638: );
53639:
53639:
53640: --
53641: -- set rounding class
53642: --
53643: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
53644: 'FEDERAL_PROJECT_COST';
53645:
53646: --
53647: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53643: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
53644: 'FEDERAL_PROJECT_COST';
53645:
53646: --
53647: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53648: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53649: --
53650: -- bulk performance
53651: --
53644: 'FEDERAL_PROJECT_COST';
53645:
53646: --
53647: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
53648: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53649: --
53650: -- bulk performance
53651: --
53652: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53648: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
53649: --
53650: -- bulk performance
53651: --
53652: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53653:
53654: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53655: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53656:
53650: -- bulk performance
53651: --
53652: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
53653:
53654: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53655: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53656:
53657: -- 4955764
53658: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53654: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
53655: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
53656:
53657: -- 4955764
53658: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53659: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
53660:
53661: -- 4458381 Public Sector Enh
53662:
53726: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
53727: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
53728: l_rec_acct_attrs.array_char_value(30) := p_source_35;
53729:
53730: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53731: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53732:
53733: ---------------------------------------------------------------------------------------------------------------
53734: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53727: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
53728: l_rec_acct_attrs.array_char_value(30) := p_source_35;
53729:
53730: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53731: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53732:
53733: ---------------------------------------------------------------------------------------------------------------
53734: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53735: ---------------------------------------------------------------------------------------------------------------
53730: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
53731: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
53732:
53733: ---------------------------------------------------------------------------------------------------------------
53734: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53735: ---------------------------------------------------------------------------------------------------------------
53736: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53737:
53738: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53732:
53733: ---------------------------------------------------------------------------------------------------------------
53734: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53735: ---------------------------------------------------------------------------------------------------------------
53736: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53737:
53738: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53739: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53740:
53734: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
53735: ---------------------------------------------------------------------------------------------------------------
53736: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53737:
53738: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53739: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53740:
53741: IF xla_accounting_cache_pkg.GetValueChar
53742: (p_source_code => 'LEDGER_CATEGORY_CODE'
53735: ---------------------------------------------------------------------------------------------------------------
53736: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
53737:
53738: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53739: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
53740:
53741: IF xla_accounting_cache_pkg.GetValueChar
53742: (p_source_code => 'LEDGER_CATEGORY_CODE'
53743: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
53746: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
53747: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
53748: )
53749: THEN
53750: xla_ae_lines_pkg.BflowUpgEntry
53751: (p_business_method_code => l_bflow_method_code
53752: ,p_business_class_code => l_bflow_class_code
53753: ,p_balance_type => l_balance_type_code);
53754: ELSE
53788: , x_value_type_code => l_adr_value_type_code
53789: , p_side => 'NA'
53790: );
53791:
53792: xla_ae_lines_pkg.set_ccid(
53793: p_code_combination_id => l_ccid
53794: , p_value_type_code => l_adr_value_type_code
53795: , p_transaction_coa_id => l_adr_transaction_coa_id
53796: , p_accounting_coa_id => l_adr_accounting_coa_id
53820: );
53821:
53822: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
53823:
53824: xla_ae_lines_pkg.set_segment(
53825: p_to_segment_code => 'GL_ACCOUNT'
53826: , p_segment_value => l_segment
53827: , p_from_segment_code => l_adr_value_segment_code
53828: , p_from_combination_id => l_adr_value_combination_id
53864: xla_accounting_err_pkg.build_message
53865: (p_appli_s_name => 'XLA'
53866: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
53867: ,p_token_1 => 'LINE_NUMBER'
53868: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
53869: ,p_token_2 => 'LINE_TYPE_NAME'
53870: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
53871: l_component_type
53872: ,l_component_code
53900: --
53901: --
53902: ------------------------------------------------------------------------------------------------
53903: -- 4219869 Business Flow
53904: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
53905: -- Prior Entry. Currently, the following code is always generated.
53906: ------------------------------------------------------------------------------------------------
53907: XLA_AE_LINES_PKG.ValidateCurrentLine;
53908:
53903: -- 4219869 Business Flow
53904: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
53905: -- Prior Entry. Currently, the following code is always generated.
53906: ------------------------------------------------------------------------------------------------
53907: XLA_AE_LINES_PKG.ValidateCurrentLine;
53908:
53909: ------------------------------------------------------------------------------------
53910: -- 4219869 Business Flow
53911: -- Populated credit and debit amounts -- Need to generate this within IF
53909: ------------------------------------------------------------------------------------
53910: -- 4219869 Business Flow
53911: -- Populated credit and debit amounts -- Need to generate this within IF
53912: ------------------------------------------------------------------------------------
53913: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53914:
53915: ----------------------------------------------------------------------------------
53916: -- 4219869 Business Flow
53917: -- Update journal entry status -- Need to generate this within IF
53941: -- To allow MPA report to determine if it should generate report process
53942: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
53943: ------------------------------------------------------------------------------------------
53944:
53945: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
53946: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
53947:
53948: --
53949: -- Update the line information that should be overwritten
53942: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
53943: ------------------------------------------------------------------------------------------
53944:
53945: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
53946: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
53947:
53948: --
53949: -- Update the line information that should be overwritten
53950: --
53947:
53948: --
53949: -- Update the line information that should be overwritten
53950: --
53951: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53952: p_header_num => 1);
53953: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53954:
53955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53949: -- Update the line information that should be overwritten
53950: --
53951: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53952: p_header_num => 1);
53953: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53954:
53955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53956:
53957: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53951: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
53952: p_header_num => 1);
53953: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
53954:
53955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53956:
53957: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53958: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
53959: END IF;
53954:
53955: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
53956:
53957: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
53958: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
53959: END IF;
53960:
53961: --
53962: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
53961: --
53962: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
53963: --
53964: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
53965: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
53966: ELSE
53967: ---------------------------------------------------------------------------------------------------
53968: -- 4262811a Switch Sign
53969: ---------------------------------------------------------------------------------------------------
53966: ELSE
53967: ---------------------------------------------------------------------------------------------------
53968: -- 4262811a Switch Sign
53969: ---------------------------------------------------------------------------------------------------
53970: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53967: ---------------------------------------------------------------------------------------------------
53968: -- 4262811a Switch Sign
53969: ---------------------------------------------------------------------------------------------------
53970: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53968: -- 4262811a Switch Sign
53969: ---------------------------------------------------------------------------------------------------
53970: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53976: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53969: ---------------------------------------------------------------------------------------------------
53970: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53976: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53977: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53970: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
53971: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53976: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53977: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53978:
53972: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53976: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53977: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53978:
53979: END IF;
53980:
53973: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
53974: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53975: -- 5132302
53976: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
53977: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
53978:
53979: END IF;
53980:
53981: -- 4955764
53978:
53979: END IF;
53980:
53981: -- 4955764
53982: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53983: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53984:
53985:
53986: XLA_AE_LINES_PKG.ValidateCurrentLine;
53982: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
53983: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53984:
53985:
53986: XLA_AE_LINES_PKG.ValidateCurrentLine;
53987: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53988:
53989: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
53990: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
53983: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
53984:
53985:
53986: XLA_AE_LINES_PKG.ValidateCurrentLine;
53987: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
53988:
53989: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
53990: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
53991: ,p_balance_type_code => l_balance_type_code);
54119: --
54120: -- bulk performance
54121: --
54122: l_balance_type_code VARCHAR2(1);
54123: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
54124: l_log_module VARCHAR2(240);
54125:
54126: --
54127: -- Upgrade strategy
54189: ') = 'N'
54190: THEN
54191:
54192: --
54193: XLA_AE_LINES_PKG.SetNewLine;
54194:
54195: p_balance_type_code := l_balance_type_code;
54196: -- set the flag so later we will know whether the gain loss line needs to be created
54197:
54201:
54202: --
54203: -- bulk performance
54204: --
54205: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
54206: p_header_num => 0); -- 4262811
54207: --
54208: -- set accounting line options
54209: --
54206: p_header_num => 0); -- 4262811
54207: --
54208: -- set accounting line options
54209: --
54210: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
54211: p_natural_side_code => 'D'
54212: , p_gain_or_loss_flag => 'N'
54213: , p_gl_transfer_mode_code => 'S'
54214: , p_acct_entry_type_code => 'A'
54220: --
54221: --
54222: -- set accounting line type info
54223: --
54224: xla_ae_lines_pkg.SetAcctLineType
54225: (p_component_type => l_component_type
54226: ,p_event_type_code => l_event_type_code
54227: ,p_line_definition_owner_code => l_line_definition_owner_code
54228: ,p_line_definition_code => l_line_definition_code
54234: ,p_event_class_code => l_event_class_code);
54235: --
54236: -- set accounting class
54237: --
54238: xla_ae_lines_pkg.SetAcctClass(
54239: p_accounting_class_code => 'REALIZED_GAINS'
54240: , p_ae_header_id => l_ae_header_id
54241: );
54242:
54242:
54243: --
54244: -- set rounding class
54245: --
54246: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
54247: 'REALIZED_GAINS';
54248:
54249: --
54250: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54246: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
54247: 'REALIZED_GAINS';
54248:
54249: --
54250: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54251: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54252: --
54253: -- bulk performance
54254: --
54247: 'REALIZED_GAINS';
54248:
54249: --
54250: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54251: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54252: --
54253: -- bulk performance
54254: --
54255: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54251: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54252: --
54253: -- bulk performance
54254: --
54255: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54256:
54257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54258: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54259:
54253: -- bulk performance
54254: --
54255: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54256:
54257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54258: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54259:
54260: -- 4955764
54261: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54257: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54258: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54259:
54260: -- 4955764
54261: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54262: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
54263:
54264: -- 4458381 Public Sector Enh
54265:
54289: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
54290: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
54291: l_rec_acct_attrs.array_num_value(10) := p_source_43;
54292:
54293: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54294: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54295:
54296: ---------------------------------------------------------------------------------------------------------------
54297: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54290: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
54291: l_rec_acct_attrs.array_num_value(10) := p_source_43;
54292:
54293: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54294: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54295:
54296: ---------------------------------------------------------------------------------------------------------------
54297: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54298: ---------------------------------------------------------------------------------------------------------------
54293: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54294: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54295:
54296: ---------------------------------------------------------------------------------------------------------------
54297: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54298: ---------------------------------------------------------------------------------------------------------------
54299: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54300:
54301: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54295:
54296: ---------------------------------------------------------------------------------------------------------------
54297: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54298: ---------------------------------------------------------------------------------------------------------------
54299: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54300:
54301: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54302: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54303:
54297: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54298: ---------------------------------------------------------------------------------------------------------------
54299: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54300:
54301: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54302: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54303:
54304: IF xla_accounting_cache_pkg.GetValueChar
54305: (p_source_code => 'LEDGER_CATEGORY_CODE'
54298: ---------------------------------------------------------------------------------------------------------------
54299: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54300:
54301: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54302: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54303:
54304: IF xla_accounting_cache_pkg.GetValueChar
54305: (p_source_code => 'LEDGER_CATEGORY_CODE'
54306: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
54309: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
54310: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
54311: )
54312: THEN
54313: xla_ae_lines_pkg.BflowUpgEntry
54314: (p_business_method_code => l_bflow_method_code
54315: ,p_business_class_code => l_bflow_class_code
54316: ,p_balance_type => l_balance_type_code);
54317: ELSE
54349: , x_value_type_code => l_adr_value_type_code
54350: , p_side => 'NA'
54351: );
54352:
54353: xla_ae_lines_pkg.set_ccid(
54354: p_code_combination_id => l_ccid
54355: , p_value_type_code => l_adr_value_type_code
54356: , p_transaction_coa_id => l_adr_transaction_coa_id
54357: , p_accounting_coa_id => l_adr_accounting_coa_id
54385: xla_accounting_err_pkg.build_message
54386: (p_appli_s_name => 'XLA'
54387: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
54388: ,p_token_1 => 'LINE_NUMBER'
54389: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
54390: ,p_token_2 => 'LINE_TYPE_NAME'
54391: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
54392: l_component_type
54393: ,l_component_code
54421: --
54422: --
54423: ------------------------------------------------------------------------------------------------
54424: -- 4219869 Business Flow
54425: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
54426: -- Prior Entry. Currently, the following code is always generated.
54427: ------------------------------------------------------------------------------------------------
54428: XLA_AE_LINES_PKG.ValidateCurrentLine;
54429:
54424: -- 4219869 Business Flow
54425: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
54426: -- Prior Entry. Currently, the following code is always generated.
54427: ------------------------------------------------------------------------------------------------
54428: XLA_AE_LINES_PKG.ValidateCurrentLine;
54429:
54430: ------------------------------------------------------------------------------------
54431: -- 4219869 Business Flow
54432: -- Populated credit and debit amounts -- Need to generate this within IF
54430: ------------------------------------------------------------------------------------
54431: -- 4219869 Business Flow
54432: -- Populated credit and debit amounts -- Need to generate this within IF
54433: ------------------------------------------------------------------------------------
54434: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
54435:
54436: ----------------------------------------------------------------------------------
54437: -- 4219869 Business Flow
54438: -- Update journal entry status -- Need to generate this within IF
54462: -- To allow MPA report to determine if it should generate report process
54463: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
54464: ------------------------------------------------------------------------------------------
54465:
54466: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
54467: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
54468:
54469: --
54470: -- Update the line information that should be overwritten
54463: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
54464: ------------------------------------------------------------------------------------------
54465:
54466: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
54467: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
54468:
54469: --
54470: -- Update the line information that should be overwritten
54471: --
54468:
54469: --
54470: -- Update the line information that should be overwritten
54471: --
54472: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
54473: p_header_num => 1);
54474: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
54475:
54476: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
54470: -- Update the line information that should be overwritten
54471: --
54472: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
54473: p_header_num => 1);
54474: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
54475:
54476: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
54477:
54478: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
54472: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
54473: p_header_num => 1);
54474: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
54475:
54476: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
54477:
54478: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
54479: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
54480: END IF;
54475:
54476: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
54477:
54478: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
54479: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
54480: END IF;
54481:
54482: --
54483: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
54482: --
54483: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
54484: --
54485: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
54486: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
54487: ELSE
54488: ---------------------------------------------------------------------------------------------------
54489: -- 4262811a Switch Sign
54490: ---------------------------------------------------------------------------------------------------
54487: ELSE
54488: ---------------------------------------------------------------------------------------------------
54489: -- 4262811a Switch Sign
54490: ---------------------------------------------------------------------------------------------------
54491: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
54492: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54488: ---------------------------------------------------------------------------------------------------
54489: -- 4262811a Switch Sign
54490: ---------------------------------------------------------------------------------------------------
54491: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
54492: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54489: -- 4262811a Switch Sign
54490: ---------------------------------------------------------------------------------------------------
54491: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
54492: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54497: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
54490: ---------------------------------------------------------------------------------------------------
54491: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
54492: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54497: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
54498: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54491: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
54492: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54497: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
54498: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54499:
54493: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54497: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
54498: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54499:
54500: END IF;
54501:
54494: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
54495: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54496: -- 5132302
54497: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
54498: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
54499:
54500: END IF;
54501:
54502: -- 4955764
54499:
54500: END IF;
54501:
54502: -- 4955764
54503: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54504: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
54505:
54506:
54507: XLA_AE_LINES_PKG.ValidateCurrentLine;
54503: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54504: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
54505:
54506:
54507: XLA_AE_LINES_PKG.ValidateCurrentLine;
54508: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
54509:
54510: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
54511: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
54504: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
54505:
54506:
54507: XLA_AE_LINES_PKG.ValidateCurrentLine;
54508: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
54509:
54510: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
54511: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
54512: ,p_balance_type_code => l_balance_type_code);
54661: --
54662: -- bulk performance
54663: --
54664: l_balance_type_code VARCHAR2(1);
54665: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
54666: l_log_module VARCHAR2(240);
54667:
54668: --
54669: -- Upgrade strategy
54731: ') = 'Y'
54732: THEN
54733:
54734: --
54735: XLA_AE_LINES_PKG.SetNewLine;
54736:
54737: p_balance_type_code := l_balance_type_code;
54738: -- set the flag so later we will know whether the gain loss line needs to be created
54739:
54743:
54744: --
54745: -- bulk performance
54746: --
54747: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
54748: p_header_num => 0); -- 4262811
54749: --
54750: -- set accounting line options
54751: --
54748: p_header_num => 0); -- 4262811
54749: --
54750: -- set accounting line options
54751: --
54752: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
54753: p_natural_side_code => 'D'
54754: , p_gain_or_loss_flag => 'N'
54755: , p_gl_transfer_mode_code => 'S'
54756: , p_acct_entry_type_code => 'A'
54762: --
54763: --
54764: -- set accounting line type info
54765: --
54766: xla_ae_lines_pkg.SetAcctLineType
54767: (p_component_type => l_component_type
54768: ,p_event_type_code => l_event_type_code
54769: ,p_line_definition_owner_code => l_line_definition_owner_code
54770: ,p_line_definition_code => l_line_definition_code
54776: ,p_event_class_code => l_event_class_code);
54777: --
54778: -- set accounting class
54779: --
54780: xla_ae_lines_pkg.SetAcctClass(
54781: p_accounting_class_code => 'REALIZED_GAINS'
54782: , p_ae_header_id => l_ae_header_id
54783: );
54784:
54784:
54785: --
54786: -- set rounding class
54787: --
54788: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
54789: 'REALIZED_GAINS';
54790:
54791: --
54792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54788: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
54789: 'REALIZED_GAINS';
54790:
54791: --
54792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54794: --
54795: -- bulk performance
54796: --
54789: 'REALIZED_GAINS';
54790:
54791: --
54792: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
54793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54794: --
54795: -- bulk performance
54796: --
54797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54793: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
54794: --
54795: -- bulk performance
54796: --
54797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54798:
54799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54801:
54795: -- bulk performance
54796: --
54797: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
54798:
54799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54801:
54802: -- 4955764
54803: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54799: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
54800: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
54801:
54802: -- 4955764
54803: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
54804: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
54805:
54806: -- 4458381 Public Sector Enh
54807:
54873: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
54874: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
54875: l_rec_acct_attrs.array_num_value(31) := p_source_43;
54876:
54877: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54878: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54879:
54880: ---------------------------------------------------------------------------------------------------------------
54881: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54874: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
54875: l_rec_acct_attrs.array_num_value(31) := p_source_43;
54876:
54877: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54878: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54879:
54880: ---------------------------------------------------------------------------------------------------------------
54881: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54882: ---------------------------------------------------------------------------------------------------------------
54877: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
54878: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
54879:
54880: ---------------------------------------------------------------------------------------------------------------
54881: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54882: ---------------------------------------------------------------------------------------------------------------
54883: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54884:
54885: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54879:
54880: ---------------------------------------------------------------------------------------------------------------
54881: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54882: ---------------------------------------------------------------------------------------------------------------
54883: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54884:
54885: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54886: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54887:
54881: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
54882: ---------------------------------------------------------------------------------------------------------------
54883: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54884:
54885: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54886: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54887:
54888: IF xla_accounting_cache_pkg.GetValueChar
54889: (p_source_code => 'LEDGER_CATEGORY_CODE'
54882: ---------------------------------------------------------------------------------------------------------------
54883: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
54884:
54885: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54886: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
54887:
54888: IF xla_accounting_cache_pkg.GetValueChar
54889: (p_source_code => 'LEDGER_CATEGORY_CODE'
54890: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
54893: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
54894: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
54895: )
54896: THEN
54897: xla_ae_lines_pkg.BflowUpgEntry
54898: (p_business_method_code => l_bflow_method_code
54899: ,p_business_class_code => l_bflow_class_code
54900: ,p_balance_type => l_balance_type_code);
54901: ELSE
54899: ,p_business_class_code => l_bflow_class_code
54900: ,p_balance_type => l_balance_type_code);
54901: ELSE
54902: NULL;
54903: XLA_AE_LINES_PKG.business_flow_validation(
54904: p_business_method_code => l_bflow_method_code
54905: ,p_business_class_code => l_bflow_class_code
54906: ,p_inherit_description_flag => l_inherit_desc_flag);
54907: END IF;
54946: xla_accounting_err_pkg.build_message
54947: (p_appli_s_name => 'XLA'
54948: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
54949: ,p_token_1 => 'LINE_NUMBER'
54950: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
54951: ,p_token_2 => 'LINE_TYPE_NAME'
54952: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
54953: l_component_type
54954: ,l_component_code
54982: --
54983: --
54984: ------------------------------------------------------------------------------------------------
54985: -- 4219869 Business Flow
54986: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
54987: -- Prior Entry. Currently, the following code is always generated.
54988: ------------------------------------------------------------------------------------------------
54989: -- No ValidateCurrentLine for business flow method of Prior Entry
54990:
54991: ------------------------------------------------------------------------------------
54992: -- 4219869 Business Flow
54993: -- Populated credit and debit amounts -- Need to generate this within IF
54994: ------------------------------------------------------------------------------------
54995: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
54996:
54997: ----------------------------------------------------------------------------------
54998: -- 4219869 Business Flow
54999: -- Update journal entry status -- Need to generate this within IF
55023: -- To allow MPA report to determine if it should generate report process
55024: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
55025: ------------------------------------------------------------------------------------------
55026:
55027: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
55028: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
55029:
55030: --
55031: -- Update the line information that should be overwritten
55024: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
55025: ------------------------------------------------------------------------------------------
55026:
55027: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
55028: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
55029:
55030: --
55031: -- Update the line information that should be overwritten
55032: --
55029:
55030: --
55031: -- Update the line information that should be overwritten
55032: --
55033: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55034: p_header_num => 1);
55035: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55036:
55037: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55031: -- Update the line information that should be overwritten
55032: --
55033: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55034: p_header_num => 1);
55035: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55036:
55037: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55038:
55039: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55033: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55034: p_header_num => 1);
55035: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55036:
55037: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55038:
55039: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55040: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
55041: END IF;
55036:
55037: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55038:
55039: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55040: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
55041: END IF;
55042:
55043: --
55044: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
55043: --
55044: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
55045: --
55046: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
55047: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
55048: ELSE
55049: ---------------------------------------------------------------------------------------------------
55050: -- 4262811a Switch Sign
55051: ---------------------------------------------------------------------------------------------------
55048: ELSE
55049: ---------------------------------------------------------------------------------------------------
55050: -- 4262811a Switch Sign
55051: ---------------------------------------------------------------------------------------------------
55052: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55053: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55049: ---------------------------------------------------------------------------------------------------
55050: -- 4262811a Switch Sign
55051: ---------------------------------------------------------------------------------------------------
55052: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55053: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55050: -- 4262811a Switch Sign
55051: ---------------------------------------------------------------------------------------------------
55052: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55053: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55058: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55051: ---------------------------------------------------------------------------------------------------
55052: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55053: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55058: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55059: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55052: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55053: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55058: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55059: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55060:
55054: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55058: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55059: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55060:
55061: END IF;
55062:
55055: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55056: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55057: -- 5132302
55058: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55059: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55060:
55061: END IF;
55062:
55063: -- 4955764
55060:
55061: END IF;
55062:
55063: -- 4955764
55064: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55065: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55066:
55067:
55068: XLA_AE_LINES_PKG.ValidateCurrentLine;
55064: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55065: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55066:
55067:
55068: XLA_AE_LINES_PKG.ValidateCurrentLine;
55069: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
55070:
55071: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
55072: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
55065: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55066:
55067:
55068: XLA_AE_LINES_PKG.ValidateCurrentLine;
55069: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
55070:
55071: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
55072: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
55073: ,p_balance_type_code => l_balance_type_code);
55202: --
55203: -- bulk performance
55204: --
55205: l_balance_type_code VARCHAR2(1);
55206: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
55207: l_log_module VARCHAR2(240);
55208:
55209: --
55210: -- Upgrade strategy
55272: ') = 'N'
55273: THEN
55274:
55275: --
55276: XLA_AE_LINES_PKG.SetNewLine;
55277:
55278: p_balance_type_code := l_balance_type_code;
55279: -- set the flag so later we will know whether the gain loss line needs to be created
55280:
55284:
55285: --
55286: -- bulk performance
55287: --
55288: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
55289: p_header_num => 0); -- 4262811
55290: --
55291: -- set accounting line options
55292: --
55289: p_header_num => 0); -- 4262811
55290: --
55291: -- set accounting line options
55292: --
55293: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
55294: p_natural_side_code => 'C'
55295: , p_gain_or_loss_flag => 'N'
55296: , p_gl_transfer_mode_code => 'S'
55297: , p_acct_entry_type_code => 'A'
55303: --
55304: --
55305: -- set accounting line type info
55306: --
55307: xla_ae_lines_pkg.SetAcctLineType
55308: (p_component_type => l_component_type
55309: ,p_event_type_code => l_event_type_code
55310: ,p_line_definition_owner_code => l_line_definition_owner_code
55311: ,p_line_definition_code => l_line_definition_code
55317: ,p_event_class_code => l_event_class_code);
55318: --
55319: -- set accounting class
55320: --
55321: xla_ae_lines_pkg.SetAcctClass(
55322: p_accounting_class_code => 'REALIZED_LOSS'
55323: , p_ae_header_id => l_ae_header_id
55324: );
55325:
55325:
55326: --
55327: -- set rounding class
55328: --
55329: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
55330: 'REALIZED_LOSS';
55331:
55332: --
55333: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55329: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
55330: 'REALIZED_LOSS';
55331:
55332: --
55333: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55334: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55335: --
55336: -- bulk performance
55337: --
55330: 'REALIZED_LOSS';
55331:
55332: --
55333: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55334: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55335: --
55336: -- bulk performance
55337: --
55338: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55334: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55335: --
55336: -- bulk performance
55337: --
55338: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55339:
55340: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55341: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55342:
55336: -- bulk performance
55337: --
55338: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55339:
55340: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55341: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55342:
55343: -- 4955764
55344: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55340: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55341: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55342:
55343: -- 4955764
55344: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55345: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
55346:
55347: -- 4458381 Public Sector Enh
55348:
55372: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
55373: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
55374: l_rec_acct_attrs.array_num_value(10) := p_source_43;
55375:
55376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55378:
55379: ---------------------------------------------------------------------------------------------------------------
55380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55373: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
55374: l_rec_acct_attrs.array_num_value(10) := p_source_43;
55375:
55376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55378:
55379: ---------------------------------------------------------------------------------------------------------------
55380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55381: ---------------------------------------------------------------------------------------------------------------
55376: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55377: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55378:
55379: ---------------------------------------------------------------------------------------------------------------
55380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55381: ---------------------------------------------------------------------------------------------------------------
55382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55383:
55384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55378:
55379: ---------------------------------------------------------------------------------------------------------------
55380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55381: ---------------------------------------------------------------------------------------------------------------
55382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55383:
55384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55386:
55380: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55381: ---------------------------------------------------------------------------------------------------------------
55382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55383:
55384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55386:
55387: IF xla_accounting_cache_pkg.GetValueChar
55388: (p_source_code => 'LEDGER_CATEGORY_CODE'
55381: ---------------------------------------------------------------------------------------------------------------
55382: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55383:
55384: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55385: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55386:
55387: IF xla_accounting_cache_pkg.GetValueChar
55388: (p_source_code => 'LEDGER_CATEGORY_CODE'
55389: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
55392: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
55393: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
55394: )
55395: THEN
55396: xla_ae_lines_pkg.BflowUpgEntry
55397: (p_business_method_code => l_bflow_method_code
55398: ,p_business_class_code => l_bflow_class_code
55399: ,p_balance_type => l_balance_type_code);
55400: ELSE
55432: , x_value_type_code => l_adr_value_type_code
55433: , p_side => 'NA'
55434: );
55435:
55436: xla_ae_lines_pkg.set_ccid(
55437: p_code_combination_id => l_ccid
55438: , p_value_type_code => l_adr_value_type_code
55439: , p_transaction_coa_id => l_adr_transaction_coa_id
55440: , p_accounting_coa_id => l_adr_accounting_coa_id
55468: xla_accounting_err_pkg.build_message
55469: (p_appli_s_name => 'XLA'
55470: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
55471: ,p_token_1 => 'LINE_NUMBER'
55472: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
55473: ,p_token_2 => 'LINE_TYPE_NAME'
55474: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
55475: l_component_type
55476: ,l_component_code
55504: --
55505: --
55506: ------------------------------------------------------------------------------------------------
55507: -- 4219869 Business Flow
55508: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
55509: -- Prior Entry. Currently, the following code is always generated.
55510: ------------------------------------------------------------------------------------------------
55511: XLA_AE_LINES_PKG.ValidateCurrentLine;
55512:
55507: -- 4219869 Business Flow
55508: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
55509: -- Prior Entry. Currently, the following code is always generated.
55510: ------------------------------------------------------------------------------------------------
55511: XLA_AE_LINES_PKG.ValidateCurrentLine;
55512:
55513: ------------------------------------------------------------------------------------
55514: -- 4219869 Business Flow
55515: -- Populated credit and debit amounts -- Need to generate this within IF
55513: ------------------------------------------------------------------------------------
55514: -- 4219869 Business Flow
55515: -- Populated credit and debit amounts -- Need to generate this within IF
55516: ------------------------------------------------------------------------------------
55517: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
55518:
55519: ----------------------------------------------------------------------------------
55520: -- 4219869 Business Flow
55521: -- Update journal entry status -- Need to generate this within IF
55545: -- To allow MPA report to determine if it should generate report process
55546: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
55547: ------------------------------------------------------------------------------------------
55548:
55549: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
55550: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
55551:
55552: --
55553: -- Update the line information that should be overwritten
55546: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
55547: ------------------------------------------------------------------------------------------
55548:
55549: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
55550: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
55551:
55552: --
55553: -- Update the line information that should be overwritten
55554: --
55551:
55552: --
55553: -- Update the line information that should be overwritten
55554: --
55555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55556: p_header_num => 1);
55557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55558:
55559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55553: -- Update the line information that should be overwritten
55554: --
55555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55556: p_header_num => 1);
55557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55558:
55559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55560:
55561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55555: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
55556: p_header_num => 1);
55557: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
55558:
55559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55560:
55561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55562: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
55563: END IF;
55558:
55559: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
55560:
55561: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
55562: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
55563: END IF;
55564:
55565: --
55566: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
55565: --
55566: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
55567: --
55568: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
55569: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
55570: ELSE
55571: ---------------------------------------------------------------------------------------------------
55572: -- 4262811a Switch Sign
55573: ---------------------------------------------------------------------------------------------------
55570: ELSE
55571: ---------------------------------------------------------------------------------------------------
55572: -- 4262811a Switch Sign
55573: ---------------------------------------------------------------------------------------------------
55574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55571: ---------------------------------------------------------------------------------------------------
55572: -- 4262811a Switch Sign
55573: ---------------------------------------------------------------------------------------------------
55574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55572: -- 4262811a Switch Sign
55573: ---------------------------------------------------------------------------------------------------
55574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55573: ---------------------------------------------------------------------------------------------------
55574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55574: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
55575: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55582:
55576: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55582:
55583: END IF;
55584:
55577: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
55578: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55579: -- 5132302
55580: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
55581: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
55582:
55583: END IF;
55584:
55585: -- 4955764
55582:
55583: END IF;
55584:
55585: -- 4955764
55586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55588:
55589:
55590: XLA_AE_LINES_PKG.ValidateCurrentLine;
55586: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55588:
55589:
55590: XLA_AE_LINES_PKG.ValidateCurrentLine;
55591: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
55592:
55593: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
55594: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
55587: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
55588:
55589:
55590: XLA_AE_LINES_PKG.ValidateCurrentLine;
55591: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
55592:
55593: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
55594: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
55595: ,p_balance_type_code => l_balance_type_code);
55744: --
55745: -- bulk performance
55746: --
55747: l_balance_type_code VARCHAR2(1);
55748: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
55749: l_log_module VARCHAR2(240);
55750:
55751: --
55752: -- Upgrade strategy
55814: ') = 'Y'
55815: THEN
55816:
55817: --
55818: XLA_AE_LINES_PKG.SetNewLine;
55819:
55820: p_balance_type_code := l_balance_type_code;
55821: -- set the flag so later we will know whether the gain loss line needs to be created
55822:
55826:
55827: --
55828: -- bulk performance
55829: --
55830: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
55831: p_header_num => 0); -- 4262811
55832: --
55833: -- set accounting line options
55834: --
55831: p_header_num => 0); -- 4262811
55832: --
55833: -- set accounting line options
55834: --
55835: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
55836: p_natural_side_code => 'C'
55837: , p_gain_or_loss_flag => 'N'
55838: , p_gl_transfer_mode_code => 'S'
55839: , p_acct_entry_type_code => 'A'
55845: --
55846: --
55847: -- set accounting line type info
55848: --
55849: xla_ae_lines_pkg.SetAcctLineType
55850: (p_component_type => l_component_type
55851: ,p_event_type_code => l_event_type_code
55852: ,p_line_definition_owner_code => l_line_definition_owner_code
55853: ,p_line_definition_code => l_line_definition_code
55859: ,p_event_class_code => l_event_class_code);
55860: --
55861: -- set accounting class
55862: --
55863: xla_ae_lines_pkg.SetAcctClass(
55864: p_accounting_class_code => 'REALIZED_LOSS'
55865: , p_ae_header_id => l_ae_header_id
55866: );
55867:
55867:
55868: --
55869: -- set rounding class
55870: --
55871: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
55872: 'REALIZED_LOSS';
55873:
55874: --
55875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55871: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
55872: 'REALIZED_LOSS';
55873:
55874: --
55875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55877: --
55878: -- bulk performance
55879: --
55872: 'REALIZED_LOSS';
55873:
55874: --
55875: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
55876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55877: --
55878: -- bulk performance
55879: --
55880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55876: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
55877: --
55878: -- bulk performance
55879: --
55880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55881:
55882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55884:
55878: -- bulk performance
55879: --
55880: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
55881:
55882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55884:
55885: -- 4955764
55886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
55883: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
55884:
55885: -- 4955764
55886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
55887: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
55888:
55889: -- 4458381 Public Sector Enh
55890:
55956: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
55957: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
55958: l_rec_acct_attrs.array_num_value(31) := p_source_43;
55959:
55960: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55961: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55962:
55963: ---------------------------------------------------------------------------------------------------------------
55964: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55957: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
55958: l_rec_acct_attrs.array_num_value(31) := p_source_43;
55959:
55960: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55961: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55962:
55963: ---------------------------------------------------------------------------------------------------------------
55964: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55965: ---------------------------------------------------------------------------------------------------------------
55960: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
55961: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
55962:
55963: ---------------------------------------------------------------------------------------------------------------
55964: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55965: ---------------------------------------------------------------------------------------------------------------
55966: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55967:
55968: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55962:
55963: ---------------------------------------------------------------------------------------------------------------
55964: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55965: ---------------------------------------------------------------------------------------------------------------
55966: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55967:
55968: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55969: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55970:
55964: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
55965: ---------------------------------------------------------------------------------------------------------------
55966: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55967:
55968: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55969: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55970:
55971: IF xla_accounting_cache_pkg.GetValueChar
55972: (p_source_code => 'LEDGER_CATEGORY_CODE'
55965: ---------------------------------------------------------------------------------------------------------------
55966: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
55967:
55968: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55969: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
55970:
55971: IF xla_accounting_cache_pkg.GetValueChar
55972: (p_source_code => 'LEDGER_CATEGORY_CODE'
55973: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
55976: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
55977: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
55978: )
55979: THEN
55980: xla_ae_lines_pkg.BflowUpgEntry
55981: (p_business_method_code => l_bflow_method_code
55982: ,p_business_class_code => l_bflow_class_code
55983: ,p_balance_type => l_balance_type_code);
55984: ELSE
55982: ,p_business_class_code => l_bflow_class_code
55983: ,p_balance_type => l_balance_type_code);
55984: ELSE
55985: NULL;
55986: XLA_AE_LINES_PKG.business_flow_validation(
55987: p_business_method_code => l_bflow_method_code
55988: ,p_business_class_code => l_bflow_class_code
55989: ,p_inherit_description_flag => l_inherit_desc_flag);
55990: END IF;
56029: xla_accounting_err_pkg.build_message
56030: (p_appli_s_name => 'XLA'
56031: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
56032: ,p_token_1 => 'LINE_NUMBER'
56033: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
56034: ,p_token_2 => 'LINE_TYPE_NAME'
56035: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
56036: l_component_type
56037: ,l_component_code
56065: --
56066: --
56067: ------------------------------------------------------------------------------------------------
56068: -- 4219869 Business Flow
56069: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
56070: -- Prior Entry. Currently, the following code is always generated.
56071: ------------------------------------------------------------------------------------------------
56072: -- No ValidateCurrentLine for business flow method of Prior Entry
56073:
56074: ------------------------------------------------------------------------------------
56075: -- 4219869 Business Flow
56076: -- Populated credit and debit amounts -- Need to generate this within IF
56077: ------------------------------------------------------------------------------------
56078: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56079:
56080: ----------------------------------------------------------------------------------
56081: -- 4219869 Business Flow
56082: -- Update journal entry status -- Need to generate this within IF
56106: -- To allow MPA report to determine if it should generate report process
56107: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
56108: ------------------------------------------------------------------------------------------
56109:
56110: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
56111: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
56112:
56113: --
56114: -- Update the line information that should be overwritten
56107: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
56108: ------------------------------------------------------------------------------------------
56109:
56110: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
56111: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
56112:
56113: --
56114: -- Update the line information that should be overwritten
56115: --
56112:
56113: --
56114: -- Update the line information that should be overwritten
56115: --
56116: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56117: p_header_num => 1);
56118: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56119:
56120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56114: -- Update the line information that should be overwritten
56115: --
56116: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56117: p_header_num => 1);
56118: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56119:
56120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56121:
56122: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56116: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56117: p_header_num => 1);
56118: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56119:
56120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56121:
56122: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56123: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
56124: END IF;
56119:
56120: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56121:
56122: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56123: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
56124: END IF;
56125:
56126: --
56127: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
56126: --
56127: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
56128: --
56129: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
56130: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
56131: ELSE
56132: ---------------------------------------------------------------------------------------------------
56133: -- 4262811a Switch Sign
56134: ---------------------------------------------------------------------------------------------------
56131: ELSE
56132: ---------------------------------------------------------------------------------------------------
56133: -- 4262811a Switch Sign
56134: ---------------------------------------------------------------------------------------------------
56135: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56136: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56132: ---------------------------------------------------------------------------------------------------
56133: -- 4262811a Switch Sign
56134: ---------------------------------------------------------------------------------------------------
56135: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56136: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56133: -- 4262811a Switch Sign
56134: ---------------------------------------------------------------------------------------------------
56135: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56136: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56141: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56134: ---------------------------------------------------------------------------------------------------
56135: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56136: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56141: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56135: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56136: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56141: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56143:
56137: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56141: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56143:
56144: END IF;
56145:
56138: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56139: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56140: -- 5132302
56141: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56142: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56143:
56144: END IF;
56145:
56146: -- 4955764
56143:
56144: END IF;
56145:
56146: -- 4955764
56147: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56148: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56149:
56150:
56151: XLA_AE_LINES_PKG.ValidateCurrentLine;
56147: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56148: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56149:
56150:
56151: XLA_AE_LINES_PKG.ValidateCurrentLine;
56152: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56153:
56154: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
56155: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
56148: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56149:
56150:
56151: XLA_AE_LINES_PKG.ValidateCurrentLine;
56152: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56153:
56154: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
56155: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
56156: ,p_balance_type_code => l_balance_type_code);
56301: --
56302: -- bulk performance
56303: --
56304: l_balance_type_code VARCHAR2(1);
56305: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
56306: l_log_module VARCHAR2(240);
56307:
56308: --
56309: -- Upgrade strategy
56372: p_source_73 IS NULL
56373: THEN
56374:
56375: --
56376: XLA_AE_LINES_PKG.SetNewLine;
56377:
56378: p_balance_type_code := l_balance_type_code;
56379: -- set the flag so later we will know whether the gain loss line needs to be created
56380:
56384:
56385: --
56386: -- bulk performance
56387: --
56388: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
56389: p_header_num => 0); -- 4262811
56390: --
56391: -- set accounting line options
56392: --
56389: p_header_num => 0); -- 4262811
56390: --
56391: -- set accounting line options
56392: --
56393: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
56394: p_natural_side_code => 'D'
56395: , p_gain_or_loss_flag => 'N'
56396: , p_gl_transfer_mode_code => 'S'
56397: , p_acct_entry_type_code => 'A'
56403: --
56404: --
56405: -- set accounting line type info
56406: --
56407: xla_ae_lines_pkg.SetAcctLineType
56408: (p_component_type => l_component_type
56409: ,p_event_type_code => l_event_type_code
56410: ,p_line_definition_owner_code => l_line_definition_owner_code
56411: ,p_line_definition_code => l_line_definition_code
56417: ,p_event_class_code => l_event_class_code);
56418: --
56419: -- set accounting class
56420: --
56421: xla_ae_lines_pkg.SetAcctClass(
56422: p_accounting_class_code => 'RECEIVER_COST'
56423: , p_ae_header_id => l_ae_header_id
56424: );
56425:
56425:
56426: --
56427: -- set rounding class
56428: --
56429: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
56430: 'RECEIVER_COST';
56431:
56432: --
56433: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
56429: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
56430: 'RECEIVER_COST';
56431:
56432: --
56433: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
56434: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
56435: --
56436: -- bulk performance
56437: --
56430: 'RECEIVER_COST';
56431:
56432: --
56433: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
56434: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
56435: --
56436: -- bulk performance
56437: --
56438: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
56434: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
56435: --
56436: -- bulk performance
56437: --
56438: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
56439:
56440: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
56441: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
56442:
56436: -- bulk performance
56437: --
56438: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
56439:
56440: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
56441: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
56442:
56443: -- 4955764
56444: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56440: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
56441: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
56442:
56443: -- 4955764
56444: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56445: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
56446:
56447: -- 4458381 Public Sector Enh
56448:
56512: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
56513: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
56514: l_rec_acct_attrs.array_char_value(30) := p_source_35;
56515:
56516: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
56517: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
56518:
56519: ---------------------------------------------------------------------------------------------------------------
56520: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
56513: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
56514: l_rec_acct_attrs.array_char_value(30) := p_source_35;
56515:
56516: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
56517: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
56518:
56519: ---------------------------------------------------------------------------------------------------------------
56520: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
56521: ---------------------------------------------------------------------------------------------------------------
56516: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
56517: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
56518:
56519: ---------------------------------------------------------------------------------------------------------------
56520: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
56521: ---------------------------------------------------------------------------------------------------------------
56522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
56523:
56524: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56518:
56519: ---------------------------------------------------------------------------------------------------------------
56520: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
56521: ---------------------------------------------------------------------------------------------------------------
56522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
56523:
56524: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56525: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56526:
56520: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
56521: ---------------------------------------------------------------------------------------------------------------
56522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
56523:
56524: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56525: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56526:
56527: IF xla_accounting_cache_pkg.GetValueChar
56528: (p_source_code => 'LEDGER_CATEGORY_CODE'
56521: ---------------------------------------------------------------------------------------------------------------
56522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
56523:
56524: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56525: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
56526:
56527: IF xla_accounting_cache_pkg.GetValueChar
56528: (p_source_code => 'LEDGER_CATEGORY_CODE'
56529: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
56532: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
56533: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
56534: )
56535: THEN
56536: xla_ae_lines_pkg.BflowUpgEntry
56537: (p_business_method_code => l_bflow_method_code
56538: ,p_business_class_code => l_bflow_class_code
56539: ,p_balance_type => l_balance_type_code);
56540: ELSE
56574: , x_value_type_code => l_adr_value_type_code
56575: , p_side => 'NA'
56576: );
56577:
56578: xla_ae_lines_pkg.set_ccid(
56579: p_code_combination_id => l_ccid
56580: , p_value_type_code => l_adr_value_type_code
56581: , p_transaction_coa_id => l_adr_transaction_coa_id
56582: , p_accounting_coa_id => l_adr_accounting_coa_id
56610: xla_accounting_err_pkg.build_message
56611: (p_appli_s_name => 'XLA'
56612: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
56613: ,p_token_1 => 'LINE_NUMBER'
56614: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
56615: ,p_token_2 => 'LINE_TYPE_NAME'
56616: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
56617: l_component_type
56618: ,l_component_code
56646: --
56647: --
56648: ------------------------------------------------------------------------------------------------
56649: -- 4219869 Business Flow
56650: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
56651: -- Prior Entry. Currently, the following code is always generated.
56652: ------------------------------------------------------------------------------------------------
56653: XLA_AE_LINES_PKG.ValidateCurrentLine;
56654:
56649: -- 4219869 Business Flow
56650: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
56651: -- Prior Entry. Currently, the following code is always generated.
56652: ------------------------------------------------------------------------------------------------
56653: XLA_AE_LINES_PKG.ValidateCurrentLine;
56654:
56655: ------------------------------------------------------------------------------------
56656: -- 4219869 Business Flow
56657: -- Populated credit and debit amounts -- Need to generate this within IF
56655: ------------------------------------------------------------------------------------
56656: -- 4219869 Business Flow
56657: -- Populated credit and debit amounts -- Need to generate this within IF
56658: ------------------------------------------------------------------------------------
56659: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56660:
56661: ----------------------------------------------------------------------------------
56662: -- 4219869 Business Flow
56663: -- Update journal entry status -- Need to generate this within IF
56687: -- To allow MPA report to determine if it should generate report process
56688: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
56689: ------------------------------------------------------------------------------------------
56690:
56691: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
56692: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
56693:
56694: --
56695: -- Update the line information that should be overwritten
56688: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
56689: ------------------------------------------------------------------------------------------
56690:
56691: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
56692: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
56693:
56694: --
56695: -- Update the line information that should be overwritten
56696: --
56693:
56694: --
56695: -- Update the line information that should be overwritten
56696: --
56697: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56698: p_header_num => 1);
56699: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56700:
56701: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56695: -- Update the line information that should be overwritten
56696: --
56697: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56698: p_header_num => 1);
56699: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56700:
56701: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56702:
56703: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56697: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
56698: p_header_num => 1);
56699: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
56700:
56701: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56702:
56703: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56704: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
56705: END IF;
56700:
56701: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
56702:
56703: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
56704: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
56705: END IF;
56706:
56707: --
56708: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
56707: --
56708: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
56709: --
56710: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
56711: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
56712: ELSE
56713: ---------------------------------------------------------------------------------------------------
56714: -- 4262811a Switch Sign
56715: ---------------------------------------------------------------------------------------------------
56712: ELSE
56713: ---------------------------------------------------------------------------------------------------
56714: -- 4262811a Switch Sign
56715: ---------------------------------------------------------------------------------------------------
56716: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56713: ---------------------------------------------------------------------------------------------------
56714: -- 4262811a Switch Sign
56715: ---------------------------------------------------------------------------------------------------
56716: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56714: -- 4262811a Switch Sign
56715: ---------------------------------------------------------------------------------------------------
56716: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56715: ---------------------------------------------------------------------------------------------------
56716: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56716: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
56717: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56724:
56718: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56724:
56725: END IF;
56726:
56719: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
56720: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56721: -- 5132302
56722: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
56723: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
56724:
56725: END IF;
56726:
56727: -- 4955764
56724:
56725: END IF;
56726:
56727: -- 4955764
56728: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56729: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56730:
56731:
56732: XLA_AE_LINES_PKG.ValidateCurrentLine;
56728: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
56729: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56730:
56731:
56732: XLA_AE_LINES_PKG.ValidateCurrentLine;
56733: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56734:
56735: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
56736: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
56729: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
56730:
56731:
56732: XLA_AE_LINES_PKG.ValidateCurrentLine;
56733: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
56734:
56735: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
56736: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
56737: ,p_balance_type_code => l_balance_type_code);
56882: --
56883: -- bulk performance
56884: --
56885: l_balance_type_code VARCHAR2(1);
56886: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
56887: l_log_module VARCHAR2(240);
56888:
56889: --
56890: -- Upgrade strategy
56953: p_source_73 IS NULL
56954: THEN
56955:
56956: --
56957: XLA_AE_LINES_PKG.SetNewLine;
56958:
56959: p_balance_type_code := l_balance_type_code;
56960: -- set the flag so later we will know whether the gain loss line needs to be created
56961:
56965:
56966: --
56967: -- bulk performance
56968: --
56969: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
56970: p_header_num => 0); -- 4262811
56971: --
56972: -- set accounting line options
56973: --
56970: p_header_num => 0); -- 4262811
56971: --
56972: -- set accounting line options
56973: --
56974: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
56975: p_natural_side_code => 'D'
56976: , p_gain_or_loss_flag => 'N'
56977: , p_gl_transfer_mode_code => 'S'
56978: , p_acct_entry_type_code => 'A'
56984: --
56985: --
56986: -- set accounting line type info
56987: --
56988: xla_ae_lines_pkg.SetAcctLineType
56989: (p_component_type => l_component_type
56990: ,p_event_type_code => l_event_type_code
56991: ,p_line_definition_owner_code => l_line_definition_owner_code
56992: ,p_line_definition_code => l_line_definition_code
56998: ,p_event_class_code => l_event_class_code);
56999: --
57000: -- set accounting class
57001: --
57002: xla_ae_lines_pkg.SetAcctClass(
57003: p_accounting_class_code => 'RECEIVER_COST'
57004: , p_ae_header_id => l_ae_header_id
57005: );
57006:
57006:
57007: --
57008: -- set rounding class
57009: --
57010: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
57011: 'RECEIVER_COST';
57012:
57013: --
57014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57010: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
57011: 'RECEIVER_COST';
57012:
57013: --
57014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57016: --
57017: -- bulk performance
57018: --
57011: 'RECEIVER_COST';
57012:
57013: --
57014: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57016: --
57017: -- bulk performance
57018: --
57019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57015: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57016: --
57017: -- bulk performance
57018: --
57019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57020:
57021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57023:
57017: -- bulk performance
57018: --
57019: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57020:
57021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57023:
57024: -- 4955764
57025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57021: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57022: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57023:
57024: -- 4955764
57025: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57026: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
57027:
57028: -- 4458381 Public Sector Enh
57029:
57093: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
57094: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
57095: l_rec_acct_attrs.array_char_value(30) := p_source_35;
57096:
57097: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57098: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57099:
57100: ---------------------------------------------------------------------------------------------------------------
57101: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57094: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
57095: l_rec_acct_attrs.array_char_value(30) := p_source_35;
57096:
57097: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57098: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57099:
57100: ---------------------------------------------------------------------------------------------------------------
57101: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57102: ---------------------------------------------------------------------------------------------------------------
57097: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57098: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57099:
57100: ---------------------------------------------------------------------------------------------------------------
57101: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57102: ---------------------------------------------------------------------------------------------------------------
57103: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57104:
57105: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57099:
57100: ---------------------------------------------------------------------------------------------------------------
57101: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57102: ---------------------------------------------------------------------------------------------------------------
57103: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57104:
57105: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57106: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57107:
57101: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57102: ---------------------------------------------------------------------------------------------------------------
57103: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57104:
57105: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57106: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57107:
57108: IF xla_accounting_cache_pkg.GetValueChar
57109: (p_source_code => 'LEDGER_CATEGORY_CODE'
57102: ---------------------------------------------------------------------------------------------------------------
57103: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57104:
57105: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57106: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57107:
57108: IF xla_accounting_cache_pkg.GetValueChar
57109: (p_source_code => 'LEDGER_CATEGORY_CODE'
57110: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
57113: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
57114: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
57115: )
57116: THEN
57117: xla_ae_lines_pkg.BflowUpgEntry
57118: (p_business_method_code => l_bflow_method_code
57119: ,p_business_class_code => l_bflow_class_code
57120: ,p_balance_type => l_balance_type_code);
57121: ELSE
57154: , x_value_type_code => l_adr_value_type_code
57155: , p_side => 'NA'
57156: );
57157:
57158: xla_ae_lines_pkg.set_ccid(
57159: p_code_combination_id => l_ccid
57160: , p_value_type_code => l_adr_value_type_code
57161: , p_transaction_coa_id => l_adr_transaction_coa_id
57162: , p_accounting_coa_id => l_adr_accounting_coa_id
57190: xla_accounting_err_pkg.build_message
57191: (p_appli_s_name => 'XLA'
57192: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
57193: ,p_token_1 => 'LINE_NUMBER'
57194: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
57195: ,p_token_2 => 'LINE_TYPE_NAME'
57196: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
57197: l_component_type
57198: ,l_component_code
57226: --
57227: --
57228: ------------------------------------------------------------------------------------------------
57229: -- 4219869 Business Flow
57230: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
57231: -- Prior Entry. Currently, the following code is always generated.
57232: ------------------------------------------------------------------------------------------------
57233: XLA_AE_LINES_PKG.ValidateCurrentLine;
57234:
57229: -- 4219869 Business Flow
57230: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
57231: -- Prior Entry. Currently, the following code is always generated.
57232: ------------------------------------------------------------------------------------------------
57233: XLA_AE_LINES_PKG.ValidateCurrentLine;
57234:
57235: ------------------------------------------------------------------------------------
57236: -- 4219869 Business Flow
57237: -- Populated credit and debit amounts -- Need to generate this within IF
57235: ------------------------------------------------------------------------------------
57236: -- 4219869 Business Flow
57237: -- Populated credit and debit amounts -- Need to generate this within IF
57238: ------------------------------------------------------------------------------------
57239: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57240:
57241: ----------------------------------------------------------------------------------
57242: -- 4219869 Business Flow
57243: -- Update journal entry status -- Need to generate this within IF
57267: -- To allow MPA report to determine if it should generate report process
57268: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
57269: ------------------------------------------------------------------------------------------
57270:
57271: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
57272: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
57273:
57274: --
57275: -- Update the line information that should be overwritten
57268: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
57269: ------------------------------------------------------------------------------------------
57270:
57271: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
57272: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
57273:
57274: --
57275: -- Update the line information that should be overwritten
57276: --
57273:
57274: --
57275: -- Update the line information that should be overwritten
57276: --
57277: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57278: p_header_num => 1);
57279: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57280:
57281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57275: -- Update the line information that should be overwritten
57276: --
57277: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57278: p_header_num => 1);
57279: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57280:
57281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57282:
57283: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57277: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57278: p_header_num => 1);
57279: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57280:
57281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57282:
57283: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57284: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
57285: END IF;
57280:
57281: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57282:
57283: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57284: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
57285: END IF;
57286:
57287: --
57288: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
57287: --
57288: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
57289: --
57290: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
57291: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
57292: ELSE
57293: ---------------------------------------------------------------------------------------------------
57294: -- 4262811a Switch Sign
57295: ---------------------------------------------------------------------------------------------------
57292: ELSE
57293: ---------------------------------------------------------------------------------------------------
57294: -- 4262811a Switch Sign
57295: ---------------------------------------------------------------------------------------------------
57296: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57293: ---------------------------------------------------------------------------------------------------
57294: -- 4262811a Switch Sign
57295: ---------------------------------------------------------------------------------------------------
57296: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57294: -- 4262811a Switch Sign
57295: ---------------------------------------------------------------------------------------------------
57296: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57295: ---------------------------------------------------------------------------------------------------
57296: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57303: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57296: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57297: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57303: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57304:
57298: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57303: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57304:
57305: END IF;
57306:
57299: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57300: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57301: -- 5132302
57302: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57303: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57304:
57305: END IF;
57306:
57307: -- 4955764
57304:
57305: END IF;
57306:
57307: -- 4955764
57308: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57309: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57310:
57311:
57312: XLA_AE_LINES_PKG.ValidateCurrentLine;
57308: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57309: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57310:
57311:
57312: XLA_AE_LINES_PKG.ValidateCurrentLine;
57313: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57314:
57315: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
57316: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
57309: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57310:
57311:
57312: XLA_AE_LINES_PKG.ValidateCurrentLine;
57313: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57314:
57315: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
57316: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
57317: ,p_balance_type_code => l_balance_type_code);
57462: --
57463: -- bulk performance
57464: --
57465: l_balance_type_code VARCHAR2(1);
57466: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
57467: l_log_module VARCHAR2(240);
57468:
57469: --
57470: -- Upgrade strategy
57530: ') = 'REVENUE_TRANSFER'
57531: THEN
57532:
57533: --
57534: XLA_AE_LINES_PKG.SetNewLine;
57535:
57536: p_balance_type_code := l_balance_type_code;
57537: -- set the flag so later we will know whether the gain loss line needs to be created
57538:
57542:
57543: --
57544: -- bulk performance
57545: --
57546: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
57547: p_header_num => 0); -- 4262811
57548: --
57549: -- set accounting line options
57550: --
57547: p_header_num => 0); -- 4262811
57548: --
57549: -- set accounting line options
57550: --
57551: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
57552: p_natural_side_code => 'D'
57553: , p_gain_or_loss_flag => 'N'
57554: , p_gl_transfer_mode_code => 'S'
57555: , p_acct_entry_type_code => 'A'
57561: --
57562: --
57563: -- set accounting line type info
57564: --
57565: xla_ae_lines_pkg.SetAcctLineType
57566: (p_component_type => l_component_type
57567: ,p_event_type_code => l_event_type_code
57568: ,p_line_definition_owner_code => l_line_definition_owner_code
57569: ,p_line_definition_code => l_line_definition_code
57575: ,p_event_class_code => l_event_class_code);
57576: --
57577: -- set accounting class
57578: --
57579: xla_ae_lines_pkg.SetAcctClass(
57580: p_accounting_class_code => 'RECEIVER_REVENUE'
57581: , p_ae_header_id => l_ae_header_id
57582: );
57583:
57583:
57584: --
57585: -- set rounding class
57586: --
57587: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
57588: 'RECEIVER_REVENUE';
57589:
57590: --
57591: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57587: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
57588: 'RECEIVER_REVENUE';
57589:
57590: --
57591: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57592: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57593: --
57594: -- bulk performance
57595: --
57588: 'RECEIVER_REVENUE';
57589:
57590: --
57591: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
57592: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57593: --
57594: -- bulk performance
57595: --
57596: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57592: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
57593: --
57594: -- bulk performance
57595: --
57596: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57597:
57598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57599: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57600:
57594: -- bulk performance
57595: --
57596: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
57597:
57598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57599: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57600:
57601: -- 4955764
57602: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57598: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
57599: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
57600:
57601: -- 4955764
57602: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57603: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
57604:
57605: -- 4458381 Public Sector Enh
57606:
57670: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
57671: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
57672: l_rec_acct_attrs.array_char_value(30) := p_source_35;
57673:
57674: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57675: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57676:
57677: ---------------------------------------------------------------------------------------------------------------
57678: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57671: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
57672: l_rec_acct_attrs.array_char_value(30) := p_source_35;
57673:
57674: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57675: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57676:
57677: ---------------------------------------------------------------------------------------------------------------
57678: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57679: ---------------------------------------------------------------------------------------------------------------
57674: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
57675: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
57676:
57677: ---------------------------------------------------------------------------------------------------------------
57678: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57679: ---------------------------------------------------------------------------------------------------------------
57680: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57681:
57682: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57676:
57677: ---------------------------------------------------------------------------------------------------------------
57678: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57679: ---------------------------------------------------------------------------------------------------------------
57680: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57681:
57682: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57683: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57684:
57678: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
57679: ---------------------------------------------------------------------------------------------------------------
57680: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57681:
57682: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57683: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57684:
57685: IF xla_accounting_cache_pkg.GetValueChar
57686: (p_source_code => 'LEDGER_CATEGORY_CODE'
57679: ---------------------------------------------------------------------------------------------------------------
57680: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
57681:
57682: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57683: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
57684:
57685: IF xla_accounting_cache_pkg.GetValueChar
57686: (p_source_code => 'LEDGER_CATEGORY_CODE'
57687: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
57690: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
57691: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
57692: )
57693: THEN
57694: xla_ae_lines_pkg.BflowUpgEntry
57695: (p_business_method_code => l_bflow_method_code
57696: ,p_business_class_code => l_bflow_class_code
57697: ,p_balance_type => l_balance_type_code);
57698: ELSE
57732: , x_value_type_code => l_adr_value_type_code
57733: , p_side => 'NA'
57734: );
57735:
57736: xla_ae_lines_pkg.set_ccid(
57737: p_code_combination_id => l_ccid
57738: , p_value_type_code => l_adr_value_type_code
57739: , p_transaction_coa_id => l_adr_transaction_coa_id
57740: , p_accounting_coa_id => l_adr_accounting_coa_id
57768: xla_accounting_err_pkg.build_message
57769: (p_appli_s_name => 'XLA'
57770: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
57771: ,p_token_1 => 'LINE_NUMBER'
57772: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
57773: ,p_token_2 => 'LINE_TYPE_NAME'
57774: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
57775: l_component_type
57776: ,l_component_code
57804: --
57805: --
57806: ------------------------------------------------------------------------------------------------
57807: -- 4219869 Business Flow
57808: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
57809: -- Prior Entry. Currently, the following code is always generated.
57810: ------------------------------------------------------------------------------------------------
57811: XLA_AE_LINES_PKG.ValidateCurrentLine;
57812:
57807: -- 4219869 Business Flow
57808: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
57809: -- Prior Entry. Currently, the following code is always generated.
57810: ------------------------------------------------------------------------------------------------
57811: XLA_AE_LINES_PKG.ValidateCurrentLine;
57812:
57813: ------------------------------------------------------------------------------------
57814: -- 4219869 Business Flow
57815: -- Populated credit and debit amounts -- Need to generate this within IF
57813: ------------------------------------------------------------------------------------
57814: -- 4219869 Business Flow
57815: -- Populated credit and debit amounts -- Need to generate this within IF
57816: ------------------------------------------------------------------------------------
57817: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57818:
57819: ----------------------------------------------------------------------------------
57820: -- 4219869 Business Flow
57821: -- Update journal entry status -- Need to generate this within IF
57845: -- To allow MPA report to determine if it should generate report process
57846: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
57847: ------------------------------------------------------------------------------------------
57848:
57849: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
57850: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
57851:
57852: --
57853: -- Update the line information that should be overwritten
57846: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
57847: ------------------------------------------------------------------------------------------
57848:
57849: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
57850: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
57851:
57852: --
57853: -- Update the line information that should be overwritten
57854: --
57851:
57852: --
57853: -- Update the line information that should be overwritten
57854: --
57855: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57856: p_header_num => 1);
57857: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57858:
57859: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57853: -- Update the line information that should be overwritten
57854: --
57855: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57856: p_header_num => 1);
57857: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57858:
57859: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57860:
57861: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57855: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
57856: p_header_num => 1);
57857: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
57858:
57859: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57860:
57861: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57862: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
57863: END IF;
57858:
57859: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
57860:
57861: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
57862: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
57863: END IF;
57864:
57865: --
57866: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
57865: --
57866: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
57867: --
57868: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
57869: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
57870: ELSE
57871: ---------------------------------------------------------------------------------------------------
57872: -- 4262811a Switch Sign
57873: ---------------------------------------------------------------------------------------------------
57870: ELSE
57871: ---------------------------------------------------------------------------------------------------
57872: -- 4262811a Switch Sign
57873: ---------------------------------------------------------------------------------------------------
57874: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57871: ---------------------------------------------------------------------------------------------------
57872: -- 4262811a Switch Sign
57873: ---------------------------------------------------------------------------------------------------
57874: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57872: -- 4262811a Switch Sign
57873: ---------------------------------------------------------------------------------------------------
57874: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57880: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57873: ---------------------------------------------------------------------------------------------------
57874: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57880: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57874: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
57875: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57880: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57882:
57876: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57880: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57882:
57883: END IF;
57884:
57877: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
57878: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57879: -- 5132302
57880: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
57881: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
57882:
57883: END IF;
57884:
57885: -- 4955764
57882:
57883: END IF;
57884:
57885: -- 4955764
57886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57887: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57888:
57889:
57890: XLA_AE_LINES_PKG.ValidateCurrentLine;
57886: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
57887: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57888:
57889:
57890: XLA_AE_LINES_PKG.ValidateCurrentLine;
57891: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57892:
57893: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
57894: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
57887: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
57888:
57889:
57890: XLA_AE_LINES_PKG.ValidateCurrentLine;
57891: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
57892:
57893: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
57894: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
57895: ,p_balance_type_code => l_balance_type_code);
58040: --
58041: -- bulk performance
58042: --
58043: l_balance_type_code VARCHAR2(1);
58044: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
58045: l_log_module VARCHAR2(240);
58046:
58047: --
58048: -- Upgrade strategy
58108: ') = 'REVENUE_TRANSFER'
58109: THEN
58110:
58111: --
58112: XLA_AE_LINES_PKG.SetNewLine;
58113:
58114: p_balance_type_code := l_balance_type_code;
58115: -- set the flag so later we will know whether the gain loss line needs to be created
58116:
58120:
58121: --
58122: -- bulk performance
58123: --
58124: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
58125: p_header_num => 0); -- 4262811
58126: --
58127: -- set accounting line options
58128: --
58125: p_header_num => 0); -- 4262811
58126: --
58127: -- set accounting line options
58128: --
58129: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
58130: p_natural_side_code => 'D'
58131: , p_gain_or_loss_flag => 'N'
58132: , p_gl_transfer_mode_code => 'S'
58133: , p_acct_entry_type_code => 'A'
58139: --
58140: --
58141: -- set accounting line type info
58142: --
58143: xla_ae_lines_pkg.SetAcctLineType
58144: (p_component_type => l_component_type
58145: ,p_event_type_code => l_event_type_code
58146: ,p_line_definition_owner_code => l_line_definition_owner_code
58147: ,p_line_definition_code => l_line_definition_code
58153: ,p_event_class_code => l_event_class_code);
58154: --
58155: -- set accounting class
58156: --
58157: xla_ae_lines_pkg.SetAcctClass(
58158: p_accounting_class_code => 'RECEIVER_REVENUE'
58159: , p_ae_header_id => l_ae_header_id
58160: );
58161:
58161:
58162: --
58163: -- set rounding class
58164: --
58165: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
58166: 'RECEIVER_REVENUE';
58167:
58168: --
58169: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58165: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
58166: 'RECEIVER_REVENUE';
58167:
58168: --
58169: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58170: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58171: --
58172: -- bulk performance
58173: --
58166: 'RECEIVER_REVENUE';
58167:
58168: --
58169: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58170: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58171: --
58172: -- bulk performance
58173: --
58174: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58170: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58171: --
58172: -- bulk performance
58173: --
58174: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58175:
58176: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58177: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58178:
58172: -- bulk performance
58173: --
58174: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58175:
58176: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58177: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58178:
58179: -- 4955764
58180: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58176: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58177: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58178:
58179: -- 4955764
58180: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58181: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
58182:
58183: -- 4458381 Public Sector Enh
58184:
58248: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
58249: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
58250: l_rec_acct_attrs.array_char_value(30) := p_source_35;
58251:
58252: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58253: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58254:
58255: ---------------------------------------------------------------------------------------------------------------
58256: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58249: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
58250: l_rec_acct_attrs.array_char_value(30) := p_source_35;
58251:
58252: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58253: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58254:
58255: ---------------------------------------------------------------------------------------------------------------
58256: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58257: ---------------------------------------------------------------------------------------------------------------
58252: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58253: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58254:
58255: ---------------------------------------------------------------------------------------------------------------
58256: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58257: ---------------------------------------------------------------------------------------------------------------
58258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58259:
58260: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58254:
58255: ---------------------------------------------------------------------------------------------------------------
58256: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58257: ---------------------------------------------------------------------------------------------------------------
58258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58259:
58260: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58261: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58262:
58256: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58257: ---------------------------------------------------------------------------------------------------------------
58258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58259:
58260: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58261: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58262:
58263: IF xla_accounting_cache_pkg.GetValueChar
58264: (p_source_code => 'LEDGER_CATEGORY_CODE'
58257: ---------------------------------------------------------------------------------------------------------------
58258: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58259:
58260: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58261: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58262:
58263: IF xla_accounting_cache_pkg.GetValueChar
58264: (p_source_code => 'LEDGER_CATEGORY_CODE'
58265: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
58268: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
58269: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
58270: )
58271: THEN
58272: xla_ae_lines_pkg.BflowUpgEntry
58273: (p_business_method_code => l_bflow_method_code
58274: ,p_business_class_code => l_bflow_class_code
58275: ,p_balance_type => l_balance_type_code);
58276: ELSE
58309: , x_value_type_code => l_adr_value_type_code
58310: , p_side => 'NA'
58311: );
58312:
58313: xla_ae_lines_pkg.set_ccid(
58314: p_code_combination_id => l_ccid
58315: , p_value_type_code => l_adr_value_type_code
58316: , p_transaction_coa_id => l_adr_transaction_coa_id
58317: , p_accounting_coa_id => l_adr_accounting_coa_id
58345: xla_accounting_err_pkg.build_message
58346: (p_appli_s_name => 'XLA'
58347: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
58348: ,p_token_1 => 'LINE_NUMBER'
58349: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
58350: ,p_token_2 => 'LINE_TYPE_NAME'
58351: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
58352: l_component_type
58353: ,l_component_code
58381: --
58382: --
58383: ------------------------------------------------------------------------------------------------
58384: -- 4219869 Business Flow
58385: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
58386: -- Prior Entry. Currently, the following code is always generated.
58387: ------------------------------------------------------------------------------------------------
58388: XLA_AE_LINES_PKG.ValidateCurrentLine;
58389:
58384: -- 4219869 Business Flow
58385: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
58386: -- Prior Entry. Currently, the following code is always generated.
58387: ------------------------------------------------------------------------------------------------
58388: XLA_AE_LINES_PKG.ValidateCurrentLine;
58389:
58390: ------------------------------------------------------------------------------------
58391: -- 4219869 Business Flow
58392: -- Populated credit and debit amounts -- Need to generate this within IF
58390: ------------------------------------------------------------------------------------
58391: -- 4219869 Business Flow
58392: -- Populated credit and debit amounts -- Need to generate this within IF
58393: ------------------------------------------------------------------------------------
58394: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
58395:
58396: ----------------------------------------------------------------------------------
58397: -- 4219869 Business Flow
58398: -- Update journal entry status -- Need to generate this within IF
58422: -- To allow MPA report to determine if it should generate report process
58423: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
58424: ------------------------------------------------------------------------------------------
58425:
58426: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
58427: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
58428:
58429: --
58430: -- Update the line information that should be overwritten
58423: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
58424: ------------------------------------------------------------------------------------------
58425:
58426: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
58427: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
58428:
58429: --
58430: -- Update the line information that should be overwritten
58431: --
58428:
58429: --
58430: -- Update the line information that should be overwritten
58431: --
58432: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
58433: p_header_num => 1);
58434: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
58435:
58436: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
58430: -- Update the line information that should be overwritten
58431: --
58432: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
58433: p_header_num => 1);
58434: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
58435:
58436: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
58437:
58438: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
58432: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
58433: p_header_num => 1);
58434: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
58435:
58436: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
58437:
58438: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
58439: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
58440: END IF;
58435:
58436: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
58437:
58438: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
58439: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
58440: END IF;
58441:
58442: --
58443: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
58442: --
58443: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
58444: --
58445: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
58446: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
58447: ELSE
58448: ---------------------------------------------------------------------------------------------------
58449: -- 4262811a Switch Sign
58450: ---------------------------------------------------------------------------------------------------
58447: ELSE
58448: ---------------------------------------------------------------------------------------------------
58449: -- 4262811a Switch Sign
58450: ---------------------------------------------------------------------------------------------------
58451: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
58452: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58448: ---------------------------------------------------------------------------------------------------
58449: -- 4262811a Switch Sign
58450: ---------------------------------------------------------------------------------------------------
58451: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
58452: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58449: -- 4262811a Switch Sign
58450: ---------------------------------------------------------------------------------------------------
58451: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
58452: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58457: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
58450: ---------------------------------------------------------------------------------------------------
58451: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
58452: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58457: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
58458: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58451: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
58452: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58457: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
58458: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58459:
58453: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58457: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
58458: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58459:
58460: END IF;
58461:
58454: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
58455: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58456: -- 5132302
58457: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
58458: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
58459:
58460: END IF;
58461:
58462: -- 4955764
58459:
58460: END IF;
58461:
58462: -- 4955764
58463: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58464: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
58465:
58466:
58467: XLA_AE_LINES_PKG.ValidateCurrentLine;
58463: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58464: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
58465:
58466:
58467: XLA_AE_LINES_PKG.ValidateCurrentLine;
58468: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
58469:
58470: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
58471: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
58464: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
58465:
58466:
58467: XLA_AE_LINES_PKG.ValidateCurrentLine;
58468: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
58469:
58470: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
58471: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
58472: ,p_balance_type_code => l_balance_type_code);
58614: --
58615: -- bulk performance
58616: --
58617: l_balance_type_code VARCHAR2(1);
58618: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
58619: l_log_module VARCHAR2(240);
58620:
58621: --
58622: -- Upgrade strategy
58679: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
58680: l_balance_type_code <> 'B' THEN
58681:
58682: --
58683: XLA_AE_LINES_PKG.SetNewLine;
58684:
58685: p_balance_type_code := l_balance_type_code;
58686: -- set the flag so later we will know whether the gain loss line needs to be created
58687:
58691:
58692: --
58693: -- bulk performance
58694: --
58695: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
58696: p_header_num => 0); -- 4262811
58697: --
58698: -- set accounting line options
58699: --
58696: p_header_num => 0); -- 4262811
58697: --
58698: -- set accounting line options
58699: --
58700: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
58701: p_natural_side_code => 'D'
58702: , p_gain_or_loss_flag => 'N'
58703: , p_gl_transfer_mode_code => 'S'
58704: , p_acct_entry_type_code => 'A'
58710: --
58711: --
58712: -- set accounting line type info
58713: --
58714: xla_ae_lines_pkg.SetAcctLineType
58715: (p_component_type => l_component_type
58716: ,p_event_type_code => l_event_type_code
58717: ,p_line_definition_owner_code => l_line_definition_owner_code
58718: ,p_line_definition_code => l_line_definition_code
58724: ,p_event_class_code => l_event_class_code);
58725: --
58726: -- set accounting class
58727: --
58728: xla_ae_lines_pkg.SetAcctClass(
58729: p_accounting_class_code => 'RECLASS_DESTINATION'
58730: , p_ae_header_id => l_ae_header_id
58731: );
58732:
58732:
58733: --
58734: -- set rounding class
58735: --
58736: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
58737: 'RECLASS_DESTINATION';
58738:
58739: --
58740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58736: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
58737: 'RECLASS_DESTINATION';
58738:
58739: --
58740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58742: --
58743: -- bulk performance
58744: --
58737: 'RECLASS_DESTINATION';
58738:
58739: --
58740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
58741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58742: --
58743: -- bulk performance
58744: --
58745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
58742: --
58743: -- bulk performance
58744: --
58745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58746:
58747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58749:
58743: -- bulk performance
58744: --
58745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
58746:
58747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58749:
58750: -- 4955764
58751: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
58748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
58749:
58750: -- 4955764
58751: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
58752: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
58753:
58754: -- 4458381 Public Sector Enh
58755:
58819: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
58820: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
58821: l_rec_acct_attrs.array_char_value(30) := p_source_35;
58822:
58823: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58824: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58825:
58826: ---------------------------------------------------------------------------------------------------------------
58827: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58820: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
58821: l_rec_acct_attrs.array_char_value(30) := p_source_35;
58822:
58823: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58824: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58825:
58826: ---------------------------------------------------------------------------------------------------------------
58827: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58828: ---------------------------------------------------------------------------------------------------------------
58823: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
58824: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
58825:
58826: ---------------------------------------------------------------------------------------------------------------
58827: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58828: ---------------------------------------------------------------------------------------------------------------
58829: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58830:
58831: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58825:
58826: ---------------------------------------------------------------------------------------------------------------
58827: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58828: ---------------------------------------------------------------------------------------------------------------
58829: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58830:
58831: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58832: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58833:
58827: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
58828: ---------------------------------------------------------------------------------------------------------------
58829: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58830:
58831: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58832: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58833:
58834: IF xla_accounting_cache_pkg.GetValueChar
58835: (p_source_code => 'LEDGER_CATEGORY_CODE'
58828: ---------------------------------------------------------------------------------------------------------------
58829: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
58830:
58831: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58832: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
58833:
58834: IF xla_accounting_cache_pkg.GetValueChar
58835: (p_source_code => 'LEDGER_CATEGORY_CODE'
58836: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
58839: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
58840: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
58841: )
58842: THEN
58843: xla_ae_lines_pkg.BflowUpgEntry
58844: (p_business_method_code => l_bflow_method_code
58845: ,p_business_class_code => l_bflow_class_code
58846: ,p_balance_type => l_balance_type_code);
58847: ELSE
58881: , x_value_type_code => l_adr_value_type_code
58882: , p_side => 'NA'
58883: );
58884:
58885: xla_ae_lines_pkg.set_ccid(
58886: p_code_combination_id => l_ccid
58887: , p_value_type_code => l_adr_value_type_code
58888: , p_transaction_coa_id => l_adr_transaction_coa_id
58889: , p_accounting_coa_id => l_adr_accounting_coa_id
58917: xla_accounting_err_pkg.build_message
58918: (p_appli_s_name => 'XLA'
58919: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
58920: ,p_token_1 => 'LINE_NUMBER'
58921: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
58922: ,p_token_2 => 'LINE_TYPE_NAME'
58923: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
58924: l_component_type
58925: ,l_component_code
58953: --
58954: --
58955: ------------------------------------------------------------------------------------------------
58956: -- 4219869 Business Flow
58957: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
58958: -- Prior Entry. Currently, the following code is always generated.
58959: ------------------------------------------------------------------------------------------------
58960: XLA_AE_LINES_PKG.ValidateCurrentLine;
58961:
58956: -- 4219869 Business Flow
58957: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
58958: -- Prior Entry. Currently, the following code is always generated.
58959: ------------------------------------------------------------------------------------------------
58960: XLA_AE_LINES_PKG.ValidateCurrentLine;
58961:
58962: ------------------------------------------------------------------------------------
58963: -- 4219869 Business Flow
58964: -- Populated credit and debit amounts -- Need to generate this within IF
58962: ------------------------------------------------------------------------------------
58963: -- 4219869 Business Flow
58964: -- Populated credit and debit amounts -- Need to generate this within IF
58965: ------------------------------------------------------------------------------------
58966: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
58967:
58968: ----------------------------------------------------------------------------------
58969: -- 4219869 Business Flow
58970: -- Update journal entry status -- Need to generate this within IF
58994: -- To allow MPA report to determine if it should generate report process
58995: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
58996: ------------------------------------------------------------------------------------------
58997:
58998: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
58999: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
59000:
59001: --
59002: -- Update the line information that should be overwritten
58995: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
58996: ------------------------------------------------------------------------------------------
58997:
58998: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
58999: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
59000:
59001: --
59002: -- Update the line information that should be overwritten
59003: --
59000:
59001: --
59002: -- Update the line information that should be overwritten
59003: --
59004: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59005: p_header_num => 1);
59006: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59007:
59008: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59002: -- Update the line information that should be overwritten
59003: --
59004: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59005: p_header_num => 1);
59006: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59007:
59008: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59009:
59010: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59004: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59005: p_header_num => 1);
59006: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59007:
59008: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59009:
59010: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59011: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
59012: END IF;
59007:
59008: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59009:
59010: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59011: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
59012: END IF;
59013:
59014: --
59015: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
59014: --
59015: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
59016: --
59017: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
59018: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
59019: ELSE
59020: ---------------------------------------------------------------------------------------------------
59021: -- 4262811a Switch Sign
59022: ---------------------------------------------------------------------------------------------------
59019: ELSE
59020: ---------------------------------------------------------------------------------------------------
59021: -- 4262811a Switch Sign
59022: ---------------------------------------------------------------------------------------------------
59023: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59024: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59020: ---------------------------------------------------------------------------------------------------
59021: -- 4262811a Switch Sign
59022: ---------------------------------------------------------------------------------------------------
59023: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59024: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59021: -- 4262811a Switch Sign
59022: ---------------------------------------------------------------------------------------------------
59023: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59024: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59029: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59022: ---------------------------------------------------------------------------------------------------
59023: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59024: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59029: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59030: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59023: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59024: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59029: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59030: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59031:
59025: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59029: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59030: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59031:
59032: END IF;
59033:
59026: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59027: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59028: -- 5132302
59029: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59030: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59031:
59032: END IF;
59033:
59034: -- 4955764
59031:
59032: END IF;
59033:
59034: -- 4955764
59035: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59036: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59037:
59038:
59039: XLA_AE_LINES_PKG.ValidateCurrentLine;
59035: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59036: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59037:
59038:
59039: XLA_AE_LINES_PKG.ValidateCurrentLine;
59040: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
59041:
59042: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
59043: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
59036: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59037:
59038:
59039: XLA_AE_LINES_PKG.ValidateCurrentLine;
59040: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
59041:
59042: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
59043: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
59044: ,p_balance_type_code => l_balance_type_code);
59185: --
59186: -- bulk performance
59187: --
59188: l_balance_type_code VARCHAR2(1);
59189: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
59190: l_log_module VARCHAR2(240);
59191:
59192: --
59193: -- Upgrade strategy
59250: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
59251: l_balance_type_code <> 'B' THEN
59252:
59253: --
59254: XLA_AE_LINES_PKG.SetNewLine;
59255:
59256: p_balance_type_code := l_balance_type_code;
59257: -- set the flag so later we will know whether the gain loss line needs to be created
59258:
59262:
59263: --
59264: -- bulk performance
59265: --
59266: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
59267: p_header_num => 0); -- 4262811
59268: --
59269: -- set accounting line options
59270: --
59267: p_header_num => 0); -- 4262811
59268: --
59269: -- set accounting line options
59270: --
59271: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
59272: p_natural_side_code => 'D'
59273: , p_gain_or_loss_flag => 'N'
59274: , p_gl_transfer_mode_code => 'S'
59275: , p_acct_entry_type_code => 'A'
59281: --
59282: --
59283: -- set accounting line type info
59284: --
59285: xla_ae_lines_pkg.SetAcctLineType
59286: (p_component_type => l_component_type
59287: ,p_event_type_code => l_event_type_code
59288: ,p_line_definition_owner_code => l_line_definition_owner_code
59289: ,p_line_definition_code => l_line_definition_code
59295: ,p_event_class_code => l_event_class_code);
59296: --
59297: -- set accounting class
59298: --
59299: xla_ae_lines_pkg.SetAcctClass(
59300: p_accounting_class_code => 'RECLASS_DESTINATION'
59301: , p_ae_header_id => l_ae_header_id
59302: );
59303:
59303:
59304: --
59305: -- set rounding class
59306: --
59307: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
59308: 'RECLASS_DESTINATION';
59309:
59310: --
59311: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59307: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
59308: 'RECLASS_DESTINATION';
59309:
59310: --
59311: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59312: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59313: --
59314: -- bulk performance
59315: --
59308: 'RECLASS_DESTINATION';
59309:
59310: --
59311: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59312: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59313: --
59314: -- bulk performance
59315: --
59316: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59312: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59313: --
59314: -- bulk performance
59315: --
59316: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59317:
59318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59319: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59320:
59314: -- bulk performance
59315: --
59316: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59317:
59318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59319: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59320:
59321: -- 4955764
59322: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59318: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59319: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59320:
59321: -- 4955764
59322: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59323: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
59324:
59325: -- 4458381 Public Sector Enh
59326:
59390: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
59391: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
59392: l_rec_acct_attrs.array_char_value(30) := p_source_35;
59393:
59394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59396:
59397: ---------------------------------------------------------------------------------------------------------------
59398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59391: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
59392: l_rec_acct_attrs.array_char_value(30) := p_source_35;
59393:
59394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59396:
59397: ---------------------------------------------------------------------------------------------------------------
59398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59399: ---------------------------------------------------------------------------------------------------------------
59394: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59395: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59396:
59397: ---------------------------------------------------------------------------------------------------------------
59398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59399: ---------------------------------------------------------------------------------------------------------------
59400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59401:
59402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59396:
59397: ---------------------------------------------------------------------------------------------------------------
59398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59399: ---------------------------------------------------------------------------------------------------------------
59400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59401:
59402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59404:
59398: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59399: ---------------------------------------------------------------------------------------------------------------
59400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59401:
59402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59404:
59405: IF xla_accounting_cache_pkg.GetValueChar
59406: (p_source_code => 'LEDGER_CATEGORY_CODE'
59399: ---------------------------------------------------------------------------------------------------------------
59400: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59401:
59402: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59403: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59404:
59405: IF xla_accounting_cache_pkg.GetValueChar
59406: (p_source_code => 'LEDGER_CATEGORY_CODE'
59407: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
59410: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
59411: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
59412: )
59413: THEN
59414: xla_ae_lines_pkg.BflowUpgEntry
59415: (p_business_method_code => l_bflow_method_code
59416: ,p_business_class_code => l_bflow_class_code
59417: ,p_balance_type => l_balance_type_code);
59418: ELSE
59451: , x_value_type_code => l_adr_value_type_code
59452: , p_side => 'NA'
59453: );
59454:
59455: xla_ae_lines_pkg.set_ccid(
59456: p_code_combination_id => l_ccid
59457: , p_value_type_code => l_adr_value_type_code
59458: , p_transaction_coa_id => l_adr_transaction_coa_id
59459: , p_accounting_coa_id => l_adr_accounting_coa_id
59487: xla_accounting_err_pkg.build_message
59488: (p_appli_s_name => 'XLA'
59489: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
59490: ,p_token_1 => 'LINE_NUMBER'
59491: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
59492: ,p_token_2 => 'LINE_TYPE_NAME'
59493: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
59494: l_component_type
59495: ,l_component_code
59523: --
59524: --
59525: ------------------------------------------------------------------------------------------------
59526: -- 4219869 Business Flow
59527: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
59528: -- Prior Entry. Currently, the following code is always generated.
59529: ------------------------------------------------------------------------------------------------
59530: XLA_AE_LINES_PKG.ValidateCurrentLine;
59531:
59526: -- 4219869 Business Flow
59527: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
59528: -- Prior Entry. Currently, the following code is always generated.
59529: ------------------------------------------------------------------------------------------------
59530: XLA_AE_LINES_PKG.ValidateCurrentLine;
59531:
59532: ------------------------------------------------------------------------------------
59533: -- 4219869 Business Flow
59534: -- Populated credit and debit amounts -- Need to generate this within IF
59532: ------------------------------------------------------------------------------------
59533: -- 4219869 Business Flow
59534: -- Populated credit and debit amounts -- Need to generate this within IF
59535: ------------------------------------------------------------------------------------
59536: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
59537:
59538: ----------------------------------------------------------------------------------
59539: -- 4219869 Business Flow
59540: -- Update journal entry status -- Need to generate this within IF
59564: -- To allow MPA report to determine if it should generate report process
59565: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
59566: ------------------------------------------------------------------------------------------
59567:
59568: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
59569: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
59570:
59571: --
59572: -- Update the line information that should be overwritten
59565: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
59566: ------------------------------------------------------------------------------------------
59567:
59568: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
59569: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
59570:
59571: --
59572: -- Update the line information that should be overwritten
59573: --
59570:
59571: --
59572: -- Update the line information that should be overwritten
59573: --
59574: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59575: p_header_num => 1);
59576: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59577:
59578: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59572: -- Update the line information that should be overwritten
59573: --
59574: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59575: p_header_num => 1);
59576: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59577:
59578: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59579:
59580: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59574: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
59575: p_header_num => 1);
59576: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
59577:
59578: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59579:
59580: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59581: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
59582: END IF;
59577:
59578: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
59579:
59580: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
59581: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
59582: END IF;
59583:
59584: --
59585: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
59584: --
59585: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
59586: --
59587: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
59588: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
59589: ELSE
59590: ---------------------------------------------------------------------------------------------------
59591: -- 4262811a Switch Sign
59592: ---------------------------------------------------------------------------------------------------
59589: ELSE
59590: ---------------------------------------------------------------------------------------------------
59591: -- 4262811a Switch Sign
59592: ---------------------------------------------------------------------------------------------------
59593: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59594: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59590: ---------------------------------------------------------------------------------------------------
59591: -- 4262811a Switch Sign
59592: ---------------------------------------------------------------------------------------------------
59593: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59594: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59591: -- 4262811a Switch Sign
59592: ---------------------------------------------------------------------------------------------------
59593: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59594: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59599: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59592: ---------------------------------------------------------------------------------------------------
59593: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59594: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59599: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59600: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59593: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
59594: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59599: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59600: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59601:
59595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59599: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59600: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59601:
59602: END IF;
59603:
59596: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
59597: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59598: -- 5132302
59599: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
59600: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
59601:
59602: END IF;
59603:
59604: -- 4955764
59601:
59602: END IF;
59603:
59604: -- 4955764
59605: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59606: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59607:
59608:
59609: XLA_AE_LINES_PKG.ValidateCurrentLine;
59605: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59606: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59607:
59608:
59609: XLA_AE_LINES_PKG.ValidateCurrentLine;
59610: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
59611:
59612: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
59613: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
59606: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
59607:
59608:
59609: XLA_AE_LINES_PKG.ValidateCurrentLine;
59610: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
59611:
59612: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
59613: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
59614: ,p_balance_type_code => l_balance_type_code);
59755: --
59756: -- bulk performance
59757: --
59758: l_balance_type_code VARCHAR2(1);
59759: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
59760: l_log_module VARCHAR2(240);
59761:
59762: --
59763: -- Upgrade strategy
59820: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
59821: l_balance_type_code <> 'B' THEN
59822:
59823: --
59824: XLA_AE_LINES_PKG.SetNewLine;
59825:
59826: p_balance_type_code := l_balance_type_code;
59827: -- set the flag so later we will know whether the gain loss line needs to be created
59828:
59832:
59833: --
59834: -- bulk performance
59835: --
59836: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
59837: p_header_num => 0); -- 4262811
59838: --
59839: -- set accounting line options
59840: --
59837: p_header_num => 0); -- 4262811
59838: --
59839: -- set accounting line options
59840: --
59841: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
59842: p_natural_side_code => 'C'
59843: , p_gain_or_loss_flag => 'N'
59844: , p_gl_transfer_mode_code => 'S'
59845: , p_acct_entry_type_code => 'A'
59851: --
59852: --
59853: -- set accounting line type info
59854: --
59855: xla_ae_lines_pkg.SetAcctLineType
59856: (p_component_type => l_component_type
59857: ,p_event_type_code => l_event_type_code
59858: ,p_line_definition_owner_code => l_line_definition_owner_code
59859: ,p_line_definition_code => l_line_definition_code
59865: ,p_event_class_code => l_event_class_code);
59866: --
59867: -- set accounting class
59868: --
59869: xla_ae_lines_pkg.SetAcctClass(
59870: p_accounting_class_code => 'RECLASS_SOURCE'
59871: , p_ae_header_id => l_ae_header_id
59872: );
59873:
59873:
59874: --
59875: -- set rounding class
59876: --
59877: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
59878: 'RECLASS_SOURCE';
59879:
59880: --
59881: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59877: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
59878: 'RECLASS_SOURCE';
59879:
59880: --
59881: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59882: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59883: --
59884: -- bulk performance
59885: --
59878: 'RECLASS_SOURCE';
59879:
59880: --
59881: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
59882: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59883: --
59884: -- bulk performance
59885: --
59886: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59882: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
59883: --
59884: -- bulk performance
59885: --
59886: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59887:
59888: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59889: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59890:
59884: -- bulk performance
59885: --
59886: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
59887:
59888: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59889: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59890:
59891: -- 4955764
59892: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59888: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
59889: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
59890:
59891: -- 4955764
59892: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
59893: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
59894:
59895: -- 4458381 Public Sector Enh
59896:
59960: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
59961: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
59962: l_rec_acct_attrs.array_char_value(30) := p_source_35;
59963:
59964: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59965: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59966:
59967: ---------------------------------------------------------------------------------------------------------------
59968: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59961: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
59962: l_rec_acct_attrs.array_char_value(30) := p_source_35;
59963:
59964: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59965: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59966:
59967: ---------------------------------------------------------------------------------------------------------------
59968: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59969: ---------------------------------------------------------------------------------------------------------------
59964: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
59965: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
59966:
59967: ---------------------------------------------------------------------------------------------------------------
59968: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59969: ---------------------------------------------------------------------------------------------------------------
59970: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59971:
59972: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59966:
59967: ---------------------------------------------------------------------------------------------------------------
59968: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59969: ---------------------------------------------------------------------------------------------------------------
59970: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59971:
59972: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59973: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59974:
59968: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
59969: ---------------------------------------------------------------------------------------------------------------
59970: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59971:
59972: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59973: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59974:
59975: IF xla_accounting_cache_pkg.GetValueChar
59976: (p_source_code => 'LEDGER_CATEGORY_CODE'
59969: ---------------------------------------------------------------------------------------------------------------
59970: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
59971:
59972: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59973: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
59974:
59975: IF xla_accounting_cache_pkg.GetValueChar
59976: (p_source_code => 'LEDGER_CATEGORY_CODE'
59977: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
59980: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
59981: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
59982: )
59983: THEN
59984: xla_ae_lines_pkg.BflowUpgEntry
59985: (p_business_method_code => l_bflow_method_code
59986: ,p_business_class_code => l_bflow_class_code
59987: ,p_balance_type => l_balance_type_code);
59988: ELSE
60022: , x_value_type_code => l_adr_value_type_code
60023: , p_side => 'NA'
60024: );
60025:
60026: xla_ae_lines_pkg.set_ccid(
60027: p_code_combination_id => l_ccid
60028: , p_value_type_code => l_adr_value_type_code
60029: , p_transaction_coa_id => l_adr_transaction_coa_id
60030: , p_accounting_coa_id => l_adr_accounting_coa_id
60058: xla_accounting_err_pkg.build_message
60059: (p_appli_s_name => 'XLA'
60060: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
60061: ,p_token_1 => 'LINE_NUMBER'
60062: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
60063: ,p_token_2 => 'LINE_TYPE_NAME'
60064: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
60065: l_component_type
60066: ,l_component_code
60094: --
60095: --
60096: ------------------------------------------------------------------------------------------------
60097: -- 4219869 Business Flow
60098: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
60099: -- Prior Entry. Currently, the following code is always generated.
60100: ------------------------------------------------------------------------------------------------
60101: XLA_AE_LINES_PKG.ValidateCurrentLine;
60102:
60097: -- 4219869 Business Flow
60098: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
60099: -- Prior Entry. Currently, the following code is always generated.
60100: ------------------------------------------------------------------------------------------------
60101: XLA_AE_LINES_PKG.ValidateCurrentLine;
60102:
60103: ------------------------------------------------------------------------------------
60104: -- 4219869 Business Flow
60105: -- Populated credit and debit amounts -- Need to generate this within IF
60103: ------------------------------------------------------------------------------------
60104: -- 4219869 Business Flow
60105: -- Populated credit and debit amounts -- Need to generate this within IF
60106: ------------------------------------------------------------------------------------
60107: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60108:
60109: ----------------------------------------------------------------------------------
60110: -- 4219869 Business Flow
60111: -- Update journal entry status -- Need to generate this within IF
60135: -- To allow MPA report to determine if it should generate report process
60136: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
60137: ------------------------------------------------------------------------------------------
60138:
60139: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
60140: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
60141:
60142: --
60143: -- Update the line information that should be overwritten
60136: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
60137: ------------------------------------------------------------------------------------------
60138:
60139: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
60140: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
60141:
60142: --
60143: -- Update the line information that should be overwritten
60144: --
60141:
60142: --
60143: -- Update the line information that should be overwritten
60144: --
60145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60146: p_header_num => 1);
60147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60148:
60149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60143: -- Update the line information that should be overwritten
60144: --
60145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60146: p_header_num => 1);
60147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60148:
60149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60150:
60151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60145: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60146: p_header_num => 1);
60147: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60148:
60149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60150:
60151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60152: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
60153: END IF;
60148:
60149: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60150:
60151: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60152: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
60153: END IF;
60154:
60155: --
60156: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
60155: --
60156: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
60157: --
60158: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
60159: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
60160: ELSE
60161: ---------------------------------------------------------------------------------------------------
60162: -- 4262811a Switch Sign
60163: ---------------------------------------------------------------------------------------------------
60160: ELSE
60161: ---------------------------------------------------------------------------------------------------
60162: -- 4262811a Switch Sign
60163: ---------------------------------------------------------------------------------------------------
60164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60161: ---------------------------------------------------------------------------------------------------
60162: -- 4262811a Switch Sign
60163: ---------------------------------------------------------------------------------------------------
60164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60162: -- 4262811a Switch Sign
60163: ---------------------------------------------------------------------------------------------------
60164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60163: ---------------------------------------------------------------------------------------------------
60164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60164: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60165: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60172:
60166: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60172:
60173: END IF;
60174:
60167: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60168: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60169: -- 5132302
60170: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60171: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60172:
60173: END IF;
60174:
60175: -- 4955764
60172:
60173: END IF;
60174:
60175: -- 4955764
60176: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60178:
60179:
60180: XLA_AE_LINES_PKG.ValidateCurrentLine;
60176: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60178:
60179:
60180: XLA_AE_LINES_PKG.ValidateCurrentLine;
60181: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60182:
60183: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
60184: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
60177: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60178:
60179:
60180: XLA_AE_LINES_PKG.ValidateCurrentLine;
60181: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60182:
60183: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
60184: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
60185: ,p_balance_type_code => l_balance_type_code);
60326: --
60327: -- bulk performance
60328: --
60329: l_balance_type_code VARCHAR2(1);
60330: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
60331: l_log_module VARCHAR2(240);
60332:
60333: --
60334: -- Upgrade strategy
60391: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
60392: l_balance_type_code <> 'B' THEN
60393:
60394: --
60395: XLA_AE_LINES_PKG.SetNewLine;
60396:
60397: p_balance_type_code := l_balance_type_code;
60398: -- set the flag so later we will know whether the gain loss line needs to be created
60399:
60403:
60404: --
60405: -- bulk performance
60406: --
60407: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
60408: p_header_num => 0); -- 4262811
60409: --
60410: -- set accounting line options
60411: --
60408: p_header_num => 0); -- 4262811
60409: --
60410: -- set accounting line options
60411: --
60412: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
60413: p_natural_side_code => 'C'
60414: , p_gain_or_loss_flag => 'N'
60415: , p_gl_transfer_mode_code => 'S'
60416: , p_acct_entry_type_code => 'A'
60422: --
60423: --
60424: -- set accounting line type info
60425: --
60426: xla_ae_lines_pkg.SetAcctLineType
60427: (p_component_type => l_component_type
60428: ,p_event_type_code => l_event_type_code
60429: ,p_line_definition_owner_code => l_line_definition_owner_code
60430: ,p_line_definition_code => l_line_definition_code
60436: ,p_event_class_code => l_event_class_code);
60437: --
60438: -- set accounting class
60439: --
60440: xla_ae_lines_pkg.SetAcctClass(
60441: p_accounting_class_code => 'RECLASS_SOURCE'
60442: , p_ae_header_id => l_ae_header_id
60443: );
60444:
60444:
60445: --
60446: -- set rounding class
60447: --
60448: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
60449: 'RECLASS_SOURCE';
60450:
60451: --
60452: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
60448: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
60449: 'RECLASS_SOURCE';
60450:
60451: --
60452: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
60453: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
60454: --
60455: -- bulk performance
60456: --
60449: 'RECLASS_SOURCE';
60450:
60451: --
60452: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
60453: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
60454: --
60455: -- bulk performance
60456: --
60457: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
60453: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
60454: --
60455: -- bulk performance
60456: --
60457: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
60458:
60459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
60460: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
60461:
60455: -- bulk performance
60456: --
60457: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
60458:
60459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
60460: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
60461:
60462: -- 4955764
60463: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60459: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
60460: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
60461:
60462: -- 4955764
60463: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60464: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
60465:
60466: -- 4458381 Public Sector Enh
60467:
60531: l_rec_acct_attrs.array_num_value(29) := to_char(p_source_36);
60532: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
60533: l_rec_acct_attrs.array_char_value(30) := p_source_35;
60534:
60535: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
60536: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
60537:
60538: ---------------------------------------------------------------------------------------------------------------
60539: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
60532: l_rec_acct_attrs.array_acct_attr_code(30) := 'REVERSED_DISTRIBUTION_TYPE';
60533: l_rec_acct_attrs.array_char_value(30) := p_source_35;
60534:
60535: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
60536: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
60537:
60538: ---------------------------------------------------------------------------------------------------------------
60539: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
60540: ---------------------------------------------------------------------------------------------------------------
60535: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
60536: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
60537:
60538: ---------------------------------------------------------------------------------------------------------------
60539: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
60540: ---------------------------------------------------------------------------------------------------------------
60541: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
60542:
60543: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60537:
60538: ---------------------------------------------------------------------------------------------------------------
60539: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
60540: ---------------------------------------------------------------------------------------------------------------
60541: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
60542:
60543: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60544: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60545:
60539: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
60540: ---------------------------------------------------------------------------------------------------------------
60541: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
60542:
60543: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60544: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60545:
60546: IF xla_accounting_cache_pkg.GetValueChar
60547: (p_source_code => 'LEDGER_CATEGORY_CODE'
60540: ---------------------------------------------------------------------------------------------------------------
60541: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
60542:
60543: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60544: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
60545:
60546: IF xla_accounting_cache_pkg.GetValueChar
60547: (p_source_code => 'LEDGER_CATEGORY_CODE'
60548: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
60551: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
60552: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
60553: )
60554: THEN
60555: xla_ae_lines_pkg.BflowUpgEntry
60556: (p_business_method_code => l_bflow_method_code
60557: ,p_business_class_code => l_bflow_class_code
60558: ,p_balance_type => l_balance_type_code);
60559: ELSE
60592: , x_value_type_code => l_adr_value_type_code
60593: , p_side => 'NA'
60594: );
60595:
60596: xla_ae_lines_pkg.set_ccid(
60597: p_code_combination_id => l_ccid
60598: , p_value_type_code => l_adr_value_type_code
60599: , p_transaction_coa_id => l_adr_transaction_coa_id
60600: , p_accounting_coa_id => l_adr_accounting_coa_id
60628: xla_accounting_err_pkg.build_message
60629: (p_appli_s_name => 'XLA'
60630: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
60631: ,p_token_1 => 'LINE_NUMBER'
60632: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
60633: ,p_token_2 => 'LINE_TYPE_NAME'
60634: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
60635: l_component_type
60636: ,l_component_code
60664: --
60665: --
60666: ------------------------------------------------------------------------------------------------
60667: -- 4219869 Business Flow
60668: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
60669: -- Prior Entry. Currently, the following code is always generated.
60670: ------------------------------------------------------------------------------------------------
60671: XLA_AE_LINES_PKG.ValidateCurrentLine;
60672:
60667: -- 4219869 Business Flow
60668: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
60669: -- Prior Entry. Currently, the following code is always generated.
60670: ------------------------------------------------------------------------------------------------
60671: XLA_AE_LINES_PKG.ValidateCurrentLine;
60672:
60673: ------------------------------------------------------------------------------------
60674: -- 4219869 Business Flow
60675: -- Populated credit and debit amounts -- Need to generate this within IF
60673: ------------------------------------------------------------------------------------
60674: -- 4219869 Business Flow
60675: -- Populated credit and debit amounts -- Need to generate this within IF
60676: ------------------------------------------------------------------------------------
60677: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60678:
60679: ----------------------------------------------------------------------------------
60680: -- 4219869 Business Flow
60681: -- Update journal entry status -- Need to generate this within IF
60705: -- To allow MPA report to determine if it should generate report process
60706: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
60707: ------------------------------------------------------------------------------------------
60708:
60709: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
60710: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
60711:
60712: --
60713: -- Update the line information that should be overwritten
60706: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
60707: ------------------------------------------------------------------------------------------
60708:
60709: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
60710: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
60711:
60712: --
60713: -- Update the line information that should be overwritten
60714: --
60711:
60712: --
60713: -- Update the line information that should be overwritten
60714: --
60715: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60716: p_header_num => 1);
60717: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60718:
60719: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60713: -- Update the line information that should be overwritten
60714: --
60715: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60716: p_header_num => 1);
60717: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60718:
60719: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60720:
60721: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60715: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
60716: p_header_num => 1);
60717: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
60718:
60719: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60720:
60721: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60722: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
60723: END IF;
60718:
60719: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
60720:
60721: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
60722: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
60723: END IF;
60724:
60725: --
60726: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
60725: --
60726: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
60727: --
60728: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
60729: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
60730: ELSE
60731: ---------------------------------------------------------------------------------------------------
60732: -- 4262811a Switch Sign
60733: ---------------------------------------------------------------------------------------------------
60730: ELSE
60731: ---------------------------------------------------------------------------------------------------
60732: -- 4262811a Switch Sign
60733: ---------------------------------------------------------------------------------------------------
60734: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60735: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60731: ---------------------------------------------------------------------------------------------------
60732: -- 4262811a Switch Sign
60733: ---------------------------------------------------------------------------------------------------
60734: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60735: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60732: -- 4262811a Switch Sign
60733: ---------------------------------------------------------------------------------------------------
60734: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60735: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60740: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60733: ---------------------------------------------------------------------------------------------------
60734: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60735: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60740: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60741: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60734: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
60735: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60740: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60741: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60742:
60736: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60740: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60741: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60742:
60743: END IF;
60744:
60737: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
60738: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60739: -- 5132302
60740: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
60741: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
60742:
60743: END IF;
60744:
60745: -- 4955764
60742:
60743: END IF;
60744:
60745: -- 4955764
60746: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60747: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60748:
60749:
60750: XLA_AE_LINES_PKG.ValidateCurrentLine;
60746: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
60747: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60748:
60749:
60750: XLA_AE_LINES_PKG.ValidateCurrentLine;
60751: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60752:
60753: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
60754: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
60747: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
60748:
60749:
60750: XLA_AE_LINES_PKG.ValidateCurrentLine;
60751: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
60752:
60753: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
60754: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
60755: ,p_balance_type_code => l_balance_type_code);
60903: --
60904: -- bulk performance
60905: --
60906: l_balance_type_code VARCHAR2(1);
60907: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
60908: l_log_module VARCHAR2(240);
60909:
60910: --
60911: -- Upgrade strategy
60973: ') = 'Y'
60974: THEN
60975:
60976: --
60977: XLA_AE_LINES_PKG.SetNewLine;
60978:
60979: p_balance_type_code := l_balance_type_code;
60980: -- set the flag so later we will know whether the gain loss line needs to be created
60981:
60985:
60986: --
60987: -- bulk performance
60988: --
60989: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
60990: p_header_num => 0); -- 4262811
60991: --
60992: -- set accounting line options
60993: --
60990: p_header_num => 0); -- 4262811
60991: --
60992: -- set accounting line options
60993: --
60994: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
60995: p_natural_side_code => 'D'
60996: , p_gain_or_loss_flag => 'N'
60997: , p_gl_transfer_mode_code => 'S'
60998: , p_acct_entry_type_code => 'A'
61004: --
61005: --
61006: -- set accounting line type info
61007: --
61008: xla_ae_lines_pkg.SetAcctLineType
61009: (p_component_type => l_component_type
61010: ,p_event_type_code => l_event_type_code
61011: ,p_line_definition_owner_code => l_line_definition_owner_code
61012: ,p_line_definition_code => l_line_definition_code
61018: ,p_event_class_code => l_event_class_code);
61019: --
61020: -- set accounting class
61021: --
61022: xla_ae_lines_pkg.SetAcctClass(
61023: p_accounting_class_code => 'REVENUE_ADJ'
61024: , p_ae_header_id => l_ae_header_id
61025: );
61026:
61026:
61027: --
61028: -- set rounding class
61029: --
61030: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
61031: 'REVENUE_ADJ';
61032:
61033: --
61034: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61030: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
61031: 'REVENUE_ADJ';
61032:
61033: --
61034: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61035: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61036: --
61037: -- bulk performance
61038: --
61031: 'REVENUE_ADJ';
61032:
61033: --
61034: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61035: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61036: --
61037: -- bulk performance
61038: --
61039: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61035: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61036: --
61037: -- bulk performance
61038: --
61039: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61040:
61041: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61042: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61043:
61037: -- bulk performance
61038: --
61039: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61040:
61041: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61042: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61043:
61044: -- 4955764
61045: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61041: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61042: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61043:
61044: -- 4955764
61045: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61046: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
61047:
61048: -- 4458381 Public Sector Enh
61049:
61115: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
61116: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
61117: l_rec_acct_attrs.array_num_value(31) := p_source_43;
61118:
61119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61121:
61122: ---------------------------------------------------------------------------------------------------------------
61123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61116: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
61117: l_rec_acct_attrs.array_num_value(31) := p_source_43;
61118:
61119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61121:
61122: ---------------------------------------------------------------------------------------------------------------
61123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61124: ---------------------------------------------------------------------------------------------------------------
61119: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61120: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61121:
61122: ---------------------------------------------------------------------------------------------------------------
61123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61124: ---------------------------------------------------------------------------------------------------------------
61125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61126:
61127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61121:
61122: ---------------------------------------------------------------------------------------------------------------
61123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61124: ---------------------------------------------------------------------------------------------------------------
61125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61126:
61127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61129:
61123: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61124: ---------------------------------------------------------------------------------------------------------------
61125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61126:
61127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61129:
61130: IF xla_accounting_cache_pkg.GetValueChar
61131: (p_source_code => 'LEDGER_CATEGORY_CODE'
61124: ---------------------------------------------------------------------------------------------------------------
61125: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61126:
61127: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61128: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61129:
61130: IF xla_accounting_cache_pkg.GetValueChar
61131: (p_source_code => 'LEDGER_CATEGORY_CODE'
61132: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
61135: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
61136: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
61137: )
61138: THEN
61139: xla_ae_lines_pkg.BflowUpgEntry
61140: (p_business_method_code => l_bflow_method_code
61141: ,p_business_class_code => l_bflow_class_code
61142: ,p_balance_type => l_balance_type_code);
61143: ELSE
61141: ,p_business_class_code => l_bflow_class_code
61142: ,p_balance_type => l_balance_type_code);
61143: ELSE
61144: NULL;
61145: XLA_AE_LINES_PKG.business_flow_validation(
61146: p_business_method_code => l_bflow_method_code
61147: ,p_business_class_code => l_bflow_class_code
61148: ,p_inherit_description_flag => l_inherit_desc_flag);
61149: END IF;
61188: xla_accounting_err_pkg.build_message
61189: (p_appli_s_name => 'XLA'
61190: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
61191: ,p_token_1 => 'LINE_NUMBER'
61192: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
61193: ,p_token_2 => 'LINE_TYPE_NAME'
61194: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
61195: l_component_type
61196: ,l_component_code
61224: --
61225: --
61226: ------------------------------------------------------------------------------------------------
61227: -- 4219869 Business Flow
61228: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
61229: -- Prior Entry. Currently, the following code is always generated.
61230: ------------------------------------------------------------------------------------------------
61231: -- No ValidateCurrentLine for business flow method of Prior Entry
61232:
61233: ------------------------------------------------------------------------------------
61234: -- 4219869 Business Flow
61235: -- Populated credit and debit amounts -- Need to generate this within IF
61236: ------------------------------------------------------------------------------------
61237: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61238:
61239: ----------------------------------------------------------------------------------
61240: -- 4219869 Business Flow
61241: -- Update journal entry status -- Need to generate this within IF
61265: -- To allow MPA report to determine if it should generate report process
61266: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
61267: ------------------------------------------------------------------------------------------
61268:
61269: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
61270: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
61271:
61272: --
61273: -- Update the line information that should be overwritten
61266: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
61267: ------------------------------------------------------------------------------------------
61268:
61269: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
61270: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
61271:
61272: --
61273: -- Update the line information that should be overwritten
61274: --
61271:
61272: --
61273: -- Update the line information that should be overwritten
61274: --
61275: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61276: p_header_num => 1);
61277: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61278:
61279: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61273: -- Update the line information that should be overwritten
61274: --
61275: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61276: p_header_num => 1);
61277: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61278:
61279: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61280:
61281: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61275: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61276: p_header_num => 1);
61277: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61278:
61279: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61280:
61281: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61282: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
61283: END IF;
61278:
61279: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61280:
61281: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61282: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
61283: END IF;
61284:
61285: --
61286: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
61285: --
61286: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
61287: --
61288: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
61289: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
61290: ELSE
61291: ---------------------------------------------------------------------------------------------------
61292: -- 4262811a Switch Sign
61293: ---------------------------------------------------------------------------------------------------
61290: ELSE
61291: ---------------------------------------------------------------------------------------------------
61292: -- 4262811a Switch Sign
61293: ---------------------------------------------------------------------------------------------------
61294: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61295: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61291: ---------------------------------------------------------------------------------------------------
61292: -- 4262811a Switch Sign
61293: ---------------------------------------------------------------------------------------------------
61294: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61295: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61292: -- 4262811a Switch Sign
61293: ---------------------------------------------------------------------------------------------------
61294: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61295: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61300: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61293: ---------------------------------------------------------------------------------------------------
61294: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61295: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61300: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61294: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61295: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61300: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61302:
61296: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61300: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61302:
61303: END IF;
61304:
61297: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61298: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61299: -- 5132302
61300: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61301: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61302:
61303: END IF;
61304:
61305: -- 4955764
61302:
61303: END IF;
61304:
61305: -- 4955764
61306: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61307: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61308:
61309:
61310: XLA_AE_LINES_PKG.ValidateCurrentLine;
61306: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61307: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61308:
61309:
61310: XLA_AE_LINES_PKG.ValidateCurrentLine;
61311: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61312:
61313: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
61314: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
61307: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61308:
61309:
61310: XLA_AE_LINES_PKG.ValidateCurrentLine;
61311: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61312:
61313: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
61314: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
61315: ,p_balance_type_code => l_balance_type_code);
61483: --
61484: -- bulk performance
61485: --
61486: l_balance_type_code VARCHAR2(1);
61487: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
61488: l_log_module VARCHAR2(240);
61489:
61490: --
61491: -- Upgrade strategy
61551: ') = 'D'
61552: THEN
61553:
61554: --
61555: XLA_AE_LINES_PKG.SetNewLine;
61556:
61557: p_balance_type_code := l_balance_type_code;
61558: -- set the flag so later we will know whether the gain loss line needs to be created
61559:
61563:
61564: --
61565: -- bulk performance
61566: --
61567: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
61568: p_header_num => 0); -- 4262811
61569: --
61570: -- set accounting line options
61571: --
61568: p_header_num => 0); -- 4262811
61569: --
61570: -- set accounting line options
61571: --
61572: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
61573: p_natural_side_code => 'D'
61574: , p_gain_or_loss_flag => 'N'
61575: , p_gl_transfer_mode_code => 'S'
61576: , p_acct_entry_type_code => 'A'
61582: --
61583: --
61584: -- set accounting line type info
61585: --
61586: xla_ae_lines_pkg.SetAcctLineType
61587: (p_component_type => l_component_type
61588: ,p_event_type_code => l_event_type_code
61589: ,p_line_definition_owner_code => l_line_definition_owner_code
61590: ,p_line_definition_code => l_line_definition_code
61596: ,p_event_class_code => l_event_class_code);
61597: --
61598: -- set accounting class
61599: --
61600: xla_ae_lines_pkg.SetAcctClass(
61601: p_accounting_class_code => 'COST'
61602: , p_ae_header_id => l_ae_header_id
61603: );
61604:
61604:
61605: --
61606: -- set rounding class
61607: --
61608: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
61609: 'COST';
61610:
61611: --
61612: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61608: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
61609: 'COST';
61610:
61611: --
61612: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61613: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61614: --
61615: -- bulk performance
61616: --
61609: 'COST';
61610:
61611: --
61612: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
61613: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61614: --
61615: -- bulk performance
61616: --
61617: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61613: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
61614: --
61615: -- bulk performance
61616: --
61617: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61618:
61619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61620: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61621:
61615: -- bulk performance
61616: --
61617: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
61618:
61619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61620: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61621:
61622: -- 4955764
61623: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
61620: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
61621:
61622: -- 4955764
61623: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61624: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
61625:
61626: -- 4458381 Public Sector Enh
61627:
61743: l_rec_acct_attrs.array_num_value(50) := p_source_62;
61744: l_rec_acct_attrs.array_acct_attr_code(51) := 'UPG_DR_ENC_TYPE_ID';
61745: l_rec_acct_attrs.array_num_value(51) := p_source_63;
61746:
61747: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61748: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61749:
61750: ---------------------------------------------------------------------------------------------------------------
61751: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61744: l_rec_acct_attrs.array_acct_attr_code(51) := 'UPG_DR_ENC_TYPE_ID';
61745: l_rec_acct_attrs.array_num_value(51) := p_source_63;
61746:
61747: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61748: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61749:
61750: ---------------------------------------------------------------------------------------------------------------
61751: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61752: ---------------------------------------------------------------------------------------------------------------
61747: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
61748: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
61749:
61750: ---------------------------------------------------------------------------------------------------------------
61751: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61752: ---------------------------------------------------------------------------------------------------------------
61753: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61754:
61755: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61749:
61750: ---------------------------------------------------------------------------------------------------------------
61751: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61752: ---------------------------------------------------------------------------------------------------------------
61753: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61754:
61755: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61756: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61757:
61751: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
61752: ---------------------------------------------------------------------------------------------------------------
61753: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61754:
61755: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61756: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61757:
61758: IF xla_accounting_cache_pkg.GetValueChar
61759: (p_source_code => 'LEDGER_CATEGORY_CODE'
61752: ---------------------------------------------------------------------------------------------------------------
61753: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
61754:
61755: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61756: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
61757:
61758: IF xla_accounting_cache_pkg.GetValueChar
61759: (p_source_code => 'LEDGER_CATEGORY_CODE'
61760: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
61763: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
61764: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
61765: )
61766: THEN
61767: xla_ae_lines_pkg.BflowUpgEntry
61768: (p_business_method_code => l_bflow_method_code
61769: ,p_business_class_code => l_bflow_class_code
61770: ,p_balance_type => l_balance_type_code);
61771: ELSE
61805: , x_value_type_code => l_adr_value_type_code
61806: , p_side => 'NA'
61807: );
61808:
61809: xla_ae_lines_pkg.set_ccid(
61810: p_code_combination_id => l_ccid
61811: , p_value_type_code => l_adr_value_type_code
61812: , p_transaction_coa_id => l_adr_transaction_coa_id
61813: , p_accounting_coa_id => l_adr_accounting_coa_id
61841: xla_accounting_err_pkg.build_message
61842: (p_appli_s_name => 'XLA'
61843: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
61844: ,p_token_1 => 'LINE_NUMBER'
61845: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
61846: ,p_token_2 => 'LINE_TYPE_NAME'
61847: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
61848: l_component_type
61849: ,l_component_code
61877: --
61878: --
61879: ------------------------------------------------------------------------------------------------
61880: -- 4219869 Business Flow
61881: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
61882: -- Prior Entry. Currently, the following code is always generated.
61883: ------------------------------------------------------------------------------------------------
61884: XLA_AE_LINES_PKG.ValidateCurrentLine;
61885:
61880: -- 4219869 Business Flow
61881: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
61882: -- Prior Entry. Currently, the following code is always generated.
61883: ------------------------------------------------------------------------------------------------
61884: XLA_AE_LINES_PKG.ValidateCurrentLine;
61885:
61886: ------------------------------------------------------------------------------------
61887: -- 4219869 Business Flow
61888: -- Populated credit and debit amounts -- Need to generate this within IF
61886: ------------------------------------------------------------------------------------
61887: -- 4219869 Business Flow
61888: -- Populated credit and debit amounts -- Need to generate this within IF
61889: ------------------------------------------------------------------------------------
61890: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61891:
61892: ----------------------------------------------------------------------------------
61893: -- 4219869 Business Flow
61894: -- Update journal entry status -- Need to generate this within IF
61918: -- To allow MPA report to determine if it should generate report process
61919: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
61920: ------------------------------------------------------------------------------------------
61921:
61922: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
61923: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
61924:
61925: --
61926: -- Update the line information that should be overwritten
61919: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
61920: ------------------------------------------------------------------------------------------
61921:
61922: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
61923: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
61924:
61925: --
61926: -- Update the line information that should be overwritten
61927: --
61924:
61925: --
61926: -- Update the line information that should be overwritten
61927: --
61928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61929: p_header_num => 1);
61930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61931:
61932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61926: -- Update the line information that should be overwritten
61927: --
61928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61929: p_header_num => 1);
61930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61931:
61932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61933:
61934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61928: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
61929: p_header_num => 1);
61930: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
61931:
61932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61933:
61934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61935: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
61936: END IF;
61931:
61932: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
61933:
61934: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
61935: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
61936: END IF;
61937:
61938: --
61939: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
61938: --
61939: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
61940: --
61941: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
61942: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
61943: ELSE
61944: ---------------------------------------------------------------------------------------------------
61945: -- 4262811a Switch Sign
61946: ---------------------------------------------------------------------------------------------------
61943: ELSE
61944: ---------------------------------------------------------------------------------------------------
61945: -- 4262811a Switch Sign
61946: ---------------------------------------------------------------------------------------------------
61947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61944: ---------------------------------------------------------------------------------------------------
61945: -- 4262811a Switch Sign
61946: ---------------------------------------------------------------------------------------------------
61947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61945: -- 4262811a Switch Sign
61946: ---------------------------------------------------------------------------------------------------
61947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61946: ---------------------------------------------------------------------------------------------------
61947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61947: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
61948: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61955:
61949: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61955:
61956: END IF;
61957:
61950: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
61951: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61952: -- 5132302
61953: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
61954: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
61955:
61956: END IF;
61957:
61958: -- 4955764
61955:
61956: END IF;
61957:
61958: -- 4955764
61959: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61961:
61962:
61963: XLA_AE_LINES_PKG.ValidateCurrentLine;
61959: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
61960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61961:
61962:
61963: XLA_AE_LINES_PKG.ValidateCurrentLine;
61964: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61965:
61966: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
61967: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
61960: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
61961:
61962:
61963: XLA_AE_LINES_PKG.ValidateCurrentLine;
61964: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
61965:
61966: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
61967: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
61968: ,p_balance_type_code => l_balance_type_code);
62134: --
62135: -- bulk performance
62136: --
62137: l_balance_type_code VARCHAR2(1);
62138: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
62139: l_log_module VARCHAR2(240);
62140:
62141: --
62142: -- Upgrade strategy
62202: ') = 'D'
62203: THEN
62204:
62205: --
62206: XLA_AE_LINES_PKG.SetNewLine;
62207:
62208: p_balance_type_code := l_balance_type_code;
62209: -- set the flag so later we will know whether the gain loss line needs to be created
62210:
62214:
62215: --
62216: -- bulk performance
62217: --
62218: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
62219: p_header_num => 0); -- 4262811
62220: --
62221: -- set accounting line options
62222: --
62219: p_header_num => 0); -- 4262811
62220: --
62221: -- set accounting line options
62222: --
62223: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
62224: p_natural_side_code => 'D'
62225: , p_gain_or_loss_flag => 'N'
62226: , p_gl_transfer_mode_code => 'S'
62227: , p_acct_entry_type_code => 'A'
62233: --
62234: --
62235: -- set accounting line type info
62236: --
62237: xla_ae_lines_pkg.SetAcctLineType
62238: (p_component_type => l_component_type
62239: ,p_event_type_code => l_event_type_code
62240: ,p_line_definition_owner_code => l_line_definition_owner_code
62241: ,p_line_definition_code => l_line_definition_code
62247: ,p_event_class_code => l_event_class_code);
62248: --
62249: -- set accounting class
62250: --
62251: xla_ae_lines_pkg.SetAcctClass(
62252: p_accounting_class_code => 'COST'
62253: , p_ae_header_id => l_ae_header_id
62254: );
62255:
62255:
62256: --
62257: -- set rounding class
62258: --
62259: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
62260: 'COST';
62261:
62262: --
62263: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62259: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
62260: 'COST';
62261:
62262: --
62263: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62264: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62265: --
62266: -- bulk performance
62267: --
62260: 'COST';
62261:
62262: --
62263: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62264: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62265: --
62266: -- bulk performance
62267: --
62268: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62264: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62265: --
62266: -- bulk performance
62267: --
62268: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62269:
62270: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62271: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62272:
62266: -- bulk performance
62267: --
62268: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62269:
62270: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62271: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62272:
62273: -- 4955764
62274: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62270: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62271: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62272:
62273: -- 4955764
62274: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62275: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
62276:
62277: -- 4458381 Public Sector Enh
62278:
62377: l_rec_acct_attrs.array_num_value(44) := p_source_62;
62378: l_rec_acct_attrs.array_acct_attr_code(45) := 'UPG_DR_ENC_TYPE_ID';
62379: l_rec_acct_attrs.array_num_value(45) := p_source_63;
62380:
62381: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
62382: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
62383:
62384: ---------------------------------------------------------------------------------------------------------------
62385: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
62378: l_rec_acct_attrs.array_acct_attr_code(45) := 'UPG_DR_ENC_TYPE_ID';
62379: l_rec_acct_attrs.array_num_value(45) := p_source_63;
62380:
62381: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
62382: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
62383:
62384: ---------------------------------------------------------------------------------------------------------------
62385: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
62386: ---------------------------------------------------------------------------------------------------------------
62381: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
62382: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
62383:
62384: ---------------------------------------------------------------------------------------------------------------
62385: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
62386: ---------------------------------------------------------------------------------------------------------------
62387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
62388:
62389: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62383:
62384: ---------------------------------------------------------------------------------------------------------------
62385: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
62386: ---------------------------------------------------------------------------------------------------------------
62387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
62388:
62389: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62390: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62391:
62385: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
62386: ---------------------------------------------------------------------------------------------------------------
62387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
62388:
62389: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62390: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62391:
62392: IF xla_accounting_cache_pkg.GetValueChar
62393: (p_source_code => 'LEDGER_CATEGORY_CODE'
62386: ---------------------------------------------------------------------------------------------------------------
62387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
62388:
62389: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62390: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
62391:
62392: IF xla_accounting_cache_pkg.GetValueChar
62393: (p_source_code => 'LEDGER_CATEGORY_CODE'
62394: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
62397: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
62398: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
62399: )
62400: THEN
62401: xla_ae_lines_pkg.BflowUpgEntry
62402: (p_business_method_code => l_bflow_method_code
62403: ,p_business_class_code => l_bflow_class_code
62404: ,p_balance_type => l_balance_type_code);
62405: ELSE
62438: , x_value_type_code => l_adr_value_type_code
62439: , p_side => 'NA'
62440: );
62441:
62442: xla_ae_lines_pkg.set_ccid(
62443: p_code_combination_id => l_ccid
62444: , p_value_type_code => l_adr_value_type_code
62445: , p_transaction_coa_id => l_adr_transaction_coa_id
62446: , p_accounting_coa_id => l_adr_accounting_coa_id
62474: xla_accounting_err_pkg.build_message
62475: (p_appli_s_name => 'XLA'
62476: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
62477: ,p_token_1 => 'LINE_NUMBER'
62478: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
62479: ,p_token_2 => 'LINE_TYPE_NAME'
62480: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
62481: l_component_type
62482: ,l_component_code
62510: --
62511: --
62512: ------------------------------------------------------------------------------------------------
62513: -- 4219869 Business Flow
62514: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
62515: -- Prior Entry. Currently, the following code is always generated.
62516: ------------------------------------------------------------------------------------------------
62517: XLA_AE_LINES_PKG.ValidateCurrentLine;
62518:
62513: -- 4219869 Business Flow
62514: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
62515: -- Prior Entry. Currently, the following code is always generated.
62516: ------------------------------------------------------------------------------------------------
62517: XLA_AE_LINES_PKG.ValidateCurrentLine;
62518:
62519: ------------------------------------------------------------------------------------
62520: -- 4219869 Business Flow
62521: -- Populated credit and debit amounts -- Need to generate this within IF
62519: ------------------------------------------------------------------------------------
62520: -- 4219869 Business Flow
62521: -- Populated credit and debit amounts -- Need to generate this within IF
62522: ------------------------------------------------------------------------------------
62523: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
62524:
62525: ----------------------------------------------------------------------------------
62526: -- 4219869 Business Flow
62527: -- Update journal entry status -- Need to generate this within IF
62551: -- To allow MPA report to determine if it should generate report process
62552: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
62553: ------------------------------------------------------------------------------------------
62554:
62555: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
62556: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
62557:
62558: --
62559: -- Update the line information that should be overwritten
62552: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
62553: ------------------------------------------------------------------------------------------
62554:
62555: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
62556: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
62557:
62558: --
62559: -- Update the line information that should be overwritten
62560: --
62557:
62558: --
62559: -- Update the line information that should be overwritten
62560: --
62561: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
62562: p_header_num => 1);
62563: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
62564:
62565: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
62559: -- Update the line information that should be overwritten
62560: --
62561: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
62562: p_header_num => 1);
62563: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
62564:
62565: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
62566:
62567: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
62561: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
62562: p_header_num => 1);
62563: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
62564:
62565: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
62566:
62567: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
62568: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
62569: END IF;
62564:
62565: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
62566:
62567: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
62568: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
62569: END IF;
62570:
62571: --
62572: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
62571: --
62572: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
62573: --
62574: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
62575: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
62576: ELSE
62577: ---------------------------------------------------------------------------------------------------
62578: -- 4262811a Switch Sign
62579: ---------------------------------------------------------------------------------------------------
62576: ELSE
62577: ---------------------------------------------------------------------------------------------------
62578: -- 4262811a Switch Sign
62579: ---------------------------------------------------------------------------------------------------
62580: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
62581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62577: ---------------------------------------------------------------------------------------------------
62578: -- 4262811a Switch Sign
62579: ---------------------------------------------------------------------------------------------------
62580: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
62581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62578: -- 4262811a Switch Sign
62579: ---------------------------------------------------------------------------------------------------
62580: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
62581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62586: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
62579: ---------------------------------------------------------------------------------------------------
62580: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
62581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62586: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
62587: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62580: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
62581: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62586: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
62587: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62588:
62582: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62586: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
62587: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62588:
62589: END IF;
62590:
62583: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
62584: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62585: -- 5132302
62586: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
62587: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
62588:
62589: END IF;
62590:
62591: -- 4955764
62588:
62589: END IF;
62590:
62591: -- 4955764
62592: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62593: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
62594:
62595:
62596: XLA_AE_LINES_PKG.ValidateCurrentLine;
62592: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62593: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
62594:
62595:
62596: XLA_AE_LINES_PKG.ValidateCurrentLine;
62597: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
62598:
62599: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
62600: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
62593: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
62594:
62595:
62596: XLA_AE_LINES_PKG.ValidateCurrentLine;
62597: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
62598:
62599: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
62600: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
62601: ,p_balance_type_code => l_balance_type_code);
62769: --
62770: -- bulk performance
62771: --
62772: l_balance_type_code VARCHAR2(1);
62773: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
62774: l_log_module VARCHAR2(240);
62775:
62776: --
62777: -- Upgrade strategy
62837: ') = 'C'
62838: THEN
62839:
62840: --
62841: XLA_AE_LINES_PKG.SetNewLine;
62842:
62843: p_balance_type_code := l_balance_type_code;
62844: -- set the flag so later we will know whether the gain loss line needs to be created
62845:
62849:
62850: --
62851: -- bulk performance
62852: --
62853: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
62854: p_header_num => 0); -- 4262811
62855: --
62856: -- set accounting line options
62857: --
62854: p_header_num => 0); -- 4262811
62855: --
62856: -- set accounting line options
62857: --
62858: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
62859: p_natural_side_code => 'C'
62860: , p_gain_or_loss_flag => 'N'
62861: , p_gl_transfer_mode_code => 'S'
62862: , p_acct_entry_type_code => 'A'
62868: --
62869: --
62870: -- set accounting line type info
62871: --
62872: xla_ae_lines_pkg.SetAcctLineType
62873: (p_component_type => l_component_type
62874: ,p_event_type_code => l_event_type_code
62875: ,p_line_definition_owner_code => l_line_definition_owner_code
62876: ,p_line_definition_code => l_line_definition_code
62882: ,p_event_class_code => l_event_class_code);
62883: --
62884: -- set accounting class
62885: --
62886: xla_ae_lines_pkg.SetAcctClass(
62887: p_accounting_class_code => 'COST_CLEARING'
62888: , p_ae_header_id => l_ae_header_id
62889: );
62890:
62890:
62891: --
62892: -- set rounding class
62893: --
62894: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
62895: 'COST_CLEARING';
62896:
62897: --
62898: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62894: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
62895: 'COST_CLEARING';
62896:
62897: --
62898: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62899: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62900: --
62901: -- bulk performance
62902: --
62895: 'COST_CLEARING';
62896:
62897: --
62898: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
62899: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62900: --
62901: -- bulk performance
62902: --
62903: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62899: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
62900: --
62901: -- bulk performance
62902: --
62903: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62904:
62905: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62906: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62907:
62901: -- bulk performance
62902: --
62903: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
62904:
62905: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62906: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62907:
62908: -- 4955764
62909: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62905: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
62906: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
62907:
62908: -- 4955764
62909: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
62910: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
62911:
62912: -- 4458381 Public Sector Enh
62913:
63029: l_rec_acct_attrs.array_num_value(50) := p_source_62;
63030: l_rec_acct_attrs.array_acct_attr_code(51) := 'UPG_DR_ENC_TYPE_ID';
63031: l_rec_acct_attrs.array_num_value(51) := p_source_63;
63032:
63033: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63034: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63035:
63036: ---------------------------------------------------------------------------------------------------------------
63037: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63030: l_rec_acct_attrs.array_acct_attr_code(51) := 'UPG_DR_ENC_TYPE_ID';
63031: l_rec_acct_attrs.array_num_value(51) := p_source_63;
63032:
63033: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63034: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63035:
63036: ---------------------------------------------------------------------------------------------------------------
63037: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63038: ---------------------------------------------------------------------------------------------------------------
63033: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63034: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63035:
63036: ---------------------------------------------------------------------------------------------------------------
63037: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63038: ---------------------------------------------------------------------------------------------------------------
63039: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63040:
63041: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63035:
63036: ---------------------------------------------------------------------------------------------------------------
63037: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63038: ---------------------------------------------------------------------------------------------------------------
63039: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63040:
63041: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63042: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63043:
63037: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63038: ---------------------------------------------------------------------------------------------------------------
63039: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63040:
63041: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63042: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63043:
63044: IF xla_accounting_cache_pkg.GetValueChar
63045: (p_source_code => 'LEDGER_CATEGORY_CODE'
63038: ---------------------------------------------------------------------------------------------------------------
63039: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63040:
63041: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63042: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63043:
63044: IF xla_accounting_cache_pkg.GetValueChar
63045: (p_source_code => 'LEDGER_CATEGORY_CODE'
63046: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
63049: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
63050: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
63051: )
63052: THEN
63053: xla_ae_lines_pkg.BflowUpgEntry
63054: (p_business_method_code => l_bflow_method_code
63055: ,p_business_class_code => l_bflow_class_code
63056: ,p_balance_type => l_balance_type_code);
63057: ELSE
63091: , x_value_type_code => l_adr_value_type_code
63092: , p_side => 'NA'
63093: );
63094:
63095: xla_ae_lines_pkg.set_ccid(
63096: p_code_combination_id => l_ccid
63097: , p_value_type_code => l_adr_value_type_code
63098: , p_transaction_coa_id => l_adr_transaction_coa_id
63099: , p_accounting_coa_id => l_adr_accounting_coa_id
63127: xla_accounting_err_pkg.build_message
63128: (p_appli_s_name => 'XLA'
63129: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
63130: ,p_token_1 => 'LINE_NUMBER'
63131: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
63132: ,p_token_2 => 'LINE_TYPE_NAME'
63133: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
63134: l_component_type
63135: ,l_component_code
63163: --
63164: --
63165: ------------------------------------------------------------------------------------------------
63166: -- 4219869 Business Flow
63167: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
63168: -- Prior Entry. Currently, the following code is always generated.
63169: ------------------------------------------------------------------------------------------------
63170: XLA_AE_LINES_PKG.ValidateCurrentLine;
63171:
63166: -- 4219869 Business Flow
63167: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
63168: -- Prior Entry. Currently, the following code is always generated.
63169: ------------------------------------------------------------------------------------------------
63170: XLA_AE_LINES_PKG.ValidateCurrentLine;
63171:
63172: ------------------------------------------------------------------------------------
63173: -- 4219869 Business Flow
63174: -- Populated credit and debit amounts -- Need to generate this within IF
63172: ------------------------------------------------------------------------------------
63173: -- 4219869 Business Flow
63174: -- Populated credit and debit amounts -- Need to generate this within IF
63175: ------------------------------------------------------------------------------------
63176: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63177:
63178: ----------------------------------------------------------------------------------
63179: -- 4219869 Business Flow
63180: -- Update journal entry status -- Need to generate this within IF
63204: -- To allow MPA report to determine if it should generate report process
63205: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
63206: ------------------------------------------------------------------------------------------
63207:
63208: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
63209: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
63210:
63211: --
63212: -- Update the line information that should be overwritten
63205: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
63206: ------------------------------------------------------------------------------------------
63207:
63208: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
63209: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
63210:
63211: --
63212: -- Update the line information that should be overwritten
63213: --
63210:
63211: --
63212: -- Update the line information that should be overwritten
63213: --
63214: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63215: p_header_num => 1);
63216: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63217:
63218: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63212: -- Update the line information that should be overwritten
63213: --
63214: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63215: p_header_num => 1);
63216: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63217:
63218: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63219:
63220: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63214: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63215: p_header_num => 1);
63216: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63217:
63218: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63219:
63220: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63221: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
63222: END IF;
63217:
63218: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63219:
63220: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63221: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
63222: END IF;
63223:
63224: --
63225: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
63224: --
63225: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
63226: --
63227: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
63228: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
63229: ELSE
63230: ---------------------------------------------------------------------------------------------------
63231: -- 4262811a Switch Sign
63232: ---------------------------------------------------------------------------------------------------
63229: ELSE
63230: ---------------------------------------------------------------------------------------------------
63231: -- 4262811a Switch Sign
63232: ---------------------------------------------------------------------------------------------------
63233: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63230: ---------------------------------------------------------------------------------------------------
63231: -- 4262811a Switch Sign
63232: ---------------------------------------------------------------------------------------------------
63233: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63231: -- 4262811a Switch Sign
63232: ---------------------------------------------------------------------------------------------------
63233: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63232: ---------------------------------------------------------------------------------------------------
63233: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63233: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63241:
63235: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63241:
63242: END IF;
63243:
63236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63237: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63238: -- 5132302
63239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63240: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63241:
63242: END IF;
63243:
63244: -- 4955764
63241:
63242: END IF;
63243:
63244: -- 4955764
63245: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63246: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63247:
63248:
63249: XLA_AE_LINES_PKG.ValidateCurrentLine;
63245: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63246: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63247:
63248:
63249: XLA_AE_LINES_PKG.ValidateCurrentLine;
63250: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63251:
63252: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
63253: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
63246: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63247:
63248:
63249: XLA_AE_LINES_PKG.ValidateCurrentLine;
63250: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63251:
63252: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
63253: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
63254: ,p_balance_type_code => l_balance_type_code);
63420: --
63421: -- bulk performance
63422: --
63423: l_balance_type_code VARCHAR2(1);
63424: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
63425: l_log_module VARCHAR2(240);
63426:
63427: --
63428: -- Upgrade strategy
63488: ') = 'C'
63489: THEN
63490:
63491: --
63492: XLA_AE_LINES_PKG.SetNewLine;
63493:
63494: p_balance_type_code := l_balance_type_code;
63495: -- set the flag so later we will know whether the gain loss line needs to be created
63496:
63500:
63501: --
63502: -- bulk performance
63503: --
63504: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
63505: p_header_num => 0); -- 4262811
63506: --
63507: -- set accounting line options
63508: --
63505: p_header_num => 0); -- 4262811
63506: --
63507: -- set accounting line options
63508: --
63509: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
63510: p_natural_side_code => 'C'
63511: , p_gain_or_loss_flag => 'N'
63512: , p_gl_transfer_mode_code => 'S'
63513: , p_acct_entry_type_code => 'A'
63519: --
63520: --
63521: -- set accounting line type info
63522: --
63523: xla_ae_lines_pkg.SetAcctLineType
63524: (p_component_type => l_component_type
63525: ,p_event_type_code => l_event_type_code
63526: ,p_line_definition_owner_code => l_line_definition_owner_code
63527: ,p_line_definition_code => l_line_definition_code
63533: ,p_event_class_code => l_event_class_code);
63534: --
63535: -- set accounting class
63536: --
63537: xla_ae_lines_pkg.SetAcctClass(
63538: p_accounting_class_code => 'COST_CLEARING'
63539: , p_ae_header_id => l_ae_header_id
63540: );
63541:
63541:
63542: --
63543: -- set rounding class
63544: --
63545: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
63546: 'COST_CLEARING';
63547:
63548: --
63549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
63545: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
63546: 'COST_CLEARING';
63547:
63548: --
63549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
63550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
63551: --
63552: -- bulk performance
63553: --
63546: 'COST_CLEARING';
63547:
63548: --
63549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
63550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
63551: --
63552: -- bulk performance
63553: --
63554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
63550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
63551: --
63552: -- bulk performance
63553: --
63554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
63555:
63556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
63557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
63558:
63552: -- bulk performance
63553: --
63554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
63555:
63556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
63557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
63558:
63559: -- 4955764
63560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
63557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
63558:
63559: -- 4955764
63560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63561: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
63562:
63563: -- 4458381 Public Sector Enh
63564:
63663: l_rec_acct_attrs.array_num_value(44) := p_source_62;
63664: l_rec_acct_attrs.array_acct_attr_code(45) := 'UPG_DR_ENC_TYPE_ID';
63665: l_rec_acct_attrs.array_num_value(45) := p_source_63;
63666:
63667: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63668: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63669:
63670: ---------------------------------------------------------------------------------------------------------------
63671: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63664: l_rec_acct_attrs.array_acct_attr_code(45) := 'UPG_DR_ENC_TYPE_ID';
63665: l_rec_acct_attrs.array_num_value(45) := p_source_63;
63666:
63667: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63668: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63669:
63670: ---------------------------------------------------------------------------------------------------------------
63671: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63672: ---------------------------------------------------------------------------------------------------------------
63667: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
63668: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
63669:
63670: ---------------------------------------------------------------------------------------------------------------
63671: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63672: ---------------------------------------------------------------------------------------------------------------
63673: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63674:
63675: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63669:
63670: ---------------------------------------------------------------------------------------------------------------
63671: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63672: ---------------------------------------------------------------------------------------------------------------
63673: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63674:
63675: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63676: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63677:
63671: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
63672: ---------------------------------------------------------------------------------------------------------------
63673: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63674:
63675: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63676: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63677:
63678: IF xla_accounting_cache_pkg.GetValueChar
63679: (p_source_code => 'LEDGER_CATEGORY_CODE'
63672: ---------------------------------------------------------------------------------------------------------------
63673: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
63674:
63675: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63676: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
63677:
63678: IF xla_accounting_cache_pkg.GetValueChar
63679: (p_source_code => 'LEDGER_CATEGORY_CODE'
63680: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
63683: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
63684: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
63685: )
63686: THEN
63687: xla_ae_lines_pkg.BflowUpgEntry
63688: (p_business_method_code => l_bflow_method_code
63689: ,p_business_class_code => l_bflow_class_code
63690: ,p_balance_type => l_balance_type_code);
63691: ELSE
63724: , x_value_type_code => l_adr_value_type_code
63725: , p_side => 'NA'
63726: );
63727:
63728: xla_ae_lines_pkg.set_ccid(
63729: p_code_combination_id => l_ccid
63730: , p_value_type_code => l_adr_value_type_code
63731: , p_transaction_coa_id => l_adr_transaction_coa_id
63732: , p_accounting_coa_id => l_adr_accounting_coa_id
63760: xla_accounting_err_pkg.build_message
63761: (p_appli_s_name => 'XLA'
63762: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
63763: ,p_token_1 => 'LINE_NUMBER'
63764: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
63765: ,p_token_2 => 'LINE_TYPE_NAME'
63766: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
63767: l_component_type
63768: ,l_component_code
63796: --
63797: --
63798: ------------------------------------------------------------------------------------------------
63799: -- 4219869 Business Flow
63800: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
63801: -- Prior Entry. Currently, the following code is always generated.
63802: ------------------------------------------------------------------------------------------------
63803: XLA_AE_LINES_PKG.ValidateCurrentLine;
63804:
63799: -- 4219869 Business Flow
63800: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
63801: -- Prior Entry. Currently, the following code is always generated.
63802: ------------------------------------------------------------------------------------------------
63803: XLA_AE_LINES_PKG.ValidateCurrentLine;
63804:
63805: ------------------------------------------------------------------------------------
63806: -- 4219869 Business Flow
63807: -- Populated credit and debit amounts -- Need to generate this within IF
63805: ------------------------------------------------------------------------------------
63806: -- 4219869 Business Flow
63807: -- Populated credit and debit amounts -- Need to generate this within IF
63808: ------------------------------------------------------------------------------------
63809: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63810:
63811: ----------------------------------------------------------------------------------
63812: -- 4219869 Business Flow
63813: -- Update journal entry status -- Need to generate this within IF
63837: -- To allow MPA report to determine if it should generate report process
63838: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
63839: ------------------------------------------------------------------------------------------
63840:
63841: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
63842: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
63843:
63844: --
63845: -- Update the line information that should be overwritten
63838: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
63839: ------------------------------------------------------------------------------------------
63840:
63841: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
63842: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
63843:
63844: --
63845: -- Update the line information that should be overwritten
63846: --
63843:
63844: --
63845: -- Update the line information that should be overwritten
63846: --
63847: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63848: p_header_num => 1);
63849: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63850:
63851: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63845: -- Update the line information that should be overwritten
63846: --
63847: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63848: p_header_num => 1);
63849: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63850:
63851: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63852:
63853: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63847: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
63848: p_header_num => 1);
63849: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
63850:
63851: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63852:
63853: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63854: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
63855: END IF;
63850:
63851: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
63852:
63853: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
63854: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
63855: END IF;
63856:
63857: --
63858: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
63857: --
63858: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
63859: --
63860: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
63861: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
63862: ELSE
63863: ---------------------------------------------------------------------------------------------------
63864: -- 4262811a Switch Sign
63865: ---------------------------------------------------------------------------------------------------
63862: ELSE
63863: ---------------------------------------------------------------------------------------------------
63864: -- 4262811a Switch Sign
63865: ---------------------------------------------------------------------------------------------------
63866: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63863: ---------------------------------------------------------------------------------------------------
63864: -- 4262811a Switch Sign
63865: ---------------------------------------------------------------------------------------------------
63866: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63864: -- 4262811a Switch Sign
63865: ---------------------------------------------------------------------------------------------------
63866: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63872: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63865: ---------------------------------------------------------------------------------------------------
63866: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63872: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63873: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63866: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
63867: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63872: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63873: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63874:
63868: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63872: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63873: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63874:
63875: END IF;
63876:
63869: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
63870: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63871: -- 5132302
63872: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
63873: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
63874:
63875: END IF;
63876:
63877: -- 4955764
63874:
63875: END IF;
63876:
63877: -- 4955764
63878: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63879: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63880:
63881:
63882: XLA_AE_LINES_PKG.ValidateCurrentLine;
63878: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
63879: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63880:
63881:
63882: XLA_AE_LINES_PKG.ValidateCurrentLine;
63883: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63884:
63885: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
63886: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
63879: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
63880:
63881:
63882: XLA_AE_LINES_PKG.ValidateCurrentLine;
63883: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
63884:
63885: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
63886: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
63887: ,p_balance_type_code => l_balance_type_code);
64053: --
64054: -- bulk performance
64055: --
64056: l_balance_type_code VARCHAR2(1);
64057: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
64058: l_log_module VARCHAR2(240);
64059:
64060: --
64061: -- Upgrade strategy
64121: ') = 'D'
64122: THEN
64123:
64124: --
64125: XLA_AE_LINES_PKG.SetNewLine;
64126:
64127: p_balance_type_code := l_balance_type_code;
64128: -- set the flag so later we will know whether the gain loss line needs to be created
64129:
64133:
64134: --
64135: -- bulk performance
64136: --
64137: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
64138: p_header_num => 0); -- 4262811
64139: --
64140: -- set accounting line options
64141: --
64138: p_header_num => 0); -- 4262811
64139: --
64140: -- set accounting line options
64141: --
64142: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
64143: p_natural_side_code => 'D'
64144: , p_gain_or_loss_flag => 'N'
64145: , p_gl_transfer_mode_code => 'S'
64146: , p_acct_entry_type_code => 'A'
64152: --
64153: --
64154: -- set accounting line type info
64155: --
64156: xla_ae_lines_pkg.SetAcctLineType
64157: (p_component_type => l_component_type
64158: ,p_event_type_code => l_event_type_code
64159: ,p_line_definition_owner_code => l_line_definition_owner_code
64160: ,p_line_definition_code => l_line_definition_code
64166: ,p_event_class_code => l_event_class_code);
64167: --
64168: -- set accounting class
64169: --
64170: xla_ae_lines_pkg.SetAcctClass(
64171: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
64172: , p_ae_header_id => l_ae_header_id
64173: );
64174:
64174:
64175: --
64176: -- set rounding class
64177: --
64178: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
64179: 'FEDERAL_PROJECT_COST';
64180:
64181: --
64182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64178: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
64179: 'FEDERAL_PROJECT_COST';
64180:
64181: --
64182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64184: --
64185: -- bulk performance
64186: --
64179: 'FEDERAL_PROJECT_COST';
64180:
64181: --
64182: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64184: --
64185: -- bulk performance
64186: --
64187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64183: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64184: --
64185: -- bulk performance
64186: --
64187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64188:
64189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64191:
64185: -- bulk performance
64186: --
64187: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64188:
64189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64191:
64192: -- 4955764
64193: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64189: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64190: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64191:
64192: -- 4955764
64193: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64194: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
64195:
64196: -- 4458381 Public Sector Enh
64197:
64294: l_rec_acct_attrs.array_num_value(43) := p_source_62;
64295: l_rec_acct_attrs.array_acct_attr_code(44) := 'UPG_DR_ENC_TYPE_ID';
64296: l_rec_acct_attrs.array_num_value(44) := p_source_63;
64297:
64298: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64299: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64300:
64301: ---------------------------------------------------------------------------------------------------------------
64302: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64295: l_rec_acct_attrs.array_acct_attr_code(44) := 'UPG_DR_ENC_TYPE_ID';
64296: l_rec_acct_attrs.array_num_value(44) := p_source_63;
64297:
64298: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64299: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64300:
64301: ---------------------------------------------------------------------------------------------------------------
64302: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64303: ---------------------------------------------------------------------------------------------------------------
64298: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64299: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64300:
64301: ---------------------------------------------------------------------------------------------------------------
64302: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64303: ---------------------------------------------------------------------------------------------------------------
64304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64305:
64306: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64300:
64301: ---------------------------------------------------------------------------------------------------------------
64302: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64303: ---------------------------------------------------------------------------------------------------------------
64304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64305:
64306: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64307: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64308:
64302: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64303: ---------------------------------------------------------------------------------------------------------------
64304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64305:
64306: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64307: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64308:
64309: IF xla_accounting_cache_pkg.GetValueChar
64310: (p_source_code => 'LEDGER_CATEGORY_CODE'
64303: ---------------------------------------------------------------------------------------------------------------
64304: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64305:
64306: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64307: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64308:
64309: IF xla_accounting_cache_pkg.GetValueChar
64310: (p_source_code => 'LEDGER_CATEGORY_CODE'
64311: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
64314: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
64315: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
64316: )
64317: THEN
64318: xla_ae_lines_pkg.BflowUpgEntry
64319: (p_business_method_code => l_bflow_method_code
64320: ,p_business_class_code => l_bflow_class_code
64321: ,p_balance_type => l_balance_type_code);
64322: ELSE
64355: , x_value_type_code => l_adr_value_type_code
64356: , p_side => 'NA'
64357: );
64358:
64359: xla_ae_lines_pkg.set_ccid(
64360: p_code_combination_id => l_ccid
64361: , p_value_type_code => l_adr_value_type_code
64362: , p_transaction_coa_id => l_adr_transaction_coa_id
64363: , p_accounting_coa_id => l_adr_accounting_coa_id
64387: );
64388:
64389: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
64390:
64391: xla_ae_lines_pkg.set_segment(
64392: p_to_segment_code => 'GL_ACCOUNT'
64393: , p_segment_value => l_segment
64394: , p_from_segment_code => l_adr_value_segment_code
64395: , p_from_combination_id => l_adr_value_combination_id
64431: xla_accounting_err_pkg.build_message
64432: (p_appli_s_name => 'XLA'
64433: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
64434: ,p_token_1 => 'LINE_NUMBER'
64435: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
64436: ,p_token_2 => 'LINE_TYPE_NAME'
64437: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
64438: l_component_type
64439: ,l_component_code
64467: --
64468: --
64469: ------------------------------------------------------------------------------------------------
64470: -- 4219869 Business Flow
64471: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
64472: -- Prior Entry. Currently, the following code is always generated.
64473: ------------------------------------------------------------------------------------------------
64474: XLA_AE_LINES_PKG.ValidateCurrentLine;
64475:
64470: -- 4219869 Business Flow
64471: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
64472: -- Prior Entry. Currently, the following code is always generated.
64473: ------------------------------------------------------------------------------------------------
64474: XLA_AE_LINES_PKG.ValidateCurrentLine;
64475:
64476: ------------------------------------------------------------------------------------
64477: -- 4219869 Business Flow
64478: -- Populated credit and debit amounts -- Need to generate this within IF
64476: ------------------------------------------------------------------------------------
64477: -- 4219869 Business Flow
64478: -- Populated credit and debit amounts -- Need to generate this within IF
64479: ------------------------------------------------------------------------------------
64480: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
64481:
64482: ----------------------------------------------------------------------------------
64483: -- 4219869 Business Flow
64484: -- Update journal entry status -- Need to generate this within IF
64508: -- To allow MPA report to determine if it should generate report process
64509: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
64510: ------------------------------------------------------------------------------------------
64511:
64512: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
64513: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
64514:
64515: --
64516: -- Update the line information that should be overwritten
64509: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
64510: ------------------------------------------------------------------------------------------
64511:
64512: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
64513: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
64514:
64515: --
64516: -- Update the line information that should be overwritten
64517: --
64514:
64515: --
64516: -- Update the line information that should be overwritten
64517: --
64518: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
64519: p_header_num => 1);
64520: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
64521:
64522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
64516: -- Update the line information that should be overwritten
64517: --
64518: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
64519: p_header_num => 1);
64520: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
64521:
64522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
64523:
64524: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
64518: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
64519: p_header_num => 1);
64520: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
64521:
64522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
64523:
64524: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
64525: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
64526: END IF;
64521:
64522: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
64523:
64524: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
64525: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
64526: END IF;
64527:
64528: --
64529: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
64528: --
64529: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
64530: --
64531: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
64532: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
64533: ELSE
64534: ---------------------------------------------------------------------------------------------------
64535: -- 4262811a Switch Sign
64536: ---------------------------------------------------------------------------------------------------
64533: ELSE
64534: ---------------------------------------------------------------------------------------------------
64535: -- 4262811a Switch Sign
64536: ---------------------------------------------------------------------------------------------------
64537: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
64538: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64534: ---------------------------------------------------------------------------------------------------
64535: -- 4262811a Switch Sign
64536: ---------------------------------------------------------------------------------------------------
64537: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
64538: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64535: -- 4262811a Switch Sign
64536: ---------------------------------------------------------------------------------------------------
64537: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
64538: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64543: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
64536: ---------------------------------------------------------------------------------------------------
64537: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
64538: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64543: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
64544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64537: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
64538: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64543: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
64544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64545:
64539: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64543: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
64544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64545:
64546: END IF;
64547:
64540: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
64541: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64542: -- 5132302
64543: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
64544: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
64545:
64546: END IF;
64547:
64548: -- 4955764
64545:
64546: END IF;
64547:
64548: -- 4955764
64549: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64550: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
64551:
64552:
64553: XLA_AE_LINES_PKG.ValidateCurrentLine;
64549: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64550: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
64551:
64552:
64553: XLA_AE_LINES_PKG.ValidateCurrentLine;
64554: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
64555:
64556: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
64557: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
64550: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
64551:
64552:
64553: XLA_AE_LINES_PKG.ValidateCurrentLine;
64554: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
64555:
64556: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
64557: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
64558: ,p_balance_type_code => l_balance_type_code);
64726: --
64727: -- bulk performance
64728: --
64729: l_balance_type_code VARCHAR2(1);
64730: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
64731: l_log_module VARCHAR2(240);
64732:
64733: --
64734: -- Upgrade strategy
64794: ') = 'C'
64795: THEN
64796:
64797: --
64798: XLA_AE_LINES_PKG.SetNewLine;
64799:
64800: p_balance_type_code := l_balance_type_code;
64801: -- set the flag so later we will know whether the gain loss line needs to be created
64802:
64806:
64807: --
64808: -- bulk performance
64809: --
64810: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
64811: p_header_num => 0); -- 4262811
64812: --
64813: -- set accounting line options
64814: --
64811: p_header_num => 0); -- 4262811
64812: --
64813: -- set accounting line options
64814: --
64815: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
64816: p_natural_side_code => 'C'
64817: , p_gain_or_loss_flag => 'N'
64818: , p_gl_transfer_mode_code => 'S'
64819: , p_acct_entry_type_code => 'A'
64825: --
64826: --
64827: -- set accounting line type info
64828: --
64829: xla_ae_lines_pkg.SetAcctLineType
64830: (p_component_type => l_component_type
64831: ,p_event_type_code => l_event_type_code
64832: ,p_line_definition_owner_code => l_line_definition_owner_code
64833: ,p_line_definition_code => l_line_definition_code
64839: ,p_event_class_code => l_event_class_code);
64840: --
64841: -- set accounting class
64842: --
64843: xla_ae_lines_pkg.SetAcctClass(
64844: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
64845: , p_ae_header_id => l_ae_header_id
64846: );
64847:
64847:
64848: --
64849: -- set rounding class
64850: --
64851: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
64852: 'FEDERAL_PROJECT_COST_CLEARING';
64853:
64854: --
64855: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64851: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
64852: 'FEDERAL_PROJECT_COST_CLEARING';
64853:
64854: --
64855: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64856: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64857: --
64858: -- bulk performance
64859: --
64852: 'FEDERAL_PROJECT_COST_CLEARING';
64853:
64854: --
64855: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
64856: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64857: --
64858: -- bulk performance
64859: --
64860: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64856: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
64857: --
64858: -- bulk performance
64859: --
64860: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64861:
64862: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64863: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64864:
64858: -- bulk performance
64859: --
64860: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
64861:
64862: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64863: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64864:
64865: -- 4955764
64866: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64862: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
64863: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
64864:
64865: -- 4955764
64866: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
64867: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
64868:
64869: -- 4458381 Public Sector Enh
64870:
64984: l_rec_acct_attrs.array_num_value(49) := p_source_62;
64985: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
64986: l_rec_acct_attrs.array_num_value(50) := p_source_63;
64987:
64988: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64989: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64990:
64991: ---------------------------------------------------------------------------------------------------------------
64992: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64985: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
64986: l_rec_acct_attrs.array_num_value(50) := p_source_63;
64987:
64988: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64989: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64990:
64991: ---------------------------------------------------------------------------------------------------------------
64992: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64993: ---------------------------------------------------------------------------------------------------------------
64988: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
64989: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
64990:
64991: ---------------------------------------------------------------------------------------------------------------
64992: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64993: ---------------------------------------------------------------------------------------------------------------
64994: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64995:
64996: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64990:
64991: ---------------------------------------------------------------------------------------------------------------
64992: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64993: ---------------------------------------------------------------------------------------------------------------
64994: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64995:
64996: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64997: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64998:
64992: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
64993: ---------------------------------------------------------------------------------------------------------------
64994: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64995:
64996: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64997: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64998:
64999: IF xla_accounting_cache_pkg.GetValueChar
65000: (p_source_code => 'LEDGER_CATEGORY_CODE'
64993: ---------------------------------------------------------------------------------------------------------------
64994: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
64995:
64996: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64997: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
64998:
64999: IF xla_accounting_cache_pkg.GetValueChar
65000: (p_source_code => 'LEDGER_CATEGORY_CODE'
65001: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
65004: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
65005: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
65006: )
65007: THEN
65008: xla_ae_lines_pkg.BflowUpgEntry
65009: (p_business_method_code => l_bflow_method_code
65010: ,p_business_class_code => l_bflow_class_code
65011: ,p_balance_type => l_balance_type_code);
65012: ELSE
65046: , x_value_type_code => l_adr_value_type_code
65047: , p_side => 'NA'
65048: );
65049:
65050: xla_ae_lines_pkg.set_ccid(
65051: p_code_combination_id => l_ccid
65052: , p_value_type_code => l_adr_value_type_code
65053: , p_transaction_coa_id => l_adr_transaction_coa_id
65054: , p_accounting_coa_id => l_adr_accounting_coa_id
65078: );
65079:
65080: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
65081:
65082: xla_ae_lines_pkg.set_segment(
65083: p_to_segment_code => 'GL_ACCOUNT'
65084: , p_segment_value => l_segment
65085: , p_from_segment_code => l_adr_value_segment_code
65086: , p_from_combination_id => l_adr_value_combination_id
65122: xla_accounting_err_pkg.build_message
65123: (p_appli_s_name => 'XLA'
65124: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
65125: ,p_token_1 => 'LINE_NUMBER'
65126: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
65127: ,p_token_2 => 'LINE_TYPE_NAME'
65128: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
65129: l_component_type
65130: ,l_component_code
65158: --
65159: --
65160: ------------------------------------------------------------------------------------------------
65161: -- 4219869 Business Flow
65162: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
65163: -- Prior Entry. Currently, the following code is always generated.
65164: ------------------------------------------------------------------------------------------------
65165: XLA_AE_LINES_PKG.ValidateCurrentLine;
65166:
65161: -- 4219869 Business Flow
65162: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
65163: -- Prior Entry. Currently, the following code is always generated.
65164: ------------------------------------------------------------------------------------------------
65165: XLA_AE_LINES_PKG.ValidateCurrentLine;
65166:
65167: ------------------------------------------------------------------------------------
65168: -- 4219869 Business Flow
65169: -- Populated credit and debit amounts -- Need to generate this within IF
65167: ------------------------------------------------------------------------------------
65168: -- 4219869 Business Flow
65169: -- Populated credit and debit amounts -- Need to generate this within IF
65170: ------------------------------------------------------------------------------------
65171: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65172:
65173: ----------------------------------------------------------------------------------
65174: -- 4219869 Business Flow
65175: -- Update journal entry status -- Need to generate this within IF
65199: -- To allow MPA report to determine if it should generate report process
65200: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
65201: ------------------------------------------------------------------------------------------
65202:
65203: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
65204: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
65205:
65206: --
65207: -- Update the line information that should be overwritten
65200: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
65201: ------------------------------------------------------------------------------------------
65202:
65203: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
65204: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
65205:
65206: --
65207: -- Update the line information that should be overwritten
65208: --
65205:
65206: --
65207: -- Update the line information that should be overwritten
65208: --
65209: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65210: p_header_num => 1);
65211: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65212:
65213: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65207: -- Update the line information that should be overwritten
65208: --
65209: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65210: p_header_num => 1);
65211: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65212:
65213: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65214:
65215: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65209: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65210: p_header_num => 1);
65211: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65212:
65213: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65214:
65215: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65216: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
65217: END IF;
65212:
65213: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65214:
65215: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65216: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
65217: END IF;
65218:
65219: --
65220: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
65219: --
65220: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
65221: --
65222: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
65223: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
65224: ELSE
65225: ---------------------------------------------------------------------------------------------------
65226: -- 4262811a Switch Sign
65227: ---------------------------------------------------------------------------------------------------
65224: ELSE
65225: ---------------------------------------------------------------------------------------------------
65226: -- 4262811a Switch Sign
65227: ---------------------------------------------------------------------------------------------------
65228: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65229: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65225: ---------------------------------------------------------------------------------------------------
65226: -- 4262811a Switch Sign
65227: ---------------------------------------------------------------------------------------------------
65228: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65229: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65226: -- 4262811a Switch Sign
65227: ---------------------------------------------------------------------------------------------------
65228: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65229: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65234: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65227: ---------------------------------------------------------------------------------------------------
65228: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65229: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65234: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65235: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65228: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65229: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65234: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65235: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65236:
65230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65234: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65235: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65236:
65237: END IF;
65238:
65231: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65232: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65233: -- 5132302
65234: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65235: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65236:
65237: END IF;
65238:
65239: -- 4955764
65236:
65237: END IF;
65238:
65239: -- 4955764
65240: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65241: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65242:
65243:
65244: XLA_AE_LINES_PKG.ValidateCurrentLine;
65240: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65241: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65242:
65243:
65244: XLA_AE_LINES_PKG.ValidateCurrentLine;
65245: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65246:
65247: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
65248: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
65241: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65242:
65243:
65244: XLA_AE_LINES_PKG.ValidateCurrentLine;
65245: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65246:
65247: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
65248: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
65249: ,p_balance_type_code => l_balance_type_code);
65417: --
65418: -- bulk performance
65419: --
65420: l_balance_type_code VARCHAR2(1);
65421: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
65422: l_log_module VARCHAR2(240);
65423:
65424: --
65425: -- Upgrade strategy
65485: ') = 'D'
65486: THEN
65487:
65488: --
65489: XLA_AE_LINES_PKG.SetNewLine;
65490:
65491: p_balance_type_code := l_balance_type_code;
65492: -- set the flag so later we will know whether the gain loss line needs to be created
65493:
65497:
65498: --
65499: -- bulk performance
65500: --
65501: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
65502: p_header_num => 0); -- 4262811
65503: --
65504: -- set accounting line options
65505: --
65502: p_header_num => 0); -- 4262811
65503: --
65504: -- set accounting line options
65505: --
65506: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
65507: p_natural_side_code => 'D'
65508: , p_gain_or_loss_flag => 'N'
65509: , p_gl_transfer_mode_code => 'S'
65510: , p_acct_entry_type_code => 'A'
65516: --
65517: --
65518: -- set accounting line type info
65519: --
65520: xla_ae_lines_pkg.SetAcctLineType
65521: (p_component_type => l_component_type
65522: ,p_event_type_code => l_event_type_code
65523: ,p_line_definition_owner_code => l_line_definition_owner_code
65524: ,p_line_definition_code => l_line_definition_code
65530: ,p_event_class_code => l_event_class_code);
65531: --
65532: -- set accounting class
65533: --
65534: xla_ae_lines_pkg.SetAcctClass(
65535: p_accounting_class_code => 'FEDERAL_PROJECT_COST'
65536: , p_ae_header_id => l_ae_header_id
65537: );
65538:
65538:
65539: --
65540: -- set rounding class
65541: --
65542: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
65543: 'FEDERAL_PROJECT_COST';
65544:
65545: --
65546: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
65542: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
65543: 'FEDERAL_PROJECT_COST';
65544:
65545: --
65546: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
65547: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
65548: --
65549: -- bulk performance
65550: --
65543: 'FEDERAL_PROJECT_COST';
65544:
65545: --
65546: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
65547: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
65548: --
65549: -- bulk performance
65550: --
65551: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
65547: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
65548: --
65549: -- bulk performance
65550: --
65551: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
65552:
65553: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
65554: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
65555:
65549: -- bulk performance
65550: --
65551: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
65552:
65553: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
65554: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
65555:
65556: -- 4955764
65557: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65553: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
65554: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
65555:
65556: -- 4955764
65557: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65558: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
65559:
65560: -- 4458381 Public Sector Enh
65561:
65675: l_rec_acct_attrs.array_num_value(49) := p_source_62;
65676: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
65677: l_rec_acct_attrs.array_num_value(50) := p_source_63;
65678:
65679: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
65680: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
65681:
65682: ---------------------------------------------------------------------------------------------------------------
65683: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
65676: l_rec_acct_attrs.array_acct_attr_code(50) := 'UPG_DR_ENC_TYPE_ID';
65677: l_rec_acct_attrs.array_num_value(50) := p_source_63;
65678:
65679: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
65680: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
65681:
65682: ---------------------------------------------------------------------------------------------------------------
65683: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
65684: ---------------------------------------------------------------------------------------------------------------
65679: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
65680: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
65681:
65682: ---------------------------------------------------------------------------------------------------------------
65683: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
65684: ---------------------------------------------------------------------------------------------------------------
65685: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
65686:
65687: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65681:
65682: ---------------------------------------------------------------------------------------------------------------
65683: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
65684: ---------------------------------------------------------------------------------------------------------------
65685: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
65686:
65687: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65688: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65689:
65683: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
65684: ---------------------------------------------------------------------------------------------------------------
65685: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
65686:
65687: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65688: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65689:
65690: IF xla_accounting_cache_pkg.GetValueChar
65691: (p_source_code => 'LEDGER_CATEGORY_CODE'
65684: ---------------------------------------------------------------------------------------------------------------
65685: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
65686:
65687: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65688: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
65689:
65690: IF xla_accounting_cache_pkg.GetValueChar
65691: (p_source_code => 'LEDGER_CATEGORY_CODE'
65692: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
65695: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
65696: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
65697: )
65698: THEN
65699: xla_ae_lines_pkg.BflowUpgEntry
65700: (p_business_method_code => l_bflow_method_code
65701: ,p_business_class_code => l_bflow_class_code
65702: ,p_balance_type => l_balance_type_code);
65703: ELSE
65737: , x_value_type_code => l_adr_value_type_code
65738: , p_side => 'NA'
65739: );
65740:
65741: xla_ae_lines_pkg.set_ccid(
65742: p_code_combination_id => l_ccid
65743: , p_value_type_code => l_adr_value_type_code
65744: , p_transaction_coa_id => l_adr_transaction_coa_id
65745: , p_accounting_coa_id => l_adr_accounting_coa_id
65769: );
65770:
65771: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
65772:
65773: xla_ae_lines_pkg.set_segment(
65774: p_to_segment_code => 'GL_ACCOUNT'
65775: , p_segment_value => l_segment
65776: , p_from_segment_code => l_adr_value_segment_code
65777: , p_from_combination_id => l_adr_value_combination_id
65813: xla_accounting_err_pkg.build_message
65814: (p_appli_s_name => 'XLA'
65815: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
65816: ,p_token_1 => 'LINE_NUMBER'
65817: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
65818: ,p_token_2 => 'LINE_TYPE_NAME'
65819: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
65820: l_component_type
65821: ,l_component_code
65849: --
65850: --
65851: ------------------------------------------------------------------------------------------------
65852: -- 4219869 Business Flow
65853: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
65854: -- Prior Entry. Currently, the following code is always generated.
65855: ------------------------------------------------------------------------------------------------
65856: XLA_AE_LINES_PKG.ValidateCurrentLine;
65857:
65852: -- 4219869 Business Flow
65853: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
65854: -- Prior Entry. Currently, the following code is always generated.
65855: ------------------------------------------------------------------------------------------------
65856: XLA_AE_LINES_PKG.ValidateCurrentLine;
65857:
65858: ------------------------------------------------------------------------------------
65859: -- 4219869 Business Flow
65860: -- Populated credit and debit amounts -- Need to generate this within IF
65858: ------------------------------------------------------------------------------------
65859: -- 4219869 Business Flow
65860: -- Populated credit and debit amounts -- Need to generate this within IF
65861: ------------------------------------------------------------------------------------
65862: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65863:
65864: ----------------------------------------------------------------------------------
65865: -- 4219869 Business Flow
65866: -- Update journal entry status -- Need to generate this within IF
65890: -- To allow MPA report to determine if it should generate report process
65891: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
65892: ------------------------------------------------------------------------------------------
65893:
65894: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
65895: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
65896:
65897: --
65898: -- Update the line information that should be overwritten
65891: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
65892: ------------------------------------------------------------------------------------------
65893:
65894: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
65895: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
65896:
65897: --
65898: -- Update the line information that should be overwritten
65899: --
65896:
65897: --
65898: -- Update the line information that should be overwritten
65899: --
65900: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65901: p_header_num => 1);
65902: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65903:
65904: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65898: -- Update the line information that should be overwritten
65899: --
65900: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65901: p_header_num => 1);
65902: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65903:
65904: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65905:
65906: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65900: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
65901: p_header_num => 1);
65902: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
65903:
65904: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65905:
65906: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65907: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
65908: END IF;
65903:
65904: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
65905:
65906: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
65907: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
65908: END IF;
65909:
65910: --
65911: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
65910: --
65911: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
65912: --
65913: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
65914: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
65915: ELSE
65916: ---------------------------------------------------------------------------------------------------
65917: -- 4262811a Switch Sign
65918: ---------------------------------------------------------------------------------------------------
65915: ELSE
65916: ---------------------------------------------------------------------------------------------------
65917: -- 4262811a Switch Sign
65918: ---------------------------------------------------------------------------------------------------
65919: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65916: ---------------------------------------------------------------------------------------------------
65917: -- 4262811a Switch Sign
65918: ---------------------------------------------------------------------------------------------------
65919: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65917: -- 4262811a Switch Sign
65918: ---------------------------------------------------------------------------------------------------
65919: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65918: ---------------------------------------------------------------------------------------------------
65919: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65919: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
65920: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65927:
65921: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65927:
65928: END IF;
65929:
65922: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
65923: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65924: -- 5132302
65925: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
65926: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
65927:
65928: END IF;
65929:
65930: -- 4955764
65927:
65928: END IF;
65929:
65930: -- 4955764
65931: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65932: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65933:
65934:
65935: XLA_AE_LINES_PKG.ValidateCurrentLine;
65931: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
65932: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65933:
65934:
65935: XLA_AE_LINES_PKG.ValidateCurrentLine;
65936: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65937:
65938: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
65939: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
65932: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
65933:
65934:
65935: XLA_AE_LINES_PKG.ValidateCurrentLine;
65936: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
65937:
65938: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
65939: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
65940: ,p_balance_type_code => l_balance_type_code);
66106: --
66107: -- bulk performance
66108: --
66109: l_balance_type_code VARCHAR2(1);
66110: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
66111: l_log_module VARCHAR2(240);
66112:
66113: --
66114: -- Upgrade strategy
66174: ') = 'C'
66175: THEN
66176:
66177: --
66178: XLA_AE_LINES_PKG.SetNewLine;
66179:
66180: p_balance_type_code := l_balance_type_code;
66181: -- set the flag so later we will know whether the gain loss line needs to be created
66182:
66186:
66187: --
66188: -- bulk performance
66189: --
66190: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
66191: p_header_num => 0); -- 4262811
66192: --
66193: -- set accounting line options
66194: --
66191: p_header_num => 0); -- 4262811
66192: --
66193: -- set accounting line options
66194: --
66195: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
66196: p_natural_side_code => 'C'
66197: , p_gain_or_loss_flag => 'N'
66198: , p_gl_transfer_mode_code => 'S'
66199: , p_acct_entry_type_code => 'A'
66205: --
66206: --
66207: -- set accounting line type info
66208: --
66209: xla_ae_lines_pkg.SetAcctLineType
66210: (p_component_type => l_component_type
66211: ,p_event_type_code => l_event_type_code
66212: ,p_line_definition_owner_code => l_line_definition_owner_code
66213: ,p_line_definition_code => l_line_definition_code
66219: ,p_event_class_code => l_event_class_code);
66220: --
66221: -- set accounting class
66222: --
66223: xla_ae_lines_pkg.SetAcctClass(
66224: p_accounting_class_code => 'FEDERAL_PROJECT_COST_CLEARING'
66225: , p_ae_header_id => l_ae_header_id
66226: );
66227:
66227:
66228: --
66229: -- set rounding class
66230: --
66231: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
66232: 'FEDERAL_PROJECT_COST_CLEARING';
66233:
66234: --
66235: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66231: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
66232: 'FEDERAL_PROJECT_COST_CLEARING';
66233:
66234: --
66235: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66236: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66237: --
66238: -- bulk performance
66239: --
66232: 'FEDERAL_PROJECT_COST_CLEARING';
66233:
66234: --
66235: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66236: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66237: --
66238: -- bulk performance
66239: --
66240: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66236: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66237: --
66238: -- bulk performance
66239: --
66240: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66241:
66242: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66243: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66244:
66238: -- bulk performance
66239: --
66240: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66241:
66242: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66243: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66244:
66245: -- 4955764
66246: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66242: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66243: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66244:
66245: -- 4955764
66246: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66247: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
66248:
66249: -- 4458381 Public Sector Enh
66250:
66347: l_rec_acct_attrs.array_num_value(43) := p_source_62;
66348: l_rec_acct_attrs.array_acct_attr_code(44) := 'UPG_DR_ENC_TYPE_ID';
66349: l_rec_acct_attrs.array_num_value(44) := p_source_63;
66350:
66351: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66352: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66353:
66354: ---------------------------------------------------------------------------------------------------------------
66355: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66348: l_rec_acct_attrs.array_acct_attr_code(44) := 'UPG_DR_ENC_TYPE_ID';
66349: l_rec_acct_attrs.array_num_value(44) := p_source_63;
66350:
66351: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66352: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66353:
66354: ---------------------------------------------------------------------------------------------------------------
66355: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66356: ---------------------------------------------------------------------------------------------------------------
66351: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66352: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66353:
66354: ---------------------------------------------------------------------------------------------------------------
66355: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66356: ---------------------------------------------------------------------------------------------------------------
66357: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66358:
66359: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66353:
66354: ---------------------------------------------------------------------------------------------------------------
66355: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66356: ---------------------------------------------------------------------------------------------------------------
66357: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66358:
66359: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66360: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66361:
66355: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66356: ---------------------------------------------------------------------------------------------------------------
66357: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66358:
66359: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66360: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66361:
66362: IF xla_accounting_cache_pkg.GetValueChar
66363: (p_source_code => 'LEDGER_CATEGORY_CODE'
66356: ---------------------------------------------------------------------------------------------------------------
66357: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66358:
66359: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66360: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66361:
66362: IF xla_accounting_cache_pkg.GetValueChar
66363: (p_source_code => 'LEDGER_CATEGORY_CODE'
66364: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
66367: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
66368: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
66369: )
66370: THEN
66371: xla_ae_lines_pkg.BflowUpgEntry
66372: (p_business_method_code => l_bflow_method_code
66373: ,p_business_class_code => l_bflow_class_code
66374: ,p_balance_type => l_balance_type_code);
66375: ELSE
66408: , x_value_type_code => l_adr_value_type_code
66409: , p_side => 'NA'
66410: );
66411:
66412: xla_ae_lines_pkg.set_ccid(
66413: p_code_combination_id => l_ccid
66414: , p_value_type_code => l_adr_value_type_code
66415: , p_transaction_coa_id => l_adr_transaction_coa_id
66416: , p_accounting_coa_id => l_adr_accounting_coa_id
66440: );
66441:
66442: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
66443:
66444: xla_ae_lines_pkg.set_segment(
66445: p_to_segment_code => 'GL_ACCOUNT'
66446: , p_segment_value => l_segment
66447: , p_from_segment_code => l_adr_value_segment_code
66448: , p_from_combination_id => l_adr_value_combination_id
66484: xla_accounting_err_pkg.build_message
66485: (p_appli_s_name => 'XLA'
66486: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
66487: ,p_token_1 => 'LINE_NUMBER'
66488: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
66489: ,p_token_2 => 'LINE_TYPE_NAME'
66490: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
66491: l_component_type
66492: ,l_component_code
66520: --
66521: --
66522: ------------------------------------------------------------------------------------------------
66523: -- 4219869 Business Flow
66524: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
66525: -- Prior Entry. Currently, the following code is always generated.
66526: ------------------------------------------------------------------------------------------------
66527: XLA_AE_LINES_PKG.ValidateCurrentLine;
66528:
66523: -- 4219869 Business Flow
66524: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
66525: -- Prior Entry. Currently, the following code is always generated.
66526: ------------------------------------------------------------------------------------------------
66527: XLA_AE_LINES_PKG.ValidateCurrentLine;
66528:
66529: ------------------------------------------------------------------------------------
66530: -- 4219869 Business Flow
66531: -- Populated credit and debit amounts -- Need to generate this within IF
66529: ------------------------------------------------------------------------------------
66530: -- 4219869 Business Flow
66531: -- Populated credit and debit amounts -- Need to generate this within IF
66532: ------------------------------------------------------------------------------------
66533: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
66534:
66535: ----------------------------------------------------------------------------------
66536: -- 4219869 Business Flow
66537: -- Update journal entry status -- Need to generate this within IF
66561: -- To allow MPA report to determine if it should generate report process
66562: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
66563: ------------------------------------------------------------------------------------------
66564:
66565: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
66566: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
66567:
66568: --
66569: -- Update the line information that should be overwritten
66562: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
66563: ------------------------------------------------------------------------------------------
66564:
66565: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
66566: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
66567:
66568: --
66569: -- Update the line information that should be overwritten
66570: --
66567:
66568: --
66569: -- Update the line information that should be overwritten
66570: --
66571: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
66572: p_header_num => 1);
66573: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
66574:
66575: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
66569: -- Update the line information that should be overwritten
66570: --
66571: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
66572: p_header_num => 1);
66573: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
66574:
66575: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
66576:
66577: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
66571: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
66572: p_header_num => 1);
66573: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
66574:
66575: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
66576:
66577: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
66578: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
66579: END IF;
66574:
66575: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
66576:
66577: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
66578: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
66579: END IF;
66580:
66581: --
66582: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
66581: --
66582: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
66583: --
66584: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
66585: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
66586: ELSE
66587: ---------------------------------------------------------------------------------------------------
66588: -- 4262811a Switch Sign
66589: ---------------------------------------------------------------------------------------------------
66586: ELSE
66587: ---------------------------------------------------------------------------------------------------
66588: -- 4262811a Switch Sign
66589: ---------------------------------------------------------------------------------------------------
66590: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
66591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66587: ---------------------------------------------------------------------------------------------------
66588: -- 4262811a Switch Sign
66589: ---------------------------------------------------------------------------------------------------
66590: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
66591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66588: -- 4262811a Switch Sign
66589: ---------------------------------------------------------------------------------------------------
66590: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
66591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66596: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
66589: ---------------------------------------------------------------------------------------------------
66590: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
66591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66596: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
66597: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66590: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
66591: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66596: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
66597: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66598:
66592: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66596: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
66597: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66598:
66599: END IF;
66600:
66593: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
66594: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66595: -- 5132302
66596: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
66597: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
66598:
66599: END IF;
66600:
66601: -- 4955764
66598:
66599: END IF;
66600:
66601: -- 4955764
66602: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66603: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
66604:
66605:
66606: XLA_AE_LINES_PKG.ValidateCurrentLine;
66602: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66603: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
66604:
66605:
66606: XLA_AE_LINES_PKG.ValidateCurrentLine;
66607: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
66608:
66609: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
66610: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
66603: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
66604:
66605:
66606: XLA_AE_LINES_PKG.ValidateCurrentLine;
66607: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
66608:
66609: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
66610: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
66611: ,p_balance_type_code => l_balance_type_code);
66740: --
66741: -- bulk performance
66742: --
66743: l_balance_type_code VARCHAR2(1);
66744: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
66745: l_log_module VARCHAR2(240);
66746:
66747: --
66748: -- Upgrade strategy
66810: ') = 'N'
66811: THEN
66812:
66813: --
66814: XLA_AE_LINES_PKG.SetNewLine;
66815:
66816: p_balance_type_code := l_balance_type_code;
66817: -- set the flag so later we will know whether the gain loss line needs to be created
66818:
66822:
66823: --
66824: -- bulk performance
66825: --
66826: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
66827: p_header_num => 0); -- 4262811
66828: --
66829: -- set accounting line options
66830: --
66827: p_header_num => 0); -- 4262811
66828: --
66829: -- set accounting line options
66830: --
66831: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
66832: p_natural_side_code => 'D'
66833: , p_gain_or_loss_flag => 'N'
66834: , p_gl_transfer_mode_code => 'S'
66835: , p_acct_entry_type_code => 'A'
66841: --
66842: --
66843: -- set accounting line type info
66844: --
66845: xla_ae_lines_pkg.SetAcctLineType
66846: (p_component_type => l_component_type
66847: ,p_event_type_code => l_event_type_code
66848: ,p_line_definition_owner_code => l_line_definition_owner_code
66849: ,p_line_definition_code => l_line_definition_code
66855: ,p_event_class_code => l_event_class_code);
66856: --
66857: -- set accounting class
66858: --
66859: xla_ae_lines_pkg.SetAcctClass(
66860: p_accounting_class_code => 'UNBILL'
66861: , p_ae_header_id => l_ae_header_id
66862: );
66863:
66863:
66864: --
66865: -- set rounding class
66866: --
66867: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
66868: 'UNBILL';
66869:
66870: --
66871: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66867: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
66868: 'UNBILL';
66869:
66870: --
66871: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66872: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66873: --
66874: -- bulk performance
66875: --
66868: 'UNBILL';
66869:
66870: --
66871: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
66872: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66873: --
66874: -- bulk performance
66875: --
66876: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66872: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
66873: --
66874: -- bulk performance
66875: --
66876: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66877:
66878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66879: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66880:
66874: -- bulk performance
66875: --
66876: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
66877:
66878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66879: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66880:
66881: -- 4955764
66882: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66878: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
66879: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
66880:
66881: -- 4955764
66882: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
66883: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
66884:
66885: -- 4458381 Public Sector Enh
66886:
66910: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
66911: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
66912: l_rec_acct_attrs.array_num_value(10) := p_source_43;
66913:
66914: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66915: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66916:
66917: ---------------------------------------------------------------------------------------------------------------
66918: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66911: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
66912: l_rec_acct_attrs.array_num_value(10) := p_source_43;
66913:
66914: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66915: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66916:
66917: ---------------------------------------------------------------------------------------------------------------
66918: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66919: ---------------------------------------------------------------------------------------------------------------
66914: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
66915: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
66916:
66917: ---------------------------------------------------------------------------------------------------------------
66918: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66919: ---------------------------------------------------------------------------------------------------------------
66920: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66921:
66922: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66916:
66917: ---------------------------------------------------------------------------------------------------------------
66918: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66919: ---------------------------------------------------------------------------------------------------------------
66920: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66921:
66922: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66923: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66924:
66918: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
66919: ---------------------------------------------------------------------------------------------------------------
66920: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66921:
66922: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66923: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66924:
66925: IF xla_accounting_cache_pkg.GetValueChar
66926: (p_source_code => 'LEDGER_CATEGORY_CODE'
66919: ---------------------------------------------------------------------------------------------------------------
66920: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
66921:
66922: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66923: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
66924:
66925: IF xla_accounting_cache_pkg.GetValueChar
66926: (p_source_code => 'LEDGER_CATEGORY_CODE'
66927: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
66930: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
66931: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
66932: )
66933: THEN
66934: xla_ae_lines_pkg.BflowUpgEntry
66935: (p_business_method_code => l_bflow_method_code
66936: ,p_business_class_code => l_bflow_class_code
66937: ,p_balance_type => l_balance_type_code);
66938: ELSE
66970: , x_value_type_code => l_adr_value_type_code
66971: , p_side => 'NA'
66972: );
66973:
66974: xla_ae_lines_pkg.set_ccid(
66975: p_code_combination_id => l_ccid
66976: , p_value_type_code => l_adr_value_type_code
66977: , p_transaction_coa_id => l_adr_transaction_coa_id
66978: , p_accounting_coa_id => l_adr_accounting_coa_id
67006: xla_accounting_err_pkg.build_message
67007: (p_appli_s_name => 'XLA'
67008: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
67009: ,p_token_1 => 'LINE_NUMBER'
67010: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
67011: ,p_token_2 => 'LINE_TYPE_NAME'
67012: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
67013: l_component_type
67014: ,l_component_code
67042: --
67043: --
67044: ------------------------------------------------------------------------------------------------
67045: -- 4219869 Business Flow
67046: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
67047: -- Prior Entry. Currently, the following code is always generated.
67048: ------------------------------------------------------------------------------------------------
67049: XLA_AE_LINES_PKG.ValidateCurrentLine;
67050:
67045: -- 4219869 Business Flow
67046: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
67047: -- Prior Entry. Currently, the following code is always generated.
67048: ------------------------------------------------------------------------------------------------
67049: XLA_AE_LINES_PKG.ValidateCurrentLine;
67050:
67051: ------------------------------------------------------------------------------------
67052: -- 4219869 Business Flow
67053: -- Populated credit and debit amounts -- Need to generate this within IF
67051: ------------------------------------------------------------------------------------
67052: -- 4219869 Business Flow
67053: -- Populated credit and debit amounts -- Need to generate this within IF
67054: ------------------------------------------------------------------------------------
67055: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67056:
67057: ----------------------------------------------------------------------------------
67058: -- 4219869 Business Flow
67059: -- Update journal entry status -- Need to generate this within IF
67083: -- To allow MPA report to determine if it should generate report process
67084: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
67085: ------------------------------------------------------------------------------------------
67086:
67087: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
67088: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
67089:
67090: --
67091: -- Update the line information that should be overwritten
67084: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
67085: ------------------------------------------------------------------------------------------
67086:
67087: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
67088: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
67089:
67090: --
67091: -- Update the line information that should be overwritten
67092: --
67089:
67090: --
67091: -- Update the line information that should be overwritten
67092: --
67093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67094: p_header_num => 1);
67095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67096:
67097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67091: -- Update the line information that should be overwritten
67092: --
67093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67094: p_header_num => 1);
67095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67096:
67097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67098:
67099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67093: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67094: p_header_num => 1);
67095: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67096:
67097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67098:
67099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67100: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
67101: END IF;
67096:
67097: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67098:
67099: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67100: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
67101: END IF;
67102:
67103: --
67104: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
67103: --
67104: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
67105: --
67106: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
67107: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
67108: ELSE
67109: ---------------------------------------------------------------------------------------------------
67110: -- 4262811a Switch Sign
67111: ---------------------------------------------------------------------------------------------------
67108: ELSE
67109: ---------------------------------------------------------------------------------------------------
67110: -- 4262811a Switch Sign
67111: ---------------------------------------------------------------------------------------------------
67112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67109: ---------------------------------------------------------------------------------------------------
67110: -- 4262811a Switch Sign
67111: ---------------------------------------------------------------------------------------------------
67112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67110: -- 4262811a Switch Sign
67111: ---------------------------------------------------------------------------------------------------
67112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67111: ---------------------------------------------------------------------------------------------------
67112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67112: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67113: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67120:
67114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67120:
67121: END IF;
67122:
67115: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67116: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67117: -- 5132302
67118: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67119: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67120:
67121: END IF;
67122:
67123: -- 4955764
67120:
67121: END IF;
67122:
67123: -- 4955764
67124: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67126:
67127:
67128: XLA_AE_LINES_PKG.ValidateCurrentLine;
67124: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67126:
67127:
67128: XLA_AE_LINES_PKG.ValidateCurrentLine;
67129: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67130:
67131: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
67132: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
67125: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67126:
67127:
67128: XLA_AE_LINES_PKG.ValidateCurrentLine;
67129: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67130:
67131: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
67132: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
67133: ,p_balance_type_code => l_balance_type_code);
67284: --
67285: -- bulk performance
67286: --
67287: l_balance_type_code VARCHAR2(1);
67288: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
67289: l_log_module VARCHAR2(240);
67290:
67291: --
67292: -- Upgrade strategy
67354: ') = 'Y'
67355: THEN
67356:
67357: --
67358: XLA_AE_LINES_PKG.SetNewLine;
67359:
67360: p_balance_type_code := l_balance_type_code;
67361: -- set the flag so later we will know whether the gain loss line needs to be created
67362:
67366:
67367: --
67368: -- bulk performance
67369: --
67370: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
67371: p_header_num => 0); -- 4262811
67372: --
67373: -- set accounting line options
67374: --
67371: p_header_num => 0); -- 4262811
67372: --
67373: -- set accounting line options
67374: --
67375: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
67376: p_natural_side_code => 'C'
67377: , p_gain_or_loss_flag => 'N'
67378: , p_gl_transfer_mode_code => 'S'
67379: , p_acct_entry_type_code => 'A'
67385: --
67386: --
67387: -- set accounting line type info
67388: --
67389: xla_ae_lines_pkg.SetAcctLineType
67390: (p_component_type => l_component_type
67391: ,p_event_type_code => l_event_type_code
67392: ,p_line_definition_owner_code => l_line_definition_owner_code
67393: ,p_line_definition_code => l_line_definition_code
67399: ,p_event_class_code => l_event_class_code);
67400: --
67401: -- set accounting class
67402: --
67403: xla_ae_lines_pkg.SetAcctClass(
67404: p_accounting_class_code => 'UNBILL'
67405: , p_ae_header_id => l_ae_header_id
67406: );
67407:
67407:
67408: --
67409: -- set rounding class
67410: --
67411: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
67412: 'UNBILL';
67413:
67414: --
67415: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
67411: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
67412: 'UNBILL';
67413:
67414: --
67415: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
67416: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
67417: --
67418: -- bulk performance
67419: --
67412: 'UNBILL';
67413:
67414: --
67415: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
67416: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
67417: --
67418: -- bulk performance
67419: --
67420: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
67416: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
67417: --
67418: -- bulk performance
67419: --
67420: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
67421:
67422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
67423: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
67424:
67418: -- bulk performance
67419: --
67420: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
67421:
67422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
67423: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
67424:
67425: -- 4955764
67426: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67422: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
67423: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
67424:
67425: -- 4955764
67426: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67427: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
67428:
67429: -- 4458381 Public Sector Enh
67430:
67502: l_rec_acct_attrs.array_num_value(33) := to_char(p_source_51);
67503: l_rec_acct_attrs.array_acct_attr_code(34) := 'LEDGER_AMOUNT';
67504: l_rec_acct_attrs.array_num_value(34) := p_source_43;
67505:
67506: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
67507: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
67508:
67509: ---------------------------------------------------------------------------------------------------------------
67510: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
67503: l_rec_acct_attrs.array_acct_attr_code(34) := 'LEDGER_AMOUNT';
67504: l_rec_acct_attrs.array_num_value(34) := p_source_43;
67505:
67506: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
67507: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
67508:
67509: ---------------------------------------------------------------------------------------------------------------
67510: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
67511: ---------------------------------------------------------------------------------------------------------------
67506: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
67507: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
67508:
67509: ---------------------------------------------------------------------------------------------------------------
67510: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
67511: ---------------------------------------------------------------------------------------------------------------
67512: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
67513:
67514: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67508:
67509: ---------------------------------------------------------------------------------------------------------------
67510: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
67511: ---------------------------------------------------------------------------------------------------------------
67512: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
67513:
67514: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67515: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67516:
67510: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
67511: ---------------------------------------------------------------------------------------------------------------
67512: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
67513:
67514: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67515: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67516:
67517: IF xla_accounting_cache_pkg.GetValueChar
67518: (p_source_code => 'LEDGER_CATEGORY_CODE'
67511: ---------------------------------------------------------------------------------------------------------------
67512: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
67513:
67514: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67515: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
67516:
67517: IF xla_accounting_cache_pkg.GetValueChar
67518: (p_source_code => 'LEDGER_CATEGORY_CODE'
67519: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
67522: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
67523: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
67524: )
67525: THEN
67526: xla_ae_lines_pkg.BflowUpgEntry
67527: (p_business_method_code => l_bflow_method_code
67528: ,p_business_class_code => l_bflow_class_code
67529: ,p_balance_type => l_balance_type_code);
67530: ELSE
67562: , x_value_type_code => l_adr_value_type_code
67563: , p_side => 'NA'
67564: );
67565:
67566: xla_ae_lines_pkg.set_ccid(
67567: p_code_combination_id => l_ccid
67568: , p_value_type_code => l_adr_value_type_code
67569: , p_transaction_coa_id => l_adr_transaction_coa_id
67570: , p_accounting_coa_id => l_adr_accounting_coa_id
67598: xla_accounting_err_pkg.build_message
67599: (p_appli_s_name => 'XLA'
67600: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
67601: ,p_token_1 => 'LINE_NUMBER'
67602: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
67603: ,p_token_2 => 'LINE_TYPE_NAME'
67604: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
67605: l_component_type
67606: ,l_component_code
67634: --
67635: --
67636: ------------------------------------------------------------------------------------------------
67637: -- 4219869 Business Flow
67638: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
67639: -- Prior Entry. Currently, the following code is always generated.
67640: ------------------------------------------------------------------------------------------------
67641: XLA_AE_LINES_PKG.ValidateCurrentLine;
67642:
67637: -- 4219869 Business Flow
67638: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
67639: -- Prior Entry. Currently, the following code is always generated.
67640: ------------------------------------------------------------------------------------------------
67641: XLA_AE_LINES_PKG.ValidateCurrentLine;
67642:
67643: ------------------------------------------------------------------------------------
67644: -- 4219869 Business Flow
67645: -- Populated credit and debit amounts -- Need to generate this within IF
67643: ------------------------------------------------------------------------------------
67644: -- 4219869 Business Flow
67645: -- Populated credit and debit amounts -- Need to generate this within IF
67646: ------------------------------------------------------------------------------------
67647: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67648:
67649: ----------------------------------------------------------------------------------
67650: -- 4219869 Business Flow
67651: -- Update journal entry status -- Need to generate this within IF
67675: -- To allow MPA report to determine if it should generate report process
67676: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
67677: ------------------------------------------------------------------------------------------
67678:
67679: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
67680: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
67681:
67682: --
67683: -- Update the line information that should be overwritten
67676: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
67677: ------------------------------------------------------------------------------------------
67678:
67679: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
67680: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
67681:
67682: --
67683: -- Update the line information that should be overwritten
67684: --
67681:
67682: --
67683: -- Update the line information that should be overwritten
67684: --
67685: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67686: p_header_num => 1);
67687: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67688:
67689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67683: -- Update the line information that should be overwritten
67684: --
67685: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67686: p_header_num => 1);
67687: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67688:
67689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67690:
67691: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67685: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
67686: p_header_num => 1);
67687: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
67688:
67689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67690:
67691: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67692: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
67693: END IF;
67688:
67689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
67690:
67691: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
67692: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
67693: END IF;
67694:
67695: --
67696: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
67695: --
67696: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
67697: --
67698: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
67699: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
67700: ELSE
67701: ---------------------------------------------------------------------------------------------------
67702: -- 4262811a Switch Sign
67703: ---------------------------------------------------------------------------------------------------
67700: ELSE
67701: ---------------------------------------------------------------------------------------------------
67702: -- 4262811a Switch Sign
67703: ---------------------------------------------------------------------------------------------------
67704: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67705: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67701: ---------------------------------------------------------------------------------------------------
67702: -- 4262811a Switch Sign
67703: ---------------------------------------------------------------------------------------------------
67704: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67705: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67702: -- 4262811a Switch Sign
67703: ---------------------------------------------------------------------------------------------------
67704: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67705: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67710: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67703: ---------------------------------------------------------------------------------------------------
67704: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67705: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67710: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67704: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
67705: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67710: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67712:
67706: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67710: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67712:
67713: END IF;
67714:
67707: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
67708: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67709: -- 5132302
67710: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
67711: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
67712:
67713: END IF;
67714:
67715: -- 4955764
67712:
67713: END IF;
67714:
67715: -- 4955764
67716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67717: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67718:
67719:
67720: XLA_AE_LINES_PKG.ValidateCurrentLine;
67716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
67717: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67718:
67719:
67720: XLA_AE_LINES_PKG.ValidateCurrentLine;
67721: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67722:
67723: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
67724: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
67717: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
67718:
67719:
67720: XLA_AE_LINES_PKG.ValidateCurrentLine;
67721: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
67722:
67723: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
67724: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
67725: ,p_balance_type_code => l_balance_type_code);
67876: --
67877: -- bulk performance
67878: --
67879: l_balance_type_code VARCHAR2(1);
67880: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
67881: l_log_module VARCHAR2(240);
67882:
67883: --
67884: -- Upgrade strategy
67946: ') = 'Y'
67947: THEN
67948:
67949: --
67950: XLA_AE_LINES_PKG.SetNewLine;
67951:
67952: p_balance_type_code := l_balance_type_code;
67953: -- set the flag so later we will know whether the gain loss line needs to be created
67954:
67958:
67959: --
67960: -- bulk performance
67961: --
67962: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
67963: p_header_num => 0); -- 4262811
67964: --
67965: -- set accounting line options
67966: --
67963: p_header_num => 0); -- 4262811
67964: --
67965: -- set accounting line options
67966: --
67967: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
67968: p_natural_side_code => 'C'
67969: , p_gain_or_loss_flag => 'N'
67970: , p_gl_transfer_mode_code => 'S'
67971: , p_acct_entry_type_code => 'A'
67977: --
67978: --
67979: -- set accounting line type info
67980: --
67981: xla_ae_lines_pkg.SetAcctLineType
67982: (p_component_type => l_component_type
67983: ,p_event_type_code => l_event_type_code
67984: ,p_line_definition_owner_code => l_line_definition_owner_code
67985: ,p_line_definition_code => l_line_definition_code
67991: ,p_event_class_code => l_event_class_code);
67992: --
67993: -- set accounting class
67994: --
67995: xla_ae_lines_pkg.SetAcctClass(
67996: p_accounting_class_code => 'FEDERAL_UNBILLED_RECEIVABLE_AD'
67997: , p_ae_header_id => l_ae_header_id
67998: );
67999:
67999:
68000: --
68001: -- set rounding class
68002: --
68003: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
68004: 'FEDERAL_UNBILLED_RECEIVABLE_AD';
68005:
68006: --
68007: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68003: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
68004: 'FEDERAL_UNBILLED_RECEIVABLE_AD';
68005:
68006: --
68007: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68008: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68009: --
68010: -- bulk performance
68011: --
68004: 'FEDERAL_UNBILLED_RECEIVABLE_AD';
68005:
68006: --
68007: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68008: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68009: --
68010: -- bulk performance
68011: --
68012: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68008: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68009: --
68010: -- bulk performance
68011: --
68012: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68013:
68014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68015: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68016:
68010: -- bulk performance
68011: --
68012: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68013:
68014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68015: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68016:
68017: -- 4955764
68018: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68014: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68015: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68016:
68017: -- 4955764
68018: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68019: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
68020:
68021: -- 4458381 Public Sector Enh
68022:
68088: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
68089: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
68090: l_rec_acct_attrs.array_num_value(31) := p_source_43;
68091:
68092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68094:
68095: ---------------------------------------------------------------------------------------------------------------
68096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68089: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
68090: l_rec_acct_attrs.array_num_value(31) := p_source_43;
68091:
68092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68094:
68095: ---------------------------------------------------------------------------------------------------------------
68096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68097: ---------------------------------------------------------------------------------------------------------------
68092: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68093: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68094:
68095: ---------------------------------------------------------------------------------------------------------------
68096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68097: ---------------------------------------------------------------------------------------------------------------
68098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68099:
68100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68094:
68095: ---------------------------------------------------------------------------------------------------------------
68096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68097: ---------------------------------------------------------------------------------------------------------------
68098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68099:
68100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68102:
68096: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68097: ---------------------------------------------------------------------------------------------------------------
68098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68099:
68100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68102:
68103: IF xla_accounting_cache_pkg.GetValueChar
68104: (p_source_code => 'LEDGER_CATEGORY_CODE'
68097: ---------------------------------------------------------------------------------------------------------------
68098: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68099:
68100: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68101: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68102:
68103: IF xla_accounting_cache_pkg.GetValueChar
68104: (p_source_code => 'LEDGER_CATEGORY_CODE'
68105: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
68108: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
68109: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
68110: )
68111: THEN
68112: xla_ae_lines_pkg.BflowUpgEntry
68113: (p_business_method_code => l_bflow_method_code
68114: ,p_business_class_code => l_bflow_class_code
68115: ,p_balance_type => l_balance_type_code);
68116: ELSE
68148: , x_value_type_code => l_adr_value_type_code
68149: , p_side => 'NA'
68150: );
68151:
68152: xla_ae_lines_pkg.set_ccid(
68153: p_code_combination_id => l_ccid
68154: , p_value_type_code => l_adr_value_type_code
68155: , p_transaction_coa_id => l_adr_transaction_coa_id
68156: , p_accounting_coa_id => l_adr_accounting_coa_id
68180: );
68181:
68182: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
68183:
68184: xla_ae_lines_pkg.set_segment(
68185: p_to_segment_code => 'GL_ACCOUNT'
68186: , p_segment_value => l_segment
68187: , p_from_segment_code => l_adr_value_segment_code
68188: , p_from_combination_id => l_adr_value_combination_id
68224: xla_accounting_err_pkg.build_message
68225: (p_appli_s_name => 'XLA'
68226: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
68227: ,p_token_1 => 'LINE_NUMBER'
68228: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
68229: ,p_token_2 => 'LINE_TYPE_NAME'
68230: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
68231: l_component_type
68232: ,l_component_code
68260: --
68261: --
68262: ------------------------------------------------------------------------------------------------
68263: -- 4219869 Business Flow
68264: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
68265: -- Prior Entry. Currently, the following code is always generated.
68266: ------------------------------------------------------------------------------------------------
68267: XLA_AE_LINES_PKG.ValidateCurrentLine;
68268:
68263: -- 4219869 Business Flow
68264: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
68265: -- Prior Entry. Currently, the following code is always generated.
68266: ------------------------------------------------------------------------------------------------
68267: XLA_AE_LINES_PKG.ValidateCurrentLine;
68268:
68269: ------------------------------------------------------------------------------------
68270: -- 4219869 Business Flow
68271: -- Populated credit and debit amounts -- Need to generate this within IF
68269: ------------------------------------------------------------------------------------
68270: -- 4219869 Business Flow
68271: -- Populated credit and debit amounts -- Need to generate this within IF
68272: ------------------------------------------------------------------------------------
68273: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68274:
68275: ----------------------------------------------------------------------------------
68276: -- 4219869 Business Flow
68277: -- Update journal entry status -- Need to generate this within IF
68301: -- To allow MPA report to determine if it should generate report process
68302: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
68303: ------------------------------------------------------------------------------------------
68304:
68305: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
68306: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
68307:
68308: --
68309: -- Update the line information that should be overwritten
68302: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
68303: ------------------------------------------------------------------------------------------
68304:
68305: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
68306: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
68307:
68308: --
68309: -- Update the line information that should be overwritten
68310: --
68307:
68308: --
68309: -- Update the line information that should be overwritten
68310: --
68311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68312: p_header_num => 1);
68313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68314:
68315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68309: -- Update the line information that should be overwritten
68310: --
68311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68312: p_header_num => 1);
68313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68314:
68315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68316:
68317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68312: p_header_num => 1);
68313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68314:
68315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68316:
68317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68318: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
68319: END IF;
68314:
68315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68316:
68317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68318: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
68319: END IF;
68320:
68321: --
68322: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
68321: --
68322: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
68323: --
68324: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
68325: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
68326: ELSE
68327: ---------------------------------------------------------------------------------------------------
68328: -- 4262811a Switch Sign
68329: ---------------------------------------------------------------------------------------------------
68326: ELSE
68327: ---------------------------------------------------------------------------------------------------
68328: -- 4262811a Switch Sign
68329: ---------------------------------------------------------------------------------------------------
68330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68327: ---------------------------------------------------------------------------------------------------
68328: -- 4262811a Switch Sign
68329: ---------------------------------------------------------------------------------------------------
68330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68328: -- 4262811a Switch Sign
68329: ---------------------------------------------------------------------------------------------------
68330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68329: ---------------------------------------------------------------------------------------------------
68330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68338:
68332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68338:
68339: END IF;
68340:
68333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68335: -- 5132302
68336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68338:
68339: END IF;
68340:
68341: -- 4955764
68338:
68339: END IF;
68340:
68341: -- 4955764
68342: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68344:
68345:
68346: XLA_AE_LINES_PKG.ValidateCurrentLine;
68342: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68344:
68345:
68346: XLA_AE_LINES_PKG.ValidateCurrentLine;
68347: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68348:
68349: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
68350: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
68343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68344:
68345:
68346: XLA_AE_LINES_PKG.ValidateCurrentLine;
68347: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68348:
68349: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
68350: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
68351: ,p_balance_type_code => l_balance_type_code);
68474: --
68475: -- bulk performance
68476: --
68477: l_balance_type_code VARCHAR2(1);
68478: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
68479: l_log_module VARCHAR2(240);
68480:
68481: --
68482: -- Upgrade strategy
68544: ') = 'N'
68545: THEN
68546:
68547: --
68548: XLA_AE_LINES_PKG.SetNewLine;
68549:
68550: p_balance_type_code := l_balance_type_code;
68551: -- set the flag so later we will know whether the gain loss line needs to be created
68552:
68556:
68557: --
68558: -- bulk performance
68559: --
68560: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
68561: p_header_num => 0); -- 4262811
68562: --
68563: -- set accounting line options
68564: --
68561: p_header_num => 0); -- 4262811
68562: --
68563: -- set accounting line options
68564: --
68565: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
68566: p_natural_side_code => 'D'
68567: , p_gain_or_loss_flag => 'N'
68568: , p_gl_transfer_mode_code => 'S'
68569: , p_acct_entry_type_code => 'A'
68575: --
68576: --
68577: -- set accounting line type info
68578: --
68579: xla_ae_lines_pkg.SetAcctLineType
68580: (p_component_type => l_component_type
68581: ,p_event_type_code => l_event_type_code
68582: ,p_line_definition_owner_code => l_line_definition_owner_code
68583: ,p_line_definition_code => l_line_definition_code
68589: ,p_event_class_code => l_event_class_code);
68590: --
68591: -- set accounting class
68592: --
68593: xla_ae_lines_pkg.SetAcctClass(
68594: p_accounting_class_code => 'FEDERAL_UNBILLED_RECEIVABLE'
68595: , p_ae_header_id => l_ae_header_id
68596: );
68597:
68597:
68598: --
68599: -- set rounding class
68600: --
68601: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
68602: 'FEDERAL_UNBILLED_RECEIVABLE';
68603:
68604: --
68605: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68601: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
68602: 'FEDERAL_UNBILLED_RECEIVABLE';
68603:
68604: --
68605: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68606: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68607: --
68608: -- bulk performance
68609: --
68602: 'FEDERAL_UNBILLED_RECEIVABLE';
68603:
68604: --
68605: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
68606: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68607: --
68608: -- bulk performance
68609: --
68610: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68606: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
68607: --
68608: -- bulk performance
68609: --
68610: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68611:
68612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68613: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68614:
68608: -- bulk performance
68609: --
68610: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
68611:
68612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68613: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68614:
68615: -- 4955764
68616: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68612: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
68613: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
68614:
68615: -- 4955764
68616: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68617: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
68618:
68619: -- 4458381 Public Sector Enh
68620:
68638: l_rec_acct_attrs.array_num_value(6) := to_char(p_source_51);
68639: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
68640: l_rec_acct_attrs.array_num_value(7) := p_source_43;
68641:
68642: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68643: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68644:
68645: ---------------------------------------------------------------------------------------------------------------
68646: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68639: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
68640: l_rec_acct_attrs.array_num_value(7) := p_source_43;
68641:
68642: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68643: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68644:
68645: ---------------------------------------------------------------------------------------------------------------
68646: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68647: ---------------------------------------------------------------------------------------------------------------
68642: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
68643: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
68644:
68645: ---------------------------------------------------------------------------------------------------------------
68646: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68647: ---------------------------------------------------------------------------------------------------------------
68648: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68649:
68650: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68644:
68645: ---------------------------------------------------------------------------------------------------------------
68646: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68647: ---------------------------------------------------------------------------------------------------------------
68648: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68649:
68650: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68651: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68652:
68646: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
68647: ---------------------------------------------------------------------------------------------------------------
68648: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68649:
68650: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68651: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68652:
68653: IF xla_accounting_cache_pkg.GetValueChar
68654: (p_source_code => 'LEDGER_CATEGORY_CODE'
68647: ---------------------------------------------------------------------------------------------------------------
68648: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
68649:
68650: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68651: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
68652:
68653: IF xla_accounting_cache_pkg.GetValueChar
68654: (p_source_code => 'LEDGER_CATEGORY_CODE'
68655: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
68658: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
68659: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
68660: )
68661: THEN
68662: xla_ae_lines_pkg.BflowUpgEntry
68663: (p_business_method_code => l_bflow_method_code
68664: ,p_business_class_code => l_bflow_class_code
68665: ,p_balance_type => l_balance_type_code);
68666: ELSE
68698: , x_value_type_code => l_adr_value_type_code
68699: , p_side => 'NA'
68700: );
68701:
68702: xla_ae_lines_pkg.set_ccid(
68703: p_code_combination_id => l_ccid
68704: , p_value_type_code => l_adr_value_type_code
68705: , p_transaction_coa_id => l_adr_transaction_coa_id
68706: , p_accounting_coa_id => l_adr_accounting_coa_id
68730: );
68731:
68732: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
68733:
68734: xla_ae_lines_pkg.set_segment(
68735: p_to_segment_code => 'GL_ACCOUNT'
68736: , p_segment_value => l_segment
68737: , p_from_segment_code => l_adr_value_segment_code
68738: , p_from_combination_id => l_adr_value_combination_id
68774: xla_accounting_err_pkg.build_message
68775: (p_appli_s_name => 'XLA'
68776: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
68777: ,p_token_1 => 'LINE_NUMBER'
68778: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
68779: ,p_token_2 => 'LINE_TYPE_NAME'
68780: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
68781: l_component_type
68782: ,l_component_code
68810: --
68811: --
68812: ------------------------------------------------------------------------------------------------
68813: -- 4219869 Business Flow
68814: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
68815: -- Prior Entry. Currently, the following code is always generated.
68816: ------------------------------------------------------------------------------------------------
68817: XLA_AE_LINES_PKG.ValidateCurrentLine;
68818:
68813: -- 4219869 Business Flow
68814: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
68815: -- Prior Entry. Currently, the following code is always generated.
68816: ------------------------------------------------------------------------------------------------
68817: XLA_AE_LINES_PKG.ValidateCurrentLine;
68818:
68819: ------------------------------------------------------------------------------------
68820: -- 4219869 Business Flow
68821: -- Populated credit and debit amounts -- Need to generate this within IF
68819: ------------------------------------------------------------------------------------
68820: -- 4219869 Business Flow
68821: -- Populated credit and debit amounts -- Need to generate this within IF
68822: ------------------------------------------------------------------------------------
68823: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68824:
68825: ----------------------------------------------------------------------------------
68826: -- 4219869 Business Flow
68827: -- Update journal entry status -- Need to generate this within IF
68851: -- To allow MPA report to determine if it should generate report process
68852: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
68853: ------------------------------------------------------------------------------------------
68854:
68855: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
68856: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
68857:
68858: --
68859: -- Update the line information that should be overwritten
68852: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
68853: ------------------------------------------------------------------------------------------
68854:
68855: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
68856: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
68857:
68858: --
68859: -- Update the line information that should be overwritten
68860: --
68857:
68858: --
68859: -- Update the line information that should be overwritten
68860: --
68861: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68862: p_header_num => 1);
68863: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68864:
68865: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68859: -- Update the line information that should be overwritten
68860: --
68861: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68862: p_header_num => 1);
68863: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68864:
68865: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68866:
68867: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68861: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
68862: p_header_num => 1);
68863: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
68864:
68865: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68866:
68867: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68868: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
68869: END IF;
68864:
68865: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
68866:
68867: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
68868: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
68869: END IF;
68870:
68871: --
68872: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
68871: --
68872: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
68873: --
68874: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
68875: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
68876: ELSE
68877: ---------------------------------------------------------------------------------------------------
68878: -- 4262811a Switch Sign
68879: ---------------------------------------------------------------------------------------------------
68876: ELSE
68877: ---------------------------------------------------------------------------------------------------
68878: -- 4262811a Switch Sign
68879: ---------------------------------------------------------------------------------------------------
68880: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68877: ---------------------------------------------------------------------------------------------------
68878: -- 4262811a Switch Sign
68879: ---------------------------------------------------------------------------------------------------
68880: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68878: -- 4262811a Switch Sign
68879: ---------------------------------------------------------------------------------------------------
68880: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68886: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68879: ---------------------------------------------------------------------------------------------------
68880: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68886: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68880: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
68881: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68886: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68888:
68882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68886: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68888:
68889: END IF;
68890:
68883: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
68884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68885: -- 5132302
68886: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
68887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
68888:
68889: END IF;
68890:
68891: -- 4955764
68888:
68889: END IF;
68890:
68891: -- 4955764
68892: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68893: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68894:
68895:
68896: XLA_AE_LINES_PKG.ValidateCurrentLine;
68892: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
68893: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68894:
68895:
68896: XLA_AE_LINES_PKG.ValidateCurrentLine;
68897: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68898:
68899: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
68900: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
68893: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
68894:
68895:
68896: XLA_AE_LINES_PKG.ValidateCurrentLine;
68897: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
68898:
68899: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
68900: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
68901: ,p_balance_type_code => l_balance_type_code);
69030: --
69031: -- bulk performance
69032: --
69033: l_balance_type_code VARCHAR2(1);
69034: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
69035: l_log_module VARCHAR2(240);
69036:
69037: --
69038: -- Upgrade strategy
69100: ') = 'N'
69101: THEN
69102:
69103: --
69104: XLA_AE_LINES_PKG.SetNewLine;
69105:
69106: p_balance_type_code := l_balance_type_code;
69107: -- set the flag so later we will know whether the gain loss line needs to be created
69108:
69112:
69113: --
69114: -- bulk performance
69115: --
69116: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
69117: p_header_num => 0); -- 4262811
69118: --
69119: -- set accounting line options
69120: --
69117: p_header_num => 0); -- 4262811
69118: --
69119: -- set accounting line options
69120: --
69121: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
69122: p_natural_side_code => 'D'
69123: , p_gain_or_loss_flag => 'N'
69124: , p_gl_transfer_mode_code => 'S'
69125: , p_acct_entry_type_code => 'A'
69131: --
69132: --
69133: -- set accounting line type info
69134: --
69135: xla_ae_lines_pkg.SetAcctLineType
69136: (p_component_type => l_component_type
69137: ,p_event_type_code => l_event_type_code
69138: ,p_line_definition_owner_code => l_line_definition_owner_code
69139: ,p_line_definition_code => l_line_definition_code
69145: ,p_event_class_code => l_event_class_code);
69146: --
69147: -- set accounting class
69148: --
69149: xla_ae_lines_pkg.SetAcctClass(
69150: p_accounting_class_code => 'UNEARNED_REVENUE'
69151: , p_ae_header_id => l_ae_header_id
69152: );
69153:
69153:
69154: --
69155: -- set rounding class
69156: --
69157: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
69158: 'UNEARNED_REVENUE';
69159:
69160: --
69161: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69157: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
69158: 'UNEARNED_REVENUE';
69159:
69160: --
69161: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69162: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69163: --
69164: -- bulk performance
69165: --
69158: 'UNEARNED_REVENUE';
69159:
69160: --
69161: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69162: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69163: --
69164: -- bulk performance
69165: --
69166: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69162: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69163: --
69164: -- bulk performance
69165: --
69166: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69167:
69168: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69169: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69170:
69164: -- bulk performance
69165: --
69166: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69167:
69168: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69169: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69170:
69171: -- 4955764
69172: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69168: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69169: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69170:
69171: -- 4955764
69172: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69173: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
69174:
69175: -- 4458381 Public Sector Enh
69176:
69200: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
69201: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
69202: l_rec_acct_attrs.array_num_value(10) := p_source_43;
69203:
69204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69206:
69207: ---------------------------------------------------------------------------------------------------------------
69208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69201: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
69202: l_rec_acct_attrs.array_num_value(10) := p_source_43;
69203:
69204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69206:
69207: ---------------------------------------------------------------------------------------------------------------
69208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69209: ---------------------------------------------------------------------------------------------------------------
69204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69206:
69207: ---------------------------------------------------------------------------------------------------------------
69208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69209: ---------------------------------------------------------------------------------------------------------------
69210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69211:
69212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69206:
69207: ---------------------------------------------------------------------------------------------------------------
69208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69209: ---------------------------------------------------------------------------------------------------------------
69210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69211:
69212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69214:
69208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69209: ---------------------------------------------------------------------------------------------------------------
69210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69211:
69212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69214:
69215: IF xla_accounting_cache_pkg.GetValueChar
69216: (p_source_code => 'LEDGER_CATEGORY_CODE'
69209: ---------------------------------------------------------------------------------------------------------------
69210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69211:
69212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69214:
69215: IF xla_accounting_cache_pkg.GetValueChar
69216: (p_source_code => 'LEDGER_CATEGORY_CODE'
69217: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
69220: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
69221: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
69222: )
69223: THEN
69224: xla_ae_lines_pkg.BflowUpgEntry
69225: (p_business_method_code => l_bflow_method_code
69226: ,p_business_class_code => l_bflow_class_code
69227: ,p_balance_type => l_balance_type_code);
69228: ELSE
69260: , x_value_type_code => l_adr_value_type_code
69261: , p_side => 'NA'
69262: );
69263:
69264: xla_ae_lines_pkg.set_ccid(
69265: p_code_combination_id => l_ccid
69266: , p_value_type_code => l_adr_value_type_code
69267: , p_transaction_coa_id => l_adr_transaction_coa_id
69268: , p_accounting_coa_id => l_adr_accounting_coa_id
69296: xla_accounting_err_pkg.build_message
69297: (p_appli_s_name => 'XLA'
69298: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
69299: ,p_token_1 => 'LINE_NUMBER'
69300: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
69301: ,p_token_2 => 'LINE_TYPE_NAME'
69302: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
69303: l_component_type
69304: ,l_component_code
69332: --
69333: --
69334: ------------------------------------------------------------------------------------------------
69335: -- 4219869 Business Flow
69336: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
69337: -- Prior Entry. Currently, the following code is always generated.
69338: ------------------------------------------------------------------------------------------------
69339: XLA_AE_LINES_PKG.ValidateCurrentLine;
69340:
69335: -- 4219869 Business Flow
69336: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
69337: -- Prior Entry. Currently, the following code is always generated.
69338: ------------------------------------------------------------------------------------------------
69339: XLA_AE_LINES_PKG.ValidateCurrentLine;
69340:
69341: ------------------------------------------------------------------------------------
69342: -- 4219869 Business Flow
69343: -- Populated credit and debit amounts -- Need to generate this within IF
69341: ------------------------------------------------------------------------------------
69342: -- 4219869 Business Flow
69343: -- Populated credit and debit amounts -- Need to generate this within IF
69344: ------------------------------------------------------------------------------------
69345: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
69346:
69347: ----------------------------------------------------------------------------------
69348: -- 4219869 Business Flow
69349: -- Update journal entry status -- Need to generate this within IF
69373: -- To allow MPA report to determine if it should generate report process
69374: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
69375: ------------------------------------------------------------------------------------------
69376:
69377: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
69378: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
69379:
69380: --
69381: -- Update the line information that should be overwritten
69374: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
69375: ------------------------------------------------------------------------------------------
69376:
69377: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
69378: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
69379:
69380: --
69381: -- Update the line information that should be overwritten
69382: --
69379:
69380: --
69381: -- Update the line information that should be overwritten
69382: --
69383: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69384: p_header_num => 1);
69385: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69386:
69387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69381: -- Update the line information that should be overwritten
69382: --
69383: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69384: p_header_num => 1);
69385: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69386:
69387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69388:
69389: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69383: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69384: p_header_num => 1);
69385: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69386:
69387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69388:
69389: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69390: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
69391: END IF;
69386:
69387: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69388:
69389: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69390: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
69391: END IF;
69392:
69393: --
69394: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
69393: --
69394: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
69395: --
69396: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
69397: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
69398: ELSE
69399: ---------------------------------------------------------------------------------------------------
69400: -- 4262811a Switch Sign
69401: ---------------------------------------------------------------------------------------------------
69398: ELSE
69399: ---------------------------------------------------------------------------------------------------
69400: -- 4262811a Switch Sign
69401: ---------------------------------------------------------------------------------------------------
69402: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69403: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69399: ---------------------------------------------------------------------------------------------------
69400: -- 4262811a Switch Sign
69401: ---------------------------------------------------------------------------------------------------
69402: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69403: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69400: -- 4262811a Switch Sign
69401: ---------------------------------------------------------------------------------------------------
69402: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69403: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69408: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69401: ---------------------------------------------------------------------------------------------------
69402: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69403: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69408: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69402: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69403: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69408: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69410:
69404: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69408: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69410:
69411: END IF;
69412:
69405: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69406: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69407: -- 5132302
69408: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69409: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69410:
69411: END IF;
69412:
69413: -- 4955764
69410:
69411: END IF;
69412:
69413: -- 4955764
69414: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69415: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
69416:
69417:
69418: XLA_AE_LINES_PKG.ValidateCurrentLine;
69414: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69415: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
69416:
69417:
69418: XLA_AE_LINES_PKG.ValidateCurrentLine;
69419: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
69420:
69421: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
69422: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
69415: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
69416:
69417:
69418: XLA_AE_LINES_PKG.ValidateCurrentLine;
69419: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
69420:
69421: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
69422: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
69423: ,p_balance_type_code => l_balance_type_code);
69574: --
69575: -- bulk performance
69576: --
69577: l_balance_type_code VARCHAR2(1);
69578: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
69579: l_log_module VARCHAR2(240);
69580:
69581: --
69582: -- Upgrade strategy
69644: ') = 'Y'
69645: THEN
69646:
69647: --
69648: XLA_AE_LINES_PKG.SetNewLine;
69649:
69650: p_balance_type_code := l_balance_type_code;
69651: -- set the flag so later we will know whether the gain loss line needs to be created
69652:
69656:
69657: --
69658: -- bulk performance
69659: --
69660: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
69661: p_header_num => 0); -- 4262811
69662: --
69663: -- set accounting line options
69664: --
69661: p_header_num => 0); -- 4262811
69662: --
69663: -- set accounting line options
69664: --
69665: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
69666: p_natural_side_code => 'C'
69667: , p_gain_or_loss_flag => 'N'
69668: , p_gl_transfer_mode_code => 'S'
69669: , p_acct_entry_type_code => 'A'
69675: --
69676: --
69677: -- set accounting line type info
69678: --
69679: xla_ae_lines_pkg.SetAcctLineType
69680: (p_component_type => l_component_type
69681: ,p_event_type_code => l_event_type_code
69682: ,p_line_definition_owner_code => l_line_definition_owner_code
69683: ,p_line_definition_code => l_line_definition_code
69689: ,p_event_class_code => l_event_class_code);
69690: --
69691: -- set accounting class
69692: --
69693: xla_ae_lines_pkg.SetAcctClass(
69694: p_accounting_class_code => 'UNEARNED_REVENUE'
69695: , p_ae_header_id => l_ae_header_id
69696: );
69697:
69697:
69698: --
69699: -- set rounding class
69700: --
69701: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
69702: 'UNEARNED_REVENUE';
69703:
69704: --
69705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69701: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
69702: 'UNEARNED_REVENUE';
69703:
69704: --
69705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69707: --
69708: -- bulk performance
69709: --
69702: 'UNEARNED_REVENUE';
69703:
69704: --
69705: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
69706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69707: --
69708: -- bulk performance
69709: --
69710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69706: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
69707: --
69708: -- bulk performance
69709: --
69710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69711:
69712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69714:
69708: -- bulk performance
69709: --
69710: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
69711:
69712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69714:
69715: -- 4955764
69716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69712: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
69713: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
69714:
69715: -- 4955764
69716: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
69717: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
69718:
69719: -- 4458381 Public Sector Enh
69720:
69792: l_rec_acct_attrs.array_num_value(33) := to_char(p_source_51);
69793: l_rec_acct_attrs.array_acct_attr_code(34) := 'LEDGER_AMOUNT';
69794: l_rec_acct_attrs.array_num_value(34) := p_source_43;
69795:
69796: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69797: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69798:
69799: ---------------------------------------------------------------------------------------------------------------
69800: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69793: l_rec_acct_attrs.array_acct_attr_code(34) := 'LEDGER_AMOUNT';
69794: l_rec_acct_attrs.array_num_value(34) := p_source_43;
69795:
69796: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69797: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69798:
69799: ---------------------------------------------------------------------------------------------------------------
69800: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69801: ---------------------------------------------------------------------------------------------------------------
69796: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
69797: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
69798:
69799: ---------------------------------------------------------------------------------------------------------------
69800: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69801: ---------------------------------------------------------------------------------------------------------------
69802: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69803:
69804: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69798:
69799: ---------------------------------------------------------------------------------------------------------------
69800: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69801: ---------------------------------------------------------------------------------------------------------------
69802: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69803:
69804: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69805: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69806:
69800: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
69801: ---------------------------------------------------------------------------------------------------------------
69802: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69803:
69804: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69805: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69806:
69807: IF xla_accounting_cache_pkg.GetValueChar
69808: (p_source_code => 'LEDGER_CATEGORY_CODE'
69801: ---------------------------------------------------------------------------------------------------------------
69802: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
69803:
69804: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69805: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
69806:
69807: IF xla_accounting_cache_pkg.GetValueChar
69808: (p_source_code => 'LEDGER_CATEGORY_CODE'
69809: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
69812: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
69813: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
69814: )
69815: THEN
69816: xla_ae_lines_pkg.BflowUpgEntry
69817: (p_business_method_code => l_bflow_method_code
69818: ,p_business_class_code => l_bflow_class_code
69819: ,p_balance_type => l_balance_type_code);
69820: ELSE
69852: , x_value_type_code => l_adr_value_type_code
69853: , p_side => 'NA'
69854: );
69855:
69856: xla_ae_lines_pkg.set_ccid(
69857: p_code_combination_id => l_ccid
69858: , p_value_type_code => l_adr_value_type_code
69859: , p_transaction_coa_id => l_adr_transaction_coa_id
69860: , p_accounting_coa_id => l_adr_accounting_coa_id
69888: xla_accounting_err_pkg.build_message
69889: (p_appli_s_name => 'XLA'
69890: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
69891: ,p_token_1 => 'LINE_NUMBER'
69892: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
69893: ,p_token_2 => 'LINE_TYPE_NAME'
69894: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
69895: l_component_type
69896: ,l_component_code
69924: --
69925: --
69926: ------------------------------------------------------------------------------------------------
69927: -- 4219869 Business Flow
69928: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
69929: -- Prior Entry. Currently, the following code is always generated.
69930: ------------------------------------------------------------------------------------------------
69931: XLA_AE_LINES_PKG.ValidateCurrentLine;
69932:
69927: -- 4219869 Business Flow
69928: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
69929: -- Prior Entry. Currently, the following code is always generated.
69930: ------------------------------------------------------------------------------------------------
69931: XLA_AE_LINES_PKG.ValidateCurrentLine;
69932:
69933: ------------------------------------------------------------------------------------
69934: -- 4219869 Business Flow
69935: -- Populated credit and debit amounts -- Need to generate this within IF
69933: ------------------------------------------------------------------------------------
69934: -- 4219869 Business Flow
69935: -- Populated credit and debit amounts -- Need to generate this within IF
69936: ------------------------------------------------------------------------------------
69937: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
69938:
69939: ----------------------------------------------------------------------------------
69940: -- 4219869 Business Flow
69941: -- Update journal entry status -- Need to generate this within IF
69965: -- To allow MPA report to determine if it should generate report process
69966: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
69967: ------------------------------------------------------------------------------------------
69968:
69969: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
69970: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
69971:
69972: --
69973: -- Update the line information that should be overwritten
69966: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
69967: ------------------------------------------------------------------------------------------
69968:
69969: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
69970: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
69971:
69972: --
69973: -- Update the line information that should be overwritten
69974: --
69971:
69972: --
69973: -- Update the line information that should be overwritten
69974: --
69975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69976: p_header_num => 1);
69977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69978:
69979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69973: -- Update the line information that should be overwritten
69974: --
69975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69976: p_header_num => 1);
69977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69978:
69979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69980:
69981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69975: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
69976: p_header_num => 1);
69977: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
69978:
69979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69980:
69981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69982: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
69983: END IF;
69978:
69979: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
69980:
69981: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
69982: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
69983: END IF;
69984:
69985: --
69986: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
69985: --
69986: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
69987: --
69988: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
69989: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
69990: ELSE
69991: ---------------------------------------------------------------------------------------------------
69992: -- 4262811a Switch Sign
69993: ---------------------------------------------------------------------------------------------------
69990: ELSE
69991: ---------------------------------------------------------------------------------------------------
69992: -- 4262811a Switch Sign
69993: ---------------------------------------------------------------------------------------------------
69994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69991: ---------------------------------------------------------------------------------------------------
69992: -- 4262811a Switch Sign
69993: ---------------------------------------------------------------------------------------------------
69994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
69992: -- 4262811a Switch Sign
69993: ---------------------------------------------------------------------------------------------------
69994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
70000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
69993: ---------------------------------------------------------------------------------------------------
69994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
70000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69994: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
69995: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
70000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70002:
69996: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
70000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70002:
70003: END IF;
70004:
69997: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
69998: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
69999: -- 5132302
70000: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70001: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70002:
70003: END IF;
70004:
70005: -- 4955764
70002:
70003: END IF;
70004:
70005: -- 4955764
70006: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70008:
70009:
70010: XLA_AE_LINES_PKG.ValidateCurrentLine;
70006: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70008:
70009:
70010: XLA_AE_LINES_PKG.ValidateCurrentLine;
70011: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
70012:
70013: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
70014: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
70007: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70008:
70009:
70010: XLA_AE_LINES_PKG.ValidateCurrentLine;
70011: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
70012:
70013: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
70014: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
70015: ,p_balance_type_code => l_balance_type_code);
70166: --
70167: -- bulk performance
70168: --
70169: l_balance_type_code VARCHAR2(1);
70170: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
70171: l_log_module VARCHAR2(240);
70172:
70173: --
70174: -- Upgrade strategy
70236: ') = 'Y'
70237: THEN
70238:
70239: --
70240: XLA_AE_LINES_PKG.SetNewLine;
70241:
70242: p_balance_type_code := l_balance_type_code;
70243: -- set the flag so later we will know whether the gain loss line needs to be created
70244:
70248:
70249: --
70250: -- bulk performance
70251: --
70252: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
70253: p_header_num => 0); -- 4262811
70254: --
70255: -- set accounting line options
70256: --
70253: p_header_num => 0); -- 4262811
70254: --
70255: -- set accounting line options
70256: --
70257: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
70258: p_natural_side_code => 'C'
70259: , p_gain_or_loss_flag => 'N'
70260: , p_gl_transfer_mode_code => 'S'
70261: , p_acct_entry_type_code => 'A'
70267: --
70268: --
70269: -- set accounting line type info
70270: --
70271: xla_ae_lines_pkg.SetAcctLineType
70272: (p_component_type => l_component_type
70273: ,p_event_type_code => l_event_type_code
70274: ,p_line_definition_owner_code => l_line_definition_owner_code
70275: ,p_line_definition_code => l_line_definition_code
70281: ,p_event_class_code => l_event_class_code);
70282: --
70283: -- set accounting class
70284: --
70285: xla_ae_lines_pkg.SetAcctClass(
70286: p_accounting_class_code => 'FEDERAL_UNEARNED_REVENUE_AD'
70287: , p_ae_header_id => l_ae_header_id
70288: );
70289:
70289:
70290: --
70291: -- set rounding class
70292: --
70293: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
70294: 'FEDERAL_UNEARNED_REVENUE_AD';
70295:
70296: --
70297: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70293: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
70294: 'FEDERAL_UNEARNED_REVENUE_AD';
70295:
70296: --
70297: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70298: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70299: --
70300: -- bulk performance
70301: --
70294: 'FEDERAL_UNEARNED_REVENUE_AD';
70295:
70296: --
70297: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70298: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70299: --
70300: -- bulk performance
70301: --
70302: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70298: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70299: --
70300: -- bulk performance
70301: --
70302: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70303:
70304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70305: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70306:
70300: -- bulk performance
70301: --
70302: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70303:
70304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70305: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70306:
70307: -- 4955764
70308: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70305: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70306:
70307: -- 4955764
70308: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70309: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
70310:
70311: -- 4458381 Public Sector Enh
70312:
70378: l_rec_acct_attrs.array_num_value(30) := to_char(p_source_51);
70379: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
70380: l_rec_acct_attrs.array_num_value(31) := p_source_43;
70381:
70382: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70383: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70384:
70385: ---------------------------------------------------------------------------------------------------------------
70386: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70379: l_rec_acct_attrs.array_acct_attr_code(31) := 'LEDGER_AMOUNT';
70380: l_rec_acct_attrs.array_num_value(31) := p_source_43;
70381:
70382: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70383: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70384:
70385: ---------------------------------------------------------------------------------------------------------------
70386: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70387: ---------------------------------------------------------------------------------------------------------------
70382: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70383: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70384:
70385: ---------------------------------------------------------------------------------------------------------------
70386: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70387: ---------------------------------------------------------------------------------------------------------------
70388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70389:
70390: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70384:
70385: ---------------------------------------------------------------------------------------------------------------
70386: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70387: ---------------------------------------------------------------------------------------------------------------
70388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70389:
70390: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70391: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70392:
70386: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70387: ---------------------------------------------------------------------------------------------------------------
70388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70389:
70390: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70391: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70392:
70393: IF xla_accounting_cache_pkg.GetValueChar
70394: (p_source_code => 'LEDGER_CATEGORY_CODE'
70387: ---------------------------------------------------------------------------------------------------------------
70388: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70389:
70390: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70391: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70392:
70393: IF xla_accounting_cache_pkg.GetValueChar
70394: (p_source_code => 'LEDGER_CATEGORY_CODE'
70395: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
70398: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
70399: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
70400: )
70401: THEN
70402: xla_ae_lines_pkg.BflowUpgEntry
70403: (p_business_method_code => l_bflow_method_code
70404: ,p_business_class_code => l_bflow_class_code
70405: ,p_balance_type => l_balance_type_code);
70406: ELSE
70438: , x_value_type_code => l_adr_value_type_code
70439: , p_side => 'NA'
70440: );
70441:
70442: xla_ae_lines_pkg.set_ccid(
70443: p_code_combination_id => l_ccid
70444: , p_value_type_code => l_adr_value_type_code
70445: , p_transaction_coa_id => l_adr_transaction_coa_id
70446: , p_accounting_coa_id => l_adr_accounting_coa_id
70470: );
70471:
70472: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
70473:
70474: xla_ae_lines_pkg.set_segment(
70475: p_to_segment_code => 'GL_ACCOUNT'
70476: , p_segment_value => l_segment
70477: , p_from_segment_code => l_adr_value_segment_code
70478: , p_from_combination_id => l_adr_value_combination_id
70514: xla_accounting_err_pkg.build_message
70515: (p_appli_s_name => 'XLA'
70516: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
70517: ,p_token_1 => 'LINE_NUMBER'
70518: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
70519: ,p_token_2 => 'LINE_TYPE_NAME'
70520: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
70521: l_component_type
70522: ,l_component_code
70550: --
70551: --
70552: ------------------------------------------------------------------------------------------------
70553: -- 4219869 Business Flow
70554: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
70555: -- Prior Entry. Currently, the following code is always generated.
70556: ------------------------------------------------------------------------------------------------
70557: XLA_AE_LINES_PKG.ValidateCurrentLine;
70558:
70553: -- 4219869 Business Flow
70554: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
70555: -- Prior Entry. Currently, the following code is always generated.
70556: ------------------------------------------------------------------------------------------------
70557: XLA_AE_LINES_PKG.ValidateCurrentLine;
70558:
70559: ------------------------------------------------------------------------------------
70560: -- 4219869 Business Flow
70561: -- Populated credit and debit amounts -- Need to generate this within IF
70559: ------------------------------------------------------------------------------------
70560: -- 4219869 Business Flow
70561: -- Populated credit and debit amounts -- Need to generate this within IF
70562: ------------------------------------------------------------------------------------
70563: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
70564:
70565: ----------------------------------------------------------------------------------
70566: -- 4219869 Business Flow
70567: -- Update journal entry status -- Need to generate this within IF
70591: -- To allow MPA report to determine if it should generate report process
70592: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
70593: ------------------------------------------------------------------------------------------
70594:
70595: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
70596: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
70597:
70598: --
70599: -- Update the line information that should be overwritten
70592: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
70593: ------------------------------------------------------------------------------------------
70594:
70595: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
70596: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
70597:
70598: --
70599: -- Update the line information that should be overwritten
70600: --
70597:
70598: --
70599: -- Update the line information that should be overwritten
70600: --
70601: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
70602: p_header_num => 1);
70603: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
70604:
70605: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
70599: -- Update the line information that should be overwritten
70600: --
70601: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
70602: p_header_num => 1);
70603: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
70604:
70605: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
70606:
70607: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
70601: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
70602: p_header_num => 1);
70603: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
70604:
70605: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
70606:
70607: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
70608: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
70609: END IF;
70604:
70605: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
70606:
70607: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
70608: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
70609: END IF;
70610:
70611: --
70612: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
70611: --
70612: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
70613: --
70614: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
70615: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
70616: ELSE
70617: ---------------------------------------------------------------------------------------------------
70618: -- 4262811a Switch Sign
70619: ---------------------------------------------------------------------------------------------------
70616: ELSE
70617: ---------------------------------------------------------------------------------------------------
70618: -- 4262811a Switch Sign
70619: ---------------------------------------------------------------------------------------------------
70620: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
70621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70617: ---------------------------------------------------------------------------------------------------
70618: -- 4262811a Switch Sign
70619: ---------------------------------------------------------------------------------------------------
70620: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
70621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70618: -- 4262811a Switch Sign
70619: ---------------------------------------------------------------------------------------------------
70620: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
70621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70626: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70619: ---------------------------------------------------------------------------------------------------
70620: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
70621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70626: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70627: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70620: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
70621: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70626: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70627: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70628:
70622: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70626: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70627: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70628:
70629: END IF;
70630:
70623: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
70624: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70625: -- 5132302
70626: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
70627: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
70628:
70629: END IF;
70630:
70631: -- 4955764
70628:
70629: END IF;
70630:
70631: -- 4955764
70632: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70633: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70634:
70635:
70636: XLA_AE_LINES_PKG.ValidateCurrentLine;
70632: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70633: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70634:
70635:
70636: XLA_AE_LINES_PKG.ValidateCurrentLine;
70637: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
70638:
70639: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
70640: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
70633: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
70634:
70635:
70636: XLA_AE_LINES_PKG.ValidateCurrentLine;
70637: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
70638:
70639: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
70640: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
70641: ,p_balance_type_code => l_balance_type_code);
70764: --
70765: -- bulk performance
70766: --
70767: l_balance_type_code VARCHAR2(1);
70768: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
70769: l_log_module VARCHAR2(240);
70770:
70771: --
70772: -- Upgrade strategy
70834: ') = 'N'
70835: THEN
70836:
70837: --
70838: XLA_AE_LINES_PKG.SetNewLine;
70839:
70840: p_balance_type_code := l_balance_type_code;
70841: -- set the flag so later we will know whether the gain loss line needs to be created
70842:
70846:
70847: --
70848: -- bulk performance
70849: --
70850: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
70851: p_header_num => 0); -- 4262811
70852: --
70853: -- set accounting line options
70854: --
70851: p_header_num => 0); -- 4262811
70852: --
70853: -- set accounting line options
70854: --
70855: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
70856: p_natural_side_code => 'D'
70857: , p_gain_or_loss_flag => 'N'
70858: , p_gl_transfer_mode_code => 'S'
70859: , p_acct_entry_type_code => 'A'
70865: --
70866: --
70867: -- set accounting line type info
70868: --
70869: xla_ae_lines_pkg.SetAcctLineType
70870: (p_component_type => l_component_type
70871: ,p_event_type_code => l_event_type_code
70872: ,p_line_definition_owner_code => l_line_definition_owner_code
70873: ,p_line_definition_code => l_line_definition_code
70879: ,p_event_class_code => l_event_class_code);
70880: --
70881: -- set accounting class
70882: --
70883: xla_ae_lines_pkg.SetAcctClass(
70884: p_accounting_class_code => 'FEDERAL_UNEARNED_REVENUE'
70885: , p_ae_header_id => l_ae_header_id
70886: );
70887:
70887:
70888: --
70889: -- set rounding class
70890: --
70891: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
70892: 'FEDERAL_UNEARNED_REVENUE';
70893:
70894: --
70895: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70891: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
70892: 'FEDERAL_UNEARNED_REVENUE';
70893:
70894: --
70895: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70896: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70897: --
70898: -- bulk performance
70899: --
70892: 'FEDERAL_UNEARNED_REVENUE';
70893:
70894: --
70895: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
70896: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70897: --
70898: -- bulk performance
70899: --
70900: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70896: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
70897: --
70898: -- bulk performance
70899: --
70900: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70901:
70902: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70903: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70904:
70898: -- bulk performance
70899: --
70900: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
70901:
70902: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70903: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70904:
70905: -- 4955764
70906: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70902: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
70903: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
70904:
70905: -- 4955764
70906: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
70907: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
70908:
70909: -- 4458381 Public Sector Enh
70910:
70928: l_rec_acct_attrs.array_num_value(6) := to_char(p_source_51);
70929: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
70930: l_rec_acct_attrs.array_num_value(7) := p_source_43;
70931:
70932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70934:
70935: ---------------------------------------------------------------------------------------------------------------
70936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70929: l_rec_acct_attrs.array_acct_attr_code(7) := 'LEDGER_AMOUNT';
70930: l_rec_acct_attrs.array_num_value(7) := p_source_43;
70931:
70932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70934:
70935: ---------------------------------------------------------------------------------------------------------------
70936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70937: ---------------------------------------------------------------------------------------------------------------
70932: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
70933: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
70934:
70935: ---------------------------------------------------------------------------------------------------------------
70936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70937: ---------------------------------------------------------------------------------------------------------------
70938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70939:
70940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70934:
70935: ---------------------------------------------------------------------------------------------------------------
70936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70937: ---------------------------------------------------------------------------------------------------------------
70938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70939:
70940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70942:
70936: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
70937: ---------------------------------------------------------------------------------------------------------------
70938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70939:
70940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70942:
70943: IF xla_accounting_cache_pkg.GetValueChar
70944: (p_source_code => 'LEDGER_CATEGORY_CODE'
70937: ---------------------------------------------------------------------------------------------------------------
70938: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
70939:
70940: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70941: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
70942:
70943: IF xla_accounting_cache_pkg.GetValueChar
70944: (p_source_code => 'LEDGER_CATEGORY_CODE'
70945: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
70948: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
70949: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
70950: )
70951: THEN
70952: xla_ae_lines_pkg.BflowUpgEntry
70953: (p_business_method_code => l_bflow_method_code
70954: ,p_business_class_code => l_bflow_class_code
70955: ,p_balance_type => l_balance_type_code);
70956: ELSE
70988: , x_value_type_code => l_adr_value_type_code
70989: , p_side => 'NA'
70990: );
70991:
70992: xla_ae_lines_pkg.set_ccid(
70993: p_code_combination_id => l_ccid
70994: , p_value_type_code => l_adr_value_type_code
70995: , p_transaction_coa_id => l_adr_transaction_coa_id
70996: , p_accounting_coa_id => l_adr_accounting_coa_id
71020: );
71021:
71022: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
71023:
71024: xla_ae_lines_pkg.set_segment(
71025: p_to_segment_code => 'GL_ACCOUNT'
71026: , p_segment_value => l_segment
71027: , p_from_segment_code => l_adr_value_segment_code
71028: , p_from_combination_id => l_adr_value_combination_id
71064: xla_accounting_err_pkg.build_message
71065: (p_appli_s_name => 'XLA'
71066: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
71067: ,p_token_1 => 'LINE_NUMBER'
71068: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
71069: ,p_token_2 => 'LINE_TYPE_NAME'
71070: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
71071: l_component_type
71072: ,l_component_code
71100: --
71101: --
71102: ------------------------------------------------------------------------------------------------
71103: -- 4219869 Business Flow
71104: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
71105: -- Prior Entry. Currently, the following code is always generated.
71106: ------------------------------------------------------------------------------------------------
71107: XLA_AE_LINES_PKG.ValidateCurrentLine;
71108:
71103: -- 4219869 Business Flow
71104: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
71105: -- Prior Entry. Currently, the following code is always generated.
71106: ------------------------------------------------------------------------------------------------
71107: XLA_AE_LINES_PKG.ValidateCurrentLine;
71108:
71109: ------------------------------------------------------------------------------------
71110: -- 4219869 Business Flow
71111: -- Populated credit and debit amounts -- Need to generate this within IF
71109: ------------------------------------------------------------------------------------
71110: -- 4219869 Business Flow
71111: -- Populated credit and debit amounts -- Need to generate this within IF
71112: ------------------------------------------------------------------------------------
71113: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71114:
71115: ----------------------------------------------------------------------------------
71116: -- 4219869 Business Flow
71117: -- Update journal entry status -- Need to generate this within IF
71141: -- To allow MPA report to determine if it should generate report process
71142: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
71143: ------------------------------------------------------------------------------------------
71144:
71145: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
71146: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
71147:
71148: --
71149: -- Update the line information that should be overwritten
71142: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
71143: ------------------------------------------------------------------------------------------
71144:
71145: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
71146: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
71147:
71148: --
71149: -- Update the line information that should be overwritten
71150: --
71147:
71148: --
71149: -- Update the line information that should be overwritten
71150: --
71151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71152: p_header_num => 1);
71153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71154:
71155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71149: -- Update the line information that should be overwritten
71150: --
71151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71152: p_header_num => 1);
71153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71154:
71155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71156:
71157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71151: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71152: p_header_num => 1);
71153: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71154:
71155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71156:
71157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71158: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
71159: END IF;
71154:
71155: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71156:
71157: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71158: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
71159: END IF;
71160:
71161: --
71162: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
71161: --
71162: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
71163: --
71164: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
71165: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
71166: ELSE
71167: ---------------------------------------------------------------------------------------------------
71168: -- 4262811a Switch Sign
71169: ---------------------------------------------------------------------------------------------------
71166: ELSE
71167: ---------------------------------------------------------------------------------------------------
71168: -- 4262811a Switch Sign
71169: ---------------------------------------------------------------------------------------------------
71170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71167: ---------------------------------------------------------------------------------------------------
71168: -- 4262811a Switch Sign
71169: ---------------------------------------------------------------------------------------------------
71170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71168: -- 4262811a Switch Sign
71169: ---------------------------------------------------------------------------------------------------
71170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71169: ---------------------------------------------------------------------------------------------------
71170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71170: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71171: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71178:
71172: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71178:
71179: END IF;
71180:
71173: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71174: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71175: -- 5132302
71176: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71177: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71178:
71179: END IF;
71180:
71181: -- 4955764
71178:
71179: END IF;
71180:
71181: -- 4955764
71182: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71184:
71185:
71186: XLA_AE_LINES_PKG.ValidateCurrentLine;
71182: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71184:
71185:
71186: XLA_AE_LINES_PKG.ValidateCurrentLine;
71187: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71188:
71189: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
71190: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
71183: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71184:
71185:
71186: XLA_AE_LINES_PKG.ValidateCurrentLine;
71187: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71188:
71189: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
71190: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
71191: ,p_balance_type_code => l_balance_type_code);
71330: --
71331: -- bulk performance
71332: --
71333: l_balance_type_code VARCHAR2(1);
71334: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
71335: l_log_module VARCHAR2(240);
71336:
71337: --
71338: -- Upgrade strategy
71402: ') = 'B'
71403: THEN
71404:
71405: --
71406: XLA_AE_LINES_PKG.SetNewLine;
71407:
71408: p_balance_type_code := l_balance_type_code;
71409: -- set the flag so later we will know whether the gain loss line needs to be created
71410:
71414:
71415: --
71416: -- bulk performance
71417: --
71418: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
71419: p_header_num => 0); -- 4262811
71420: --
71421: -- set accounting line options
71422: --
71419: p_header_num => 0); -- 4262811
71420: --
71421: -- set accounting line options
71422: --
71423: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
71424: p_natural_side_code => 'D'
71425: , p_gain_or_loss_flag => 'N'
71426: , p_gl_transfer_mode_code => 'S'
71427: , p_acct_entry_type_code => 'A'
71433: --
71434: --
71435: -- set accounting line type info
71436: --
71437: xla_ae_lines_pkg.SetAcctLineType
71438: (p_component_type => l_component_type
71439: ,p_event_type_code => l_event_type_code
71440: ,p_line_definition_owner_code => l_line_definition_owner_code
71441: ,p_line_definition_code => l_line_definition_code
71447: ,p_event_class_code => l_event_class_code);
71448: --
71449: -- set accounting class
71450: --
71451: xla_ae_lines_pkg.SetAcctClass(
71452: p_accounting_class_code => 'PA_BUDGET_EXECUTION_RESERVE_DR'
71453: , p_ae_header_id => l_ae_header_id
71454: );
71455:
71455:
71456: --
71457: -- set rounding class
71458: --
71459: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
71460: 'PA_BUDGET_EXECUTION_RESERVE_DR';
71461:
71462: --
71463: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
71459: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
71460: 'PA_BUDGET_EXECUTION_RESERVE_DR';
71461:
71462: --
71463: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
71464: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
71465: --
71466: -- bulk performance
71467: --
71460: 'PA_BUDGET_EXECUTION_RESERVE_DR';
71461:
71462: --
71463: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
71464: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
71465: --
71466: -- bulk performance
71467: --
71468: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
71464: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
71465: --
71466: -- bulk performance
71467: --
71468: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
71469:
71470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
71471: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
71472:
71466: -- bulk performance
71467: --
71468: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
71469:
71470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
71471: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
71472:
71473: -- 4955764
71474: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
71471: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
71472:
71473: -- 4955764
71474: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71475: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
71476:
71477: -- 4458381 Public Sector Enh
71478:
71518: l_rec_acct_attrs.array_char_value(17) := p_source_35;
71519: l_rec_acct_attrs.array_acct_attr_code(18) := 'UPG_DR_ENC_TYPE_ID';
71520: l_rec_acct_attrs.array_num_value(18) := p_source_45;
71521:
71522: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
71523: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
71524:
71525: ---------------------------------------------------------------------------------------------------------------
71526: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
71519: l_rec_acct_attrs.array_acct_attr_code(18) := 'UPG_DR_ENC_TYPE_ID';
71520: l_rec_acct_attrs.array_num_value(18) := p_source_45;
71521:
71522: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
71523: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
71524:
71525: ---------------------------------------------------------------------------------------------------------------
71526: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
71527: ---------------------------------------------------------------------------------------------------------------
71522: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
71523: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
71524:
71525: ---------------------------------------------------------------------------------------------------------------
71526: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
71527: ---------------------------------------------------------------------------------------------------------------
71528: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
71529:
71530: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71524:
71525: ---------------------------------------------------------------------------------------------------------------
71526: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
71527: ---------------------------------------------------------------------------------------------------------------
71528: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
71529:
71530: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71531: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71532:
71526: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
71527: ---------------------------------------------------------------------------------------------------------------
71528: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
71529:
71530: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71531: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71532:
71533: IF xla_accounting_cache_pkg.GetValueChar
71534: (p_source_code => 'LEDGER_CATEGORY_CODE'
71527: ---------------------------------------------------------------------------------------------------------------
71528: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
71529:
71530: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71531: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
71532:
71533: IF xla_accounting_cache_pkg.GetValueChar
71534: (p_source_code => 'LEDGER_CATEGORY_CODE'
71535: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
71538: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
71539: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
71540: )
71541: THEN
71542: xla_ae_lines_pkg.BflowUpgEntry
71543: (p_business_method_code => l_bflow_method_code
71544: ,p_business_class_code => l_bflow_class_code
71545: ,p_balance_type => l_balance_type_code);
71546: ELSE
71578: , x_value_type_code => l_adr_value_type_code
71579: , p_side => 'NA'
71580: );
71581:
71582: xla_ae_lines_pkg.set_ccid(
71583: p_code_combination_id => l_ccid
71584: , p_value_type_code => l_adr_value_type_code
71585: , p_transaction_coa_id => l_adr_transaction_coa_id
71586: , p_accounting_coa_id => l_adr_accounting_coa_id
71610: );
71611:
71612: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
71613:
71614: xla_ae_lines_pkg.set_segment(
71615: p_to_segment_code => 'GL_ACCOUNT'
71616: , p_segment_value => l_segment
71617: , p_from_segment_code => l_adr_value_segment_code
71618: , p_from_combination_id => l_adr_value_combination_id
71654: xla_accounting_err_pkg.build_message
71655: (p_appli_s_name => 'XLA'
71656: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
71657: ,p_token_1 => 'LINE_NUMBER'
71658: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
71659: ,p_token_2 => 'LINE_TYPE_NAME'
71660: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
71661: l_component_type
71662: ,l_component_code
71690: --
71691: --
71692: ------------------------------------------------------------------------------------------------
71693: -- 4219869 Business Flow
71694: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
71695: -- Prior Entry. Currently, the following code is always generated.
71696: ------------------------------------------------------------------------------------------------
71697: XLA_AE_LINES_PKG.ValidateCurrentLine;
71698:
71693: -- 4219869 Business Flow
71694: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
71695: -- Prior Entry. Currently, the following code is always generated.
71696: ------------------------------------------------------------------------------------------------
71697: XLA_AE_LINES_PKG.ValidateCurrentLine;
71698:
71699: ------------------------------------------------------------------------------------
71700: -- 4219869 Business Flow
71701: -- Populated credit and debit amounts -- Need to generate this within IF
71699: ------------------------------------------------------------------------------------
71700: -- 4219869 Business Flow
71701: -- Populated credit and debit amounts -- Need to generate this within IF
71702: ------------------------------------------------------------------------------------
71703: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71704:
71705: ----------------------------------------------------------------------------------
71706: -- 4219869 Business Flow
71707: -- Update journal entry status -- Need to generate this within IF
71731: -- To allow MPA report to determine if it should generate report process
71732: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
71733: ------------------------------------------------------------------------------------------
71734:
71735: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
71736: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
71737:
71738: --
71739: -- Update the line information that should be overwritten
71732: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
71733: ------------------------------------------------------------------------------------------
71734:
71735: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
71736: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
71737:
71738: --
71739: -- Update the line information that should be overwritten
71740: --
71737:
71738: --
71739: -- Update the line information that should be overwritten
71740: --
71741: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71742: p_header_num => 1);
71743: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71744:
71745: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71739: -- Update the line information that should be overwritten
71740: --
71741: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71742: p_header_num => 1);
71743: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71744:
71745: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71746:
71747: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71741: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
71742: p_header_num => 1);
71743: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
71744:
71745: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71746:
71747: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71748: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
71749: END IF;
71744:
71745: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
71746:
71747: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
71748: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
71749: END IF;
71750:
71751: --
71752: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
71751: --
71752: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
71753: --
71754: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
71755: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
71756: ELSE
71757: ---------------------------------------------------------------------------------------------------
71758: -- 4262811a Switch Sign
71759: ---------------------------------------------------------------------------------------------------
71756: ELSE
71757: ---------------------------------------------------------------------------------------------------
71758: -- 4262811a Switch Sign
71759: ---------------------------------------------------------------------------------------------------
71760: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71757: ---------------------------------------------------------------------------------------------------
71758: -- 4262811a Switch Sign
71759: ---------------------------------------------------------------------------------------------------
71760: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71758: -- 4262811a Switch Sign
71759: ---------------------------------------------------------------------------------------------------
71760: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71759: ---------------------------------------------------------------------------------------------------
71760: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71767: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71760: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
71761: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71767: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71768:
71762: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71767: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71768:
71769: END IF;
71770:
71763: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
71764: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71765: -- 5132302
71766: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
71767: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
71768:
71769: END IF;
71770:
71771: -- 4955764
71768:
71769: END IF;
71770:
71771: -- 4955764
71772: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71773: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71774:
71775:
71776: XLA_AE_LINES_PKG.ValidateCurrentLine;
71772: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
71773: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71774:
71775:
71776: XLA_AE_LINES_PKG.ValidateCurrentLine;
71777: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71778:
71779: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
71780: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
71773: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
71774:
71775:
71776: XLA_AE_LINES_PKG.ValidateCurrentLine;
71777: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
71778:
71779: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
71780: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
71781: ,p_balance_type_code => l_balance_type_code);
71912: --
71913: -- bulk performance
71914: --
71915: l_balance_type_code VARCHAR2(1);
71916: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
71917: l_log_module VARCHAR2(240);
71918:
71919: --
71920: -- Upgrade strategy
71984: ') = 'B'
71985: THEN
71986:
71987: --
71988: XLA_AE_LINES_PKG.SetNewLine;
71989:
71990: p_balance_type_code := l_balance_type_code;
71991: -- set the flag so later we will know whether the gain loss line needs to be created
71992:
71996:
71997: --
71998: -- bulk performance
71999: --
72000: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
72001: p_header_num => 0); -- 4262811
72002: --
72003: -- set accounting line options
72004: --
72001: p_header_num => 0); -- 4262811
72002: --
72003: -- set accounting line options
72004: --
72005: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
72006: p_natural_side_code => 'D'
72007: , p_gain_or_loss_flag => 'N'
72008: , p_gl_transfer_mode_code => 'S'
72009: , p_acct_entry_type_code => 'A'
72015: --
72016: --
72017: -- set accounting line type info
72018: --
72019: xla_ae_lines_pkg.SetAcctLineType
72020: (p_component_type => l_component_type
72021: ,p_event_type_code => l_event_type_code
72022: ,p_line_definition_owner_code => l_line_definition_owner_code
72023: ,p_line_definition_code => l_line_definition_code
72029: ,p_event_class_code => l_event_class_code);
72030: --
72031: -- set accounting class
72032: --
72033: xla_ae_lines_pkg.SetAcctClass(
72034: p_accounting_class_code => 'PA_BUDGET_EXECUTION_RESERVE_DR'
72035: , p_ae_header_id => l_ae_header_id
72036: );
72037:
72037:
72038: --
72039: -- set rounding class
72040: --
72041: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
72042: 'PA_BUDGET_EXECUTION_RESERVE_DR';
72043:
72044: --
72045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72041: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
72042: 'PA_BUDGET_EXECUTION_RESERVE_DR';
72043:
72044: --
72045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72047: --
72048: -- bulk performance
72049: --
72042: 'PA_BUDGET_EXECUTION_RESERVE_DR';
72043:
72044: --
72045: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72047: --
72048: -- bulk performance
72049: --
72050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72046: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72047: --
72048: -- bulk performance
72049: --
72050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72051:
72052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72054:
72048: -- bulk performance
72049: --
72050: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72051:
72052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72054:
72055: -- 4955764
72056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72052: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72053: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72054:
72055: -- 4955764
72056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
72058:
72059: -- 4458381 Public Sector Enh
72060:
72061: --
72062: -- set accounting attributes for the line type
72063: --
72064:
72065: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72066: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72067:
72068: ---------------------------------------------------------------------------------------------------------------
72069: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72062: -- set accounting attributes for the line type
72063: --
72064:
72065: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72066: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72067:
72068: ---------------------------------------------------------------------------------------------------------------
72069: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72070: ---------------------------------------------------------------------------------------------------------------
72065: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72066: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72067:
72068: ---------------------------------------------------------------------------------------------------------------
72069: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72070: ---------------------------------------------------------------------------------------------------------------
72071: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72072:
72073: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72067:
72068: ---------------------------------------------------------------------------------------------------------------
72069: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72070: ---------------------------------------------------------------------------------------------------------------
72071: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72072:
72073: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72074: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72075:
72069: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72070: ---------------------------------------------------------------------------------------------------------------
72071: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72072:
72073: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72074: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72075:
72076: IF xla_accounting_cache_pkg.GetValueChar
72077: (p_source_code => 'LEDGER_CATEGORY_CODE'
72070: ---------------------------------------------------------------------------------------------------------------
72071: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72072:
72073: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72074: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72075:
72076: IF xla_accounting_cache_pkg.GetValueChar
72077: (p_source_code => 'LEDGER_CATEGORY_CODE'
72078: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
72081: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
72082: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
72083: )
72084: THEN
72085: xla_ae_lines_pkg.BflowUpgEntry
72086: (p_business_method_code => l_bflow_method_code
72087: ,p_business_class_code => l_bflow_class_code
72088: ,p_balance_type => l_balance_type_code);
72089: ELSE
72121: , x_value_type_code => l_adr_value_type_code
72122: , p_side => 'NA'
72123: );
72124:
72125: xla_ae_lines_pkg.set_ccid(
72126: p_code_combination_id => l_ccid
72127: , p_value_type_code => l_adr_value_type_code
72128: , p_transaction_coa_id => l_adr_transaction_coa_id
72129: , p_accounting_coa_id => l_adr_accounting_coa_id
72153: );
72154:
72155: IF NVL(l_segment,'NULL') <> '#$NO_OVERRIDE#$' THEN -- 4465612
72156:
72157: xla_ae_lines_pkg.set_segment(
72158: p_to_segment_code => 'GL_ACCOUNT'
72159: , p_segment_value => l_segment
72160: , p_from_segment_code => l_adr_value_segment_code
72161: , p_from_combination_id => l_adr_value_combination_id
72197: xla_accounting_err_pkg.build_message
72198: (p_appli_s_name => 'XLA'
72199: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
72200: ,p_token_1 => 'LINE_NUMBER'
72201: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
72202: ,p_token_2 => 'LINE_TYPE_NAME'
72203: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
72204: l_component_type
72205: ,l_component_code
72233: --
72234: --
72235: ------------------------------------------------------------------------------------------------
72236: -- 4219869 Business Flow
72237: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
72238: -- Prior Entry. Currently, the following code is always generated.
72239: ------------------------------------------------------------------------------------------------
72240: XLA_AE_LINES_PKG.ValidateCurrentLine;
72241:
72236: -- 4219869 Business Flow
72237: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
72238: -- Prior Entry. Currently, the following code is always generated.
72239: ------------------------------------------------------------------------------------------------
72240: XLA_AE_LINES_PKG.ValidateCurrentLine;
72241:
72242: ------------------------------------------------------------------------------------
72243: -- 4219869 Business Flow
72244: -- Populated credit and debit amounts -- Need to generate this within IF
72242: ------------------------------------------------------------------------------------
72243: -- 4219869 Business Flow
72244: -- Populated credit and debit amounts -- Need to generate this within IF
72245: ------------------------------------------------------------------------------------
72246: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72247:
72248: ----------------------------------------------------------------------------------
72249: -- 4219869 Business Flow
72250: -- Update journal entry status -- Need to generate this within IF
72274: -- To allow MPA report to determine if it should generate report process
72275: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
72276: ------------------------------------------------------------------------------------------
72277:
72278: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
72279: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
72280:
72281: --
72282: -- Update the line information that should be overwritten
72275: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
72276: ------------------------------------------------------------------------------------------
72277:
72278: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
72279: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
72280:
72281: --
72282: -- Update the line information that should be overwritten
72283: --
72280:
72281: --
72282: -- Update the line information that should be overwritten
72283: --
72284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72285: p_header_num => 1);
72286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72287:
72288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72282: -- Update the line information that should be overwritten
72283: --
72284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72285: p_header_num => 1);
72286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72287:
72288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72289:
72290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72284: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72285: p_header_num => 1);
72286: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72287:
72288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72289:
72290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72291: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
72292: END IF;
72287:
72288: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72289:
72290: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72291: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
72292: END IF;
72293:
72294: --
72295: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
72294: --
72295: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
72296: --
72297: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
72298: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
72299: ELSE
72300: ---------------------------------------------------------------------------------------------------
72301: -- 4262811a Switch Sign
72302: ---------------------------------------------------------------------------------------------------
72299: ELSE
72300: ---------------------------------------------------------------------------------------------------
72301: -- 4262811a Switch Sign
72302: ---------------------------------------------------------------------------------------------------
72303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72300: ---------------------------------------------------------------------------------------------------
72301: -- 4262811a Switch Sign
72302: ---------------------------------------------------------------------------------------------------
72303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72301: -- 4262811a Switch Sign
72302: ---------------------------------------------------------------------------------------------------
72303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72302: ---------------------------------------------------------------------------------------------------
72303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72303: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72304: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72311:
72305: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72311:
72312: END IF;
72313:
72306: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72307: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72308: -- 5132302
72309: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72310: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72311:
72312: END IF;
72313:
72314: -- 4955764
72311:
72312: END IF;
72313:
72314: -- 4955764
72315: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72317:
72318:
72319: XLA_AE_LINES_PKG.ValidateCurrentLine;
72315: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72317:
72318:
72319: XLA_AE_LINES_PKG.ValidateCurrentLine;
72320: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72321:
72322: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
72323: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
72316: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72317:
72318:
72319: XLA_AE_LINES_PKG.ValidateCurrentLine;
72320: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72321:
72322: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
72323: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
72324: ,p_balance_type_code => l_balance_type_code);
72455: --
72456: -- bulk performance
72457: --
72458: l_balance_type_code VARCHAR2(1);
72459: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
72460: l_log_module VARCHAR2(240);
72461:
72462: --
72463: -- Upgrade strategy
72527: ') = 'N'
72528: THEN
72529:
72530: --
72531: XLA_AE_LINES_PKG.SetNewLine;
72532:
72533: p_balance_type_code := l_balance_type_code;
72534: -- set the flag so later we will know whether the gain loss line needs to be created
72535:
72539:
72540: --
72541: -- bulk performance
72542: --
72543: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
72544: p_header_num => 0); -- 4262811
72545: --
72546: -- set accounting line options
72547: --
72544: p_header_num => 0); -- 4262811
72545: --
72546: -- set accounting line options
72547: --
72548: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
72549: p_natural_side_code => 'C'
72550: , p_gain_or_loss_flag => 'N'
72551: , p_gl_transfer_mode_code => 'S'
72552: , p_acct_entry_type_code => 'A'
72558: --
72559: --
72560: -- set accounting line type info
72561: --
72562: xla_ae_lines_pkg.SetAcctLineType
72563: (p_component_type => l_component_type
72564: ,p_event_type_code => l_event_type_code
72565: ,p_line_definition_owner_code => l_line_definition_owner_code
72566: ,p_line_definition_code => l_line_definition_code
72572: ,p_event_class_code => l_event_class_code);
72573: --
72574: -- set accounting class
72575: --
72576: xla_ae_lines_pkg.SetAcctClass(
72577: p_accounting_class_code => 'REVENUE'
72578: , p_ae_header_id => l_ae_header_id
72579: );
72580:
72580:
72581: --
72582: -- set rounding class
72583: --
72584: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
72585: 'REVENUE';
72586:
72587: --
72588: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72584: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
72585: 'REVENUE';
72586:
72587: --
72588: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72589: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72590: --
72591: -- bulk performance
72592: --
72585: 'REVENUE';
72586:
72587: --
72588: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
72589: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72590: --
72591: -- bulk performance
72592: --
72593: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72589: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
72590: --
72591: -- bulk performance
72592: --
72593: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72594:
72595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72596: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72597:
72591: -- bulk performance
72592: --
72593: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
72594:
72595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72596: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72597:
72598: -- 4955764
72599: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72595: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
72596: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
72597:
72598: -- 4955764
72599: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72600: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
72601:
72602: -- 4458381 Public Sector Enh
72603:
72627: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
72628: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
72629: l_rec_acct_attrs.array_num_value(10) := p_source_43;
72630:
72631: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72632: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72633:
72634: ---------------------------------------------------------------------------------------------------------------
72635: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72628: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
72629: l_rec_acct_attrs.array_num_value(10) := p_source_43;
72630:
72631: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72632: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72633:
72634: ---------------------------------------------------------------------------------------------------------------
72635: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72636: ---------------------------------------------------------------------------------------------------------------
72631: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
72632: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
72633:
72634: ---------------------------------------------------------------------------------------------------------------
72635: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72636: ---------------------------------------------------------------------------------------------------------------
72637: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72638:
72639: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72633:
72634: ---------------------------------------------------------------------------------------------------------------
72635: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72636: ---------------------------------------------------------------------------------------------------------------
72637: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72638:
72639: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72640: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72641:
72635: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
72636: ---------------------------------------------------------------------------------------------------------------
72637: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72638:
72639: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72640: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72641:
72642: IF xla_accounting_cache_pkg.GetValueChar
72643: (p_source_code => 'LEDGER_CATEGORY_CODE'
72636: ---------------------------------------------------------------------------------------------------------------
72637: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
72638:
72639: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72640: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
72641:
72642: IF xla_accounting_cache_pkg.GetValueChar
72643: (p_source_code => 'LEDGER_CATEGORY_CODE'
72644: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
72647: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
72648: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
72649: )
72650: THEN
72651: xla_ae_lines_pkg.BflowUpgEntry
72652: (p_business_method_code => l_bflow_method_code
72653: ,p_business_class_code => l_bflow_class_code
72654: ,p_balance_type => l_balance_type_code);
72655: ELSE
72687: , x_value_type_code => l_adr_value_type_code
72688: , p_side => 'NA'
72689: );
72690:
72691: xla_ae_lines_pkg.set_ccid(
72692: p_code_combination_id => l_ccid
72693: , p_value_type_code => l_adr_value_type_code
72694: , p_transaction_coa_id => l_adr_transaction_coa_id
72695: , p_accounting_coa_id => l_adr_accounting_coa_id
72723: xla_accounting_err_pkg.build_message
72724: (p_appli_s_name => 'XLA'
72725: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
72726: ,p_token_1 => 'LINE_NUMBER'
72727: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
72728: ,p_token_2 => 'LINE_TYPE_NAME'
72729: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
72730: l_component_type
72731: ,l_component_code
72759: --
72760: --
72761: ------------------------------------------------------------------------------------------------
72762: -- 4219869 Business Flow
72763: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
72764: -- Prior Entry. Currently, the following code is always generated.
72765: ------------------------------------------------------------------------------------------------
72766: XLA_AE_LINES_PKG.ValidateCurrentLine;
72767:
72762: -- 4219869 Business Flow
72763: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
72764: -- Prior Entry. Currently, the following code is always generated.
72765: ------------------------------------------------------------------------------------------------
72766: XLA_AE_LINES_PKG.ValidateCurrentLine;
72767:
72768: ------------------------------------------------------------------------------------
72769: -- 4219869 Business Flow
72770: -- Populated credit and debit amounts -- Need to generate this within IF
72768: ------------------------------------------------------------------------------------
72769: -- 4219869 Business Flow
72770: -- Populated credit and debit amounts -- Need to generate this within IF
72771: ------------------------------------------------------------------------------------
72772: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72773:
72774: ----------------------------------------------------------------------------------
72775: -- 4219869 Business Flow
72776: -- Update journal entry status -- Need to generate this within IF
72800: -- To allow MPA report to determine if it should generate report process
72801: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
72802: ------------------------------------------------------------------------------------------
72803:
72804: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
72805: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
72806:
72807: --
72808: -- Update the line information that should be overwritten
72801: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
72802: ------------------------------------------------------------------------------------------
72803:
72804: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
72805: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
72806:
72807: --
72808: -- Update the line information that should be overwritten
72809: --
72806:
72807: --
72808: -- Update the line information that should be overwritten
72809: --
72810: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72811: p_header_num => 1);
72812: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72813:
72814: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72808: -- Update the line information that should be overwritten
72809: --
72810: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72811: p_header_num => 1);
72812: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72813:
72814: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72815:
72816: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72810: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
72811: p_header_num => 1);
72812: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
72813:
72814: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72815:
72816: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72817: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
72818: END IF;
72813:
72814: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
72815:
72816: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
72817: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
72818: END IF;
72819:
72820: --
72821: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
72820: --
72821: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
72822: --
72823: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
72824: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
72825: ELSE
72826: ---------------------------------------------------------------------------------------------------
72827: -- 4262811a Switch Sign
72828: ---------------------------------------------------------------------------------------------------
72825: ELSE
72826: ---------------------------------------------------------------------------------------------------
72827: -- 4262811a Switch Sign
72828: ---------------------------------------------------------------------------------------------------
72829: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72826: ---------------------------------------------------------------------------------------------------
72827: -- 4262811a Switch Sign
72828: ---------------------------------------------------------------------------------------------------
72829: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72827: -- 4262811a Switch Sign
72828: ---------------------------------------------------------------------------------------------------
72829: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72828: ---------------------------------------------------------------------------------------------------
72829: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72836: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72829: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
72830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72836: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72837:
72831: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72836: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72837:
72838: END IF;
72839:
72832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
72833: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72834: -- 5132302
72835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
72836: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
72837:
72838: END IF;
72839:
72840: -- 4955764
72837:
72838: END IF;
72839:
72840: -- 4955764
72841: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72842: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72843:
72844:
72845: XLA_AE_LINES_PKG.ValidateCurrentLine;
72841: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
72842: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72843:
72844:
72845: XLA_AE_LINES_PKG.ValidateCurrentLine;
72846: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72847:
72848: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
72849: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
72842: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
72843:
72844:
72845: XLA_AE_LINES_PKG.ValidateCurrentLine;
72846: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
72847:
72848: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
72849: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
72850: ,p_balance_type_code => l_balance_type_code);
72981: --
72982: -- bulk performance
72983: --
72984: l_balance_type_code VARCHAR2(1);
72985: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
72986: l_log_module VARCHAR2(240);
72987:
72988: --
72989: -- Upgrade strategy
73053: ') = 'N'
73054: THEN
73055:
73056: --
73057: XLA_AE_LINES_PKG.SetNewLine;
73058:
73059: p_balance_type_code := l_balance_type_code;
73060: -- set the flag so later we will know whether the gain loss line needs to be created
73061:
73065:
73066: --
73067: -- bulk performance
73068: --
73069: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
73070: p_header_num => 0); -- 4262811
73071: --
73072: -- set accounting line options
73073: --
73070: p_header_num => 0); -- 4262811
73071: --
73072: -- set accounting line options
73073: --
73074: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
73075: p_natural_side_code => 'C'
73076: , p_gain_or_loss_flag => 'N'
73077: , p_gl_transfer_mode_code => 'S'
73078: , p_acct_entry_type_code => 'A'
73084: --
73085: --
73086: -- set accounting line type info
73087: --
73088: xla_ae_lines_pkg.SetAcctLineType
73089: (p_component_type => l_component_type
73090: ,p_event_type_code => l_event_type_code
73091: ,p_line_definition_owner_code => l_line_definition_owner_code
73092: ,p_line_definition_code => l_line_definition_code
73098: ,p_event_class_code => l_event_class_code);
73099: --
73100: -- set accounting class
73101: --
73102: xla_ae_lines_pkg.SetAcctClass(
73103: p_accounting_class_code => 'REVENUE'
73104: , p_ae_header_id => l_ae_header_id
73105: );
73106:
73106:
73107: --
73108: -- set rounding class
73109: --
73110: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
73111: 'REVENUE';
73112:
73113: --
73114: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73110: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
73111: 'REVENUE';
73112:
73113: --
73114: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73115: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73116: --
73117: -- bulk performance
73118: --
73111: 'REVENUE';
73112:
73113: --
73114: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73115: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73116: --
73117: -- bulk performance
73118: --
73119: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73115: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73116: --
73117: -- bulk performance
73118: --
73119: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73120:
73121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73122: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73123:
73117: -- bulk performance
73118: --
73119: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73120:
73121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73122: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73123:
73124: -- 4955764
73125: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73121: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73122: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73123:
73124: -- 4955764
73125: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73126: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
73127:
73128: -- 4458381 Public Sector Enh
73129:
73153: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
73154: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
73155: l_rec_acct_attrs.array_num_value(10) := p_source_43;
73156:
73157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73159:
73160: ---------------------------------------------------------------------------------------------------------------
73161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73154: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
73155: l_rec_acct_attrs.array_num_value(10) := p_source_43;
73156:
73157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73159:
73160: ---------------------------------------------------------------------------------------------------------------
73161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73162: ---------------------------------------------------------------------------------------------------------------
73157: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73158: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73159:
73160: ---------------------------------------------------------------------------------------------------------------
73161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73162: ---------------------------------------------------------------------------------------------------------------
73163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73164:
73165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73159:
73160: ---------------------------------------------------------------------------------------------------------------
73161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73162: ---------------------------------------------------------------------------------------------------------------
73163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73164:
73165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73167:
73161: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73162: ---------------------------------------------------------------------------------------------------------------
73163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73164:
73165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73167:
73168: IF xla_accounting_cache_pkg.GetValueChar
73169: (p_source_code => 'LEDGER_CATEGORY_CODE'
73162: ---------------------------------------------------------------------------------------------------------------
73163: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73164:
73165: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73166: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73167:
73168: IF xla_accounting_cache_pkg.GetValueChar
73169: (p_source_code => 'LEDGER_CATEGORY_CODE'
73170: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
73173: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
73174: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
73175: )
73176: THEN
73177: xla_ae_lines_pkg.BflowUpgEntry
73178: (p_business_method_code => l_bflow_method_code
73179: ,p_business_class_code => l_bflow_class_code
73180: ,p_balance_type => l_balance_type_code);
73181: ELSE
73213: , x_value_type_code => l_adr_value_type_code
73214: , p_side => 'NA'
73215: );
73216:
73217: xla_ae_lines_pkg.set_ccid(
73218: p_code_combination_id => l_ccid
73219: , p_value_type_code => l_adr_value_type_code
73220: , p_transaction_coa_id => l_adr_transaction_coa_id
73221: , p_accounting_coa_id => l_adr_accounting_coa_id
73249: xla_accounting_err_pkg.build_message
73250: (p_appli_s_name => 'XLA'
73251: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
73252: ,p_token_1 => 'LINE_NUMBER'
73253: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
73254: ,p_token_2 => 'LINE_TYPE_NAME'
73255: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
73256: l_component_type
73257: ,l_component_code
73285: --
73286: --
73287: ------------------------------------------------------------------------------------------------
73288: -- 4219869 Business Flow
73289: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
73290: -- Prior Entry. Currently, the following code is always generated.
73291: ------------------------------------------------------------------------------------------------
73292: XLA_AE_LINES_PKG.ValidateCurrentLine;
73293:
73288: -- 4219869 Business Flow
73289: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
73290: -- Prior Entry. Currently, the following code is always generated.
73291: ------------------------------------------------------------------------------------------------
73292: XLA_AE_LINES_PKG.ValidateCurrentLine;
73293:
73294: ------------------------------------------------------------------------------------
73295: -- 4219869 Business Flow
73296: -- Populated credit and debit amounts -- Need to generate this within IF
73294: ------------------------------------------------------------------------------------
73295: -- 4219869 Business Flow
73296: -- Populated credit and debit amounts -- Need to generate this within IF
73297: ------------------------------------------------------------------------------------
73298: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73299:
73300: ----------------------------------------------------------------------------------
73301: -- 4219869 Business Flow
73302: -- Update journal entry status -- Need to generate this within IF
73326: -- To allow MPA report to determine if it should generate report process
73327: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
73328: ------------------------------------------------------------------------------------------
73329:
73330: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
73331: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
73332:
73333: --
73334: -- Update the line information that should be overwritten
73327: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
73328: ------------------------------------------------------------------------------------------
73329:
73330: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
73331: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
73332:
73333: --
73334: -- Update the line information that should be overwritten
73335: --
73332:
73333: --
73334: -- Update the line information that should be overwritten
73335: --
73336: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73337: p_header_num => 1);
73338: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73339:
73340: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73334: -- Update the line information that should be overwritten
73335: --
73336: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73337: p_header_num => 1);
73338: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73339:
73340: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73341:
73342: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73336: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73337: p_header_num => 1);
73338: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73339:
73340: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73341:
73342: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73343: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
73344: END IF;
73339:
73340: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73341:
73342: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73343: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
73344: END IF;
73345:
73346: --
73347: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
73346: --
73347: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
73348: --
73349: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
73350: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
73351: ELSE
73352: ---------------------------------------------------------------------------------------------------
73353: -- 4262811a Switch Sign
73354: ---------------------------------------------------------------------------------------------------
73351: ELSE
73352: ---------------------------------------------------------------------------------------------------
73353: -- 4262811a Switch Sign
73354: ---------------------------------------------------------------------------------------------------
73355: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73356: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73352: ---------------------------------------------------------------------------------------------------
73353: -- 4262811a Switch Sign
73354: ---------------------------------------------------------------------------------------------------
73355: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73356: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73353: -- 4262811a Switch Sign
73354: ---------------------------------------------------------------------------------------------------
73355: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73356: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73361: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73354: ---------------------------------------------------------------------------------------------------
73355: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73356: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73361: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73362: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73355: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73356: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73361: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73362: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73363:
73357: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73361: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73362: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73363:
73364: END IF;
73365:
73358: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73359: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73360: -- 5132302
73361: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73362: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73363:
73364: END IF;
73365:
73366: -- 4955764
73363:
73364: END IF;
73365:
73366: -- 4955764
73367: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73368: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73369:
73370:
73371: XLA_AE_LINES_PKG.ValidateCurrentLine;
73367: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73368: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73369:
73370:
73371: XLA_AE_LINES_PKG.ValidateCurrentLine;
73372: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73373:
73374: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
73375: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
73368: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73369:
73370:
73371: XLA_AE_LINES_PKG.ValidateCurrentLine;
73372: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73373:
73374: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
73375: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
73376: ,p_balance_type_code => l_balance_type_code);
73507: --
73508: -- bulk performance
73509: --
73510: l_balance_type_code VARCHAR2(1);
73511: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
73512: l_log_module VARCHAR2(240);
73513:
73514: --
73515: -- Upgrade strategy
73579: ') = 'N'
73580: THEN
73581:
73582: --
73583: XLA_AE_LINES_PKG.SetNewLine;
73584:
73585: p_balance_type_code := l_balance_type_code;
73586: -- set the flag so later we will know whether the gain loss line needs to be created
73587:
73591:
73592: --
73593: -- bulk performance
73594: --
73595: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
73596: p_header_num => 0); -- 4262811
73597: --
73598: -- set accounting line options
73599: --
73596: p_header_num => 0); -- 4262811
73597: --
73598: -- set accounting line options
73599: --
73600: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
73601: p_natural_side_code => 'C'
73602: , p_gain_or_loss_flag => 'N'
73603: , p_gl_transfer_mode_code => 'S'
73604: , p_acct_entry_type_code => 'A'
73610: --
73611: --
73612: -- set accounting line type info
73613: --
73614: xla_ae_lines_pkg.SetAcctLineType
73615: (p_component_type => l_component_type
73616: ,p_event_type_code => l_event_type_code
73617: ,p_line_definition_owner_code => l_line_definition_owner_code
73618: ,p_line_definition_code => l_line_definition_code
73624: ,p_event_class_code => l_event_class_code);
73625: --
73626: -- set accounting class
73627: --
73628: xla_ae_lines_pkg.SetAcctClass(
73629: p_accounting_class_code => 'REVENUE'
73630: , p_ae_header_id => l_ae_header_id
73631: );
73632:
73632:
73633: --
73634: -- set rounding class
73635: --
73636: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
73637: 'REVENUE';
73638:
73639: --
73640: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73636: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
73637: 'REVENUE';
73638:
73639: --
73640: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73641: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73642: --
73643: -- bulk performance
73644: --
73637: 'REVENUE';
73638:
73639: --
73640: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
73641: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73642: --
73643: -- bulk performance
73644: --
73645: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73641: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
73642: --
73643: -- bulk performance
73644: --
73645: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73646:
73647: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73648: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73649:
73643: -- bulk performance
73644: --
73645: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
73646:
73647: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73648: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73649:
73650: -- 4955764
73651: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73647: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
73648: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
73649:
73650: -- 4955764
73651: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73652: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
73653:
73654: -- 4458381 Public Sector Enh
73655:
73679: l_rec_acct_attrs.array_num_value(9) := to_char(p_source_51);
73680: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
73681: l_rec_acct_attrs.array_num_value(10) := p_source_43;
73682:
73683: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73684: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73685:
73686: ---------------------------------------------------------------------------------------------------------------
73687: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73680: l_rec_acct_attrs.array_acct_attr_code(10) := 'LEDGER_AMOUNT';
73681: l_rec_acct_attrs.array_num_value(10) := p_source_43;
73682:
73683: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73684: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73685:
73686: ---------------------------------------------------------------------------------------------------------------
73687: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73688: ---------------------------------------------------------------------------------------------------------------
73683: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
73684: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
73685:
73686: ---------------------------------------------------------------------------------------------------------------
73687: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73688: ---------------------------------------------------------------------------------------------------------------
73689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73690:
73691: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73685:
73686: ---------------------------------------------------------------------------------------------------------------
73687: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73688: ---------------------------------------------------------------------------------------------------------------
73689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73690:
73691: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73692: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73693:
73687: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
73688: ---------------------------------------------------------------------------------------------------------------
73689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73690:
73691: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73692: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73693:
73694: IF xla_accounting_cache_pkg.GetValueChar
73695: (p_source_code => 'LEDGER_CATEGORY_CODE'
73688: ---------------------------------------------------------------------------------------------------------------
73689: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
73690:
73691: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73692: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
73693:
73694: IF xla_accounting_cache_pkg.GetValueChar
73695: (p_source_code => 'LEDGER_CATEGORY_CODE'
73696: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
73699: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
73700: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
73701: )
73702: THEN
73703: xla_ae_lines_pkg.BflowUpgEntry
73704: (p_business_method_code => l_bflow_method_code
73705: ,p_business_class_code => l_bflow_class_code
73706: ,p_balance_type => l_balance_type_code);
73707: ELSE
73739: , x_value_type_code => l_adr_value_type_code
73740: , p_side => 'NA'
73741: );
73742:
73743: xla_ae_lines_pkg.set_ccid(
73744: p_code_combination_id => l_ccid
73745: , p_value_type_code => l_adr_value_type_code
73746: , p_transaction_coa_id => l_adr_transaction_coa_id
73747: , p_accounting_coa_id => l_adr_accounting_coa_id
73775: xla_accounting_err_pkg.build_message
73776: (p_appli_s_name => 'XLA'
73777: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
73778: ,p_token_1 => 'LINE_NUMBER'
73779: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
73780: ,p_token_2 => 'LINE_TYPE_NAME'
73781: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
73782: l_component_type
73783: ,l_component_code
73811: --
73812: --
73813: ------------------------------------------------------------------------------------------------
73814: -- 4219869 Business Flow
73815: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
73816: -- Prior Entry. Currently, the following code is always generated.
73817: ------------------------------------------------------------------------------------------------
73818: XLA_AE_LINES_PKG.ValidateCurrentLine;
73819:
73814: -- 4219869 Business Flow
73815: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
73816: -- Prior Entry. Currently, the following code is always generated.
73817: ------------------------------------------------------------------------------------------------
73818: XLA_AE_LINES_PKG.ValidateCurrentLine;
73819:
73820: ------------------------------------------------------------------------------------
73821: -- 4219869 Business Flow
73822: -- Populated credit and debit amounts -- Need to generate this within IF
73820: ------------------------------------------------------------------------------------
73821: -- 4219869 Business Flow
73822: -- Populated credit and debit amounts -- Need to generate this within IF
73823: ------------------------------------------------------------------------------------
73824: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73825:
73826: ----------------------------------------------------------------------------------
73827: -- 4219869 Business Flow
73828: -- Update journal entry status -- Need to generate this within IF
73852: -- To allow MPA report to determine if it should generate report process
73853: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
73854: ------------------------------------------------------------------------------------------
73855:
73856: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
73857: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
73858:
73859: --
73860: -- Update the line information that should be overwritten
73853: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
73854: ------------------------------------------------------------------------------------------
73855:
73856: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
73857: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
73858:
73859: --
73860: -- Update the line information that should be overwritten
73861: --
73858:
73859: --
73860: -- Update the line information that should be overwritten
73861: --
73862: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73863: p_header_num => 1);
73864: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73865:
73866: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73860: -- Update the line information that should be overwritten
73861: --
73862: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73863: p_header_num => 1);
73864: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73865:
73866: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73867:
73868: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73862: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
73863: p_header_num => 1);
73864: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
73865:
73866: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73867:
73868: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73869: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
73870: END IF;
73865:
73866: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
73867:
73868: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
73869: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
73870: END IF;
73871:
73872: --
73873: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
73872: --
73873: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
73874: --
73875: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
73876: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
73877: ELSE
73878: ---------------------------------------------------------------------------------------------------
73879: -- 4262811a Switch Sign
73880: ---------------------------------------------------------------------------------------------------
73877: ELSE
73878: ---------------------------------------------------------------------------------------------------
73879: -- 4262811a Switch Sign
73880: ---------------------------------------------------------------------------------------------------
73881: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73878: ---------------------------------------------------------------------------------------------------
73879: -- 4262811a Switch Sign
73880: ---------------------------------------------------------------------------------------------------
73881: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73879: -- 4262811a Switch Sign
73880: ---------------------------------------------------------------------------------------------------
73881: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73880: ---------------------------------------------------------------------------------------------------
73881: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73888: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73881: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
73882: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73888: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73889:
73883: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73888: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73889:
73890: END IF;
73891:
73884: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
73885: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73886: -- 5132302
73887: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
73888: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
73889:
73890: END IF;
73891:
73892: -- 4955764
73889:
73890: END IF;
73891:
73892: -- 4955764
73893: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73894: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73895:
73896:
73897: XLA_AE_LINES_PKG.ValidateCurrentLine;
73893: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
73894: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73895:
73896:
73897: XLA_AE_LINES_PKG.ValidateCurrentLine;
73898: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73899:
73900: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
73901: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
73894: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
73895:
73896:
73897: XLA_AE_LINES_PKG.ValidateCurrentLine;
73898: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
73899:
73900: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
73901: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
73902: ,p_balance_type_code => l_balance_type_code);
74379: l_first_event_id NUMBER;
74380: l_last_event_id NUMBER;
74381:
74382: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
74383: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
74384: --
74385: --
74386: l_result BOOLEAN := TRUE;
74387: l_rows NUMBER := 1000;
74660: EXIT WHEN l_array_entity_id.COUNT = 0;
74661:
74662: -- initialize arrays
74663: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
74664: XLA_AE_LINES_PKG.g_rec_lines := NULL;
74665:
74666: --
74667: -- Bug 4458708
74668: --
74665:
74666: --
74667: -- Bug 4458708
74668: --
74669: XLA_AE_LINES_PKG.g_LineNumber := 0;
74670:
74671:
74672: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
74673: g_last_hdr_idx := l_array_event_id.LAST;
74794: --
74795: -- following sets the accounting attributes needed to reverse
74796: -- accounting for a distributeion
74797: --
74798: xla_ae_lines_pkg.SetTrxReversalAttrs
74799: (p_event_id => l_event_id
74800: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
74801: ,p_trx_reversal_source => l_trx_reversal_source);
74802:
74826: --
74827: -- insert dummy rows into lines gt table that were created due to
74828: -- transaction reversals
74829: --
74830: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
74831: l_result := XLA_AE_LINES_PKG.InsertLines;
74832: END IF;
74833:
74834: --
74827: -- insert dummy rows into lines gt table that were created due to
74828: -- transaction reversals
74829: --
74830: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
74831: l_result := XLA_AE_LINES_PKG.InsertLines;
74832: END IF;
74833:
74834: --
74835: -- reset the temp_line_num for each set of events fetched from header
74835: -- reset the temp_line_num for each set of events fetched from header
74836: -- cursor rather than doing it for each new event in line cursor
74837: -- Bug 3939231
74838: --
74839: xla_ae_lines_pkg.g_temp_line_num := 0;
74840:
74841:
74842:
74843: --
74912: END IF;
74913: --
74914: EXIT WHEN l_array_entity_id.count = 0;
74915:
74916: XLA_AE_LINES_PKG.g_rec_lines := null;
74917:
74918: --
74919: -- Bug 4458708
74920: --
74917:
74918: --
74919: -- Bug 4458708
74920: --
74921: XLA_AE_LINES_PKG.g_LineNumber := 0;
74922: --
74923: --
74924:
74925: FOR Idx IN 1..l_array_event_id.count LOOP
74989:
74990:
74991:
74992: --
74993: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
74994:
74995: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
74996:
74997: IF l_continue_with_lines THEN
75073: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
75074: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
75075:
75076:
75077: xla_ae_lines_pkg.SetAcctReversalAttrs
75078: (p_event_id => l_event_id
75079: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
75080: ,p_calculate_acctd_flag => l_calculate_acctd_flag
75081: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
75247:
75248: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
75249: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
75250: AND (l_actual_flag = 'A')) THEN
75251: XLA_AE_LINES_PKG.CreateGainOrLossLines(
75252: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
75253: ,p_application_id => p_application_id
75254: ,p_amb_context_code => 'DEFAULT'
75255: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
75280: END IF;
75281: END IF;
75282:
75283: END LOOP;
75284: l_result := XLA_AE_LINES_PKG.InsertLines ;
75285: end loop;
75286: close line_cur;
75287:
75288:
75787: l_first_event_id NUMBER;
75788: l_last_event_id NUMBER;
75789:
75790: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
75791: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
75792: --
75793: --
75794: l_result BOOLEAN := TRUE;
75795: l_rows NUMBER := 1000;
76068: EXIT WHEN l_array_entity_id.COUNT = 0;
76069:
76070: -- initialize arrays
76071: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
76072: XLA_AE_LINES_PKG.g_rec_lines := NULL;
76073:
76074: --
76075: -- Bug 4458708
76076: --
76073:
76074: --
76075: -- Bug 4458708
76076: --
76077: XLA_AE_LINES_PKG.g_LineNumber := 0;
76078:
76079:
76080: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
76081: g_last_hdr_idx := l_array_event_id.LAST;
76202: --
76203: -- following sets the accounting attributes needed to reverse
76204: -- accounting for a distributeion
76205: --
76206: xla_ae_lines_pkg.SetTrxReversalAttrs
76207: (p_event_id => l_event_id
76208: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
76209: ,p_trx_reversal_source => l_trx_reversal_source);
76210:
76234: --
76235: -- insert dummy rows into lines gt table that were created due to
76236: -- transaction reversals
76237: --
76238: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
76239: l_result := XLA_AE_LINES_PKG.InsertLines;
76240: END IF;
76241:
76242: --
76235: -- insert dummy rows into lines gt table that were created due to
76236: -- transaction reversals
76237: --
76238: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
76239: l_result := XLA_AE_LINES_PKG.InsertLines;
76240: END IF;
76241:
76242: --
76243: -- reset the temp_line_num for each set of events fetched from header
76243: -- reset the temp_line_num for each set of events fetched from header
76244: -- cursor rather than doing it for each new event in line cursor
76245: -- Bug 3939231
76246: --
76247: xla_ae_lines_pkg.g_temp_line_num := 0;
76248:
76249:
76250:
76251: --
76320: END IF;
76321: --
76322: EXIT WHEN l_array_entity_id.count = 0;
76323:
76324: XLA_AE_LINES_PKG.g_rec_lines := null;
76325:
76326: --
76327: -- Bug 4458708
76328: --
76325:
76326: --
76327: -- Bug 4458708
76328: --
76329: XLA_AE_LINES_PKG.g_LineNumber := 0;
76330: --
76331: --
76332:
76333: FOR Idx IN 1..l_array_event_id.count LOOP
76397:
76398:
76399:
76400: --
76401: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
76402:
76403: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
76404:
76405: IF l_continue_with_lines THEN
76481: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
76482: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
76483:
76484:
76485: xla_ae_lines_pkg.SetAcctReversalAttrs
76486: (p_event_id => l_event_id
76487: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
76488: ,p_calculate_acctd_flag => l_calculate_acctd_flag
76489: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
76655:
76656: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
76657: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
76658: AND (l_actual_flag = 'A')) THEN
76659: XLA_AE_LINES_PKG.CreateGainOrLossLines(
76660: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
76661: ,p_application_id => p_application_id
76662: ,p_amb_context_code => 'DEFAULT'
76663: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
76688: END IF;
76689: END IF;
76690:
76691: END LOOP;
76692: l_result := XLA_AE_LINES_PKG.InsertLines ;
76693: end loop;
76694: close line_cur;
76695:
76696:
77175: l_first_event_id NUMBER;
77176: l_last_event_id NUMBER;
77177:
77178: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
77179: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
77180: --
77181: --
77182: l_result BOOLEAN := TRUE;
77183: l_rows NUMBER := 1000;
77450: EXIT WHEN l_array_entity_id.COUNT = 0;
77451:
77452: -- initialize arrays
77453: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
77454: XLA_AE_LINES_PKG.g_rec_lines := NULL;
77455:
77456: --
77457: -- Bug 4458708
77458: --
77455:
77456: --
77457: -- Bug 4458708
77458: --
77459: XLA_AE_LINES_PKG.g_LineNumber := 0;
77460:
77461:
77462: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
77463: g_last_hdr_idx := l_array_event_id.LAST;
77588: --
77589: -- following sets the accounting attributes needed to reverse
77590: -- accounting for a distributeion
77591: --
77592: xla_ae_lines_pkg.SetTrxReversalAttrs
77593: (p_event_id => l_event_id
77594: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
77595: ,p_trx_reversal_source => l_trx_reversal_source);
77596:
77620: --
77621: -- insert dummy rows into lines gt table that were created due to
77622: -- transaction reversals
77623: --
77624: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
77625: l_result := XLA_AE_LINES_PKG.InsertLines;
77626: END IF;
77627:
77628: --
77621: -- insert dummy rows into lines gt table that were created due to
77622: -- transaction reversals
77623: --
77624: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
77625: l_result := XLA_AE_LINES_PKG.InsertLines;
77626: END IF;
77627:
77628: --
77629: -- reset the temp_line_num for each set of events fetched from header
77629: -- reset the temp_line_num for each set of events fetched from header
77630: -- cursor rather than doing it for each new event in line cursor
77631: -- Bug 3939231
77632: --
77633: xla_ae_lines_pkg.g_temp_line_num := 0;
77634:
77635:
77636:
77637: --
77701: END IF;
77702: --
77703: EXIT WHEN l_array_entity_id.count = 0;
77704:
77705: XLA_AE_LINES_PKG.g_rec_lines := null;
77706:
77707: --
77708: -- Bug 4458708
77709: --
77706:
77707: --
77708: -- Bug 4458708
77709: --
77710: XLA_AE_LINES_PKG.g_LineNumber := 0;
77711: --
77712: --
77713:
77714: FOR Idx IN 1..l_array_event_id.count LOOP
77778:
77779:
77780:
77781: --
77782: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
77783:
77784: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
77785:
77786: IF l_continue_with_lines THEN
77838: l_rec_rev_acct_attrs.array_acct_attr_code(13) := 'UPG_DR_ENC_TYPE_ID';
77839: l_rec_rev_acct_attrs.array_num_value(13) := l_array_source_45(Idx);
77840:
77841:
77842: xla_ae_lines_pkg.SetAcctReversalAttrs
77843: (p_event_id => l_event_id
77844: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
77845: ,p_calculate_acctd_flag => l_calculate_acctd_flag
77846: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
77992:
77993: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
77994: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
77995: AND (l_actual_flag = 'A')) THEN
77996: XLA_AE_LINES_PKG.CreateGainOrLossLines(
77997: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
77998: ,p_application_id => p_application_id
77999: ,p_amb_context_code => 'DEFAULT'
78000: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
78025: END IF;
78026: END IF;
78027:
78028: END LOOP;
78029: l_result := XLA_AE_LINES_PKG.InsertLines ;
78030: end loop;
78031: close line_cur;
78032:
78033:
78583: l_first_event_id NUMBER;
78584: l_last_event_id NUMBER;
78585:
78586: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
78587: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
78588: --
78589: --
78590: l_result BOOLEAN := TRUE;
78591: l_rows NUMBER := 1000;
78891: EXIT WHEN l_array_entity_id.COUNT = 0;
78892:
78893: -- initialize arrays
78894: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
78895: XLA_AE_LINES_PKG.g_rec_lines := NULL;
78896:
78897: --
78898: -- Bug 4458708
78899: --
78896:
78897: --
78898: -- Bug 4458708
78899: --
78900: XLA_AE_LINES_PKG.g_LineNumber := 0;
78901:
78902:
78903: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
78904: g_last_hdr_idx := l_array_event_id.LAST;
79023: --
79024: -- following sets the accounting attributes needed to reverse
79025: -- accounting for a distributeion
79026: --
79027: xla_ae_lines_pkg.SetTrxReversalAttrs
79028: (p_event_id => l_event_id
79029: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
79030: ,p_trx_reversal_source => l_trx_reversal_source);
79031:
79055: --
79056: -- insert dummy rows into lines gt table that were created due to
79057: -- transaction reversals
79058: --
79059: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
79060: l_result := XLA_AE_LINES_PKG.InsertLines;
79061: END IF;
79062:
79063: --
79056: -- insert dummy rows into lines gt table that were created due to
79057: -- transaction reversals
79058: --
79059: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
79060: l_result := XLA_AE_LINES_PKG.InsertLines;
79061: END IF;
79062:
79063: --
79064: -- reset the temp_line_num for each set of events fetched from header
79064: -- reset the temp_line_num for each set of events fetched from header
79065: -- cursor rather than doing it for each new event in line cursor
79066: -- Bug 3939231
79067: --
79068: xla_ae_lines_pkg.g_temp_line_num := 0;
79069:
79070:
79071:
79072: --
79154: END IF;
79155: --
79156: EXIT WHEN l_array_entity_id.count = 0;
79157:
79158: XLA_AE_LINES_PKG.g_rec_lines := null;
79159:
79160: --
79161: -- Bug 4458708
79162: --
79159:
79160: --
79161: -- Bug 4458708
79162: --
79163: XLA_AE_LINES_PKG.g_LineNumber := 0;
79164: --
79165: --
79166:
79167: FOR Idx IN 1..l_array_event_id.count LOOP
79231:
79232:
79233:
79234: --
79235: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
79236:
79237: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
79238:
79239: IF l_continue_with_lines THEN
79341: l_rec_rev_acct_attrs.array_acct_attr_code(38) := 'UPG_DR_ENC_TYPE_ID';
79342: l_rec_rev_acct_attrs.array_num_value(38) := l_array_source_63(Idx);
79343:
79344:
79345: xla_ae_lines_pkg.SetAcctReversalAttrs
79346: (p_event_id => l_event_id
79347: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
79348: ,p_calculate_acctd_flag => l_calculate_acctd_flag
79349: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
79559:
79560: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
79561: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
79562: AND (l_actual_flag = 'A')) THEN
79563: XLA_AE_LINES_PKG.CreateGainOrLossLines(
79564: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
79565: ,p_application_id => p_application_id
79566: ,p_amb_context_code => 'DEFAULT'
79567: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
79592: END IF;
79593: END IF;
79594:
79595: END LOOP;
79596: l_result := XLA_AE_LINES_PKG.InsertLines ;
79597: end loop;
79598: close line_cur;
79599:
79600:
80150: l_first_event_id NUMBER;
80151: l_last_event_id NUMBER;
80152:
80153: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
80154: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
80155: --
80156: --
80157: l_result BOOLEAN := TRUE;
80158: l_rows NUMBER := 1000;
80458: EXIT WHEN l_array_entity_id.COUNT = 0;
80459:
80460: -- initialize arrays
80461: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
80462: XLA_AE_LINES_PKG.g_rec_lines := NULL;
80463:
80464: --
80465: -- Bug 4458708
80466: --
80463:
80464: --
80465: -- Bug 4458708
80466: --
80467: XLA_AE_LINES_PKG.g_LineNumber := 0;
80468:
80469:
80470: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
80471: g_last_hdr_idx := l_array_event_id.LAST;
80590: --
80591: -- following sets the accounting attributes needed to reverse
80592: -- accounting for a distributeion
80593: --
80594: xla_ae_lines_pkg.SetTrxReversalAttrs
80595: (p_event_id => l_event_id
80596: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
80597: ,p_trx_reversal_source => l_trx_reversal_source);
80598:
80622: --
80623: -- insert dummy rows into lines gt table that were created due to
80624: -- transaction reversals
80625: --
80626: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
80627: l_result := XLA_AE_LINES_PKG.InsertLines;
80628: END IF;
80629:
80630: --
80623: -- insert dummy rows into lines gt table that were created due to
80624: -- transaction reversals
80625: --
80626: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
80627: l_result := XLA_AE_LINES_PKG.InsertLines;
80628: END IF;
80629:
80630: --
80631: -- reset the temp_line_num for each set of events fetched from header
80631: -- reset the temp_line_num for each set of events fetched from header
80632: -- cursor rather than doing it for each new event in line cursor
80633: -- Bug 3939231
80634: --
80635: xla_ae_lines_pkg.g_temp_line_num := 0;
80636:
80637:
80638:
80639: --
80721: END IF;
80722: --
80723: EXIT WHEN l_array_entity_id.count = 0;
80724:
80725: XLA_AE_LINES_PKG.g_rec_lines := null;
80726:
80727: --
80728: -- Bug 4458708
80729: --
80726:
80727: --
80728: -- Bug 4458708
80729: --
80730: XLA_AE_LINES_PKG.g_LineNumber := 0;
80731: --
80732: --
80733:
80734: FOR Idx IN 1..l_array_event_id.count LOOP
80798:
80799:
80800:
80801: --
80802: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
80803:
80804: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
80805:
80806: IF l_continue_with_lines THEN
80908: l_rec_rev_acct_attrs.array_acct_attr_code(38) := 'UPG_DR_ENC_TYPE_ID';
80909: l_rec_rev_acct_attrs.array_num_value(38) := l_array_source_63(Idx);
80910:
80911:
80912: xla_ae_lines_pkg.SetAcctReversalAttrs
80913: (p_event_id => l_event_id
80914: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
80915: ,p_calculate_acctd_flag => l_calculate_acctd_flag
80916: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
81126:
81127: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
81128: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
81129: AND (l_actual_flag = 'A')) THEN
81130: XLA_AE_LINES_PKG.CreateGainOrLossLines(
81131: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
81132: ,p_application_id => p_application_id
81133: ,p_amb_context_code => 'DEFAULT'
81134: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
81159: END IF;
81160: END IF;
81161:
81162: END LOOP;
81163: l_result := XLA_AE_LINES_PKG.InsertLines ;
81164: end loop;
81165: close line_cur;
81166:
81167:
81652: l_first_event_id NUMBER;
81653: l_last_event_id NUMBER;
81654:
81655: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
81656: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
81657: --
81658: --
81659: l_result BOOLEAN := TRUE;
81660: l_rows NUMBER := 1000;
81921: EXIT WHEN l_array_entity_id.COUNT = 0;
81922:
81923: -- initialize arrays
81924: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
81925: XLA_AE_LINES_PKG.g_rec_lines := NULL;
81926:
81927: --
81928: -- Bug 4458708
81929: --
81926:
81927: --
81928: -- Bug 4458708
81929: --
81930: XLA_AE_LINES_PKG.g_LineNumber := 0;
81931:
81932:
81933: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
81934: g_last_hdr_idx := l_array_event_id.LAST;
82053: --
82054: -- following sets the accounting attributes needed to reverse
82055: -- accounting for a distributeion
82056: --
82057: xla_ae_lines_pkg.SetTrxReversalAttrs
82058: (p_event_id => l_event_id
82059: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
82060: ,p_trx_reversal_source => l_trx_reversal_source);
82061:
82085: --
82086: -- insert dummy rows into lines gt table that were created due to
82087: -- transaction reversals
82088: --
82089: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
82090: l_result := XLA_AE_LINES_PKG.InsertLines;
82091: END IF;
82092:
82093: --
82086: -- insert dummy rows into lines gt table that were created due to
82087: -- transaction reversals
82088: --
82089: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
82090: l_result := XLA_AE_LINES_PKG.InsertLines;
82091: END IF;
82092:
82093: --
82094: -- reset the temp_line_num for each set of events fetched from header
82094: -- reset the temp_line_num for each set of events fetched from header
82095: -- cursor rather than doing it for each new event in line cursor
82096: -- Bug 3939231
82097: --
82098: xla_ae_lines_pkg.g_temp_line_num := 0;
82099:
82100:
82101:
82102: --
82171: END IF;
82172: --
82173: EXIT WHEN l_array_entity_id.count = 0;
82174:
82175: XLA_AE_LINES_PKG.g_rec_lines := null;
82176:
82177: --
82178: -- Bug 4458708
82179: --
82176:
82177: --
82178: -- Bug 4458708
82179: --
82180: XLA_AE_LINES_PKG.g_LineNumber := 0;
82181: --
82182: --
82183:
82184: FOR Idx IN 1..l_array_event_id.count LOOP
82248:
82249:
82250:
82251: --
82252: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
82253:
82254: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
82255:
82256: IF l_continue_with_lines THEN
82332: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
82333: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
82334:
82335:
82336: xla_ae_lines_pkg.SetAcctReversalAttrs
82337: (p_event_id => l_event_id
82338: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
82339: ,p_calculate_acctd_flag => l_calculate_acctd_flag
82340: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
82498:
82499: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
82500: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
82501: AND (l_actual_flag = 'A')) THEN
82502: XLA_AE_LINES_PKG.CreateGainOrLossLines(
82503: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
82504: ,p_application_id => p_application_id
82505: ,p_amb_context_code => 'DEFAULT'
82506: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
82531: END IF;
82532: END IF;
82533:
82534: END LOOP;
82535: l_result := XLA_AE_LINES_PKG.InsertLines ;
82536: end loop;
82537: close line_cur;
82538:
82539:
83024: l_first_event_id NUMBER;
83025: l_last_event_id NUMBER;
83026:
83027: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
83028: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
83029: --
83030: --
83031: l_result BOOLEAN := TRUE;
83032: l_rows NUMBER := 1000;
83293: EXIT WHEN l_array_entity_id.COUNT = 0;
83294:
83295: -- initialize arrays
83296: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
83297: XLA_AE_LINES_PKG.g_rec_lines := NULL;
83298:
83299: --
83300: -- Bug 4458708
83301: --
83298:
83299: --
83300: -- Bug 4458708
83301: --
83302: XLA_AE_LINES_PKG.g_LineNumber := 0;
83303:
83304:
83305: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
83306: g_last_hdr_idx := l_array_event_id.LAST;
83425: --
83426: -- following sets the accounting attributes needed to reverse
83427: -- accounting for a distributeion
83428: --
83429: xla_ae_lines_pkg.SetTrxReversalAttrs
83430: (p_event_id => l_event_id
83431: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
83432: ,p_trx_reversal_source => l_trx_reversal_source);
83433:
83457: --
83458: -- insert dummy rows into lines gt table that were created due to
83459: -- transaction reversals
83460: --
83461: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
83462: l_result := XLA_AE_LINES_PKG.InsertLines;
83463: END IF;
83464:
83465: --
83458: -- insert dummy rows into lines gt table that were created due to
83459: -- transaction reversals
83460: --
83461: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
83462: l_result := XLA_AE_LINES_PKG.InsertLines;
83463: END IF;
83464:
83465: --
83466: -- reset the temp_line_num for each set of events fetched from header
83466: -- reset the temp_line_num for each set of events fetched from header
83467: -- cursor rather than doing it for each new event in line cursor
83468: -- Bug 3939231
83469: --
83470: xla_ae_lines_pkg.g_temp_line_num := 0;
83471:
83472:
83473:
83474: --
83543: END IF;
83544: --
83545: EXIT WHEN l_array_entity_id.count = 0;
83546:
83547: XLA_AE_LINES_PKG.g_rec_lines := null;
83548:
83549: --
83550: -- Bug 4458708
83551: --
83548:
83549: --
83550: -- Bug 4458708
83551: --
83552: XLA_AE_LINES_PKG.g_LineNumber := 0;
83553: --
83554: --
83555:
83556: FOR Idx IN 1..l_array_event_id.count LOOP
83620:
83621:
83622:
83623: --
83624: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
83625:
83626: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
83627:
83628: IF l_continue_with_lines THEN
83704: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
83705: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
83706:
83707:
83708: xla_ae_lines_pkg.SetAcctReversalAttrs
83709: (p_event_id => l_event_id
83710: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
83711: ,p_calculate_acctd_flag => l_calculate_acctd_flag
83712: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
83870:
83871: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
83872: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
83873: AND (l_actual_flag = 'A')) THEN
83874: XLA_AE_LINES_PKG.CreateGainOrLossLines(
83875: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
83876: ,p_application_id => p_application_id
83877: ,p_amb_context_code => 'DEFAULT'
83878: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
83903: END IF;
83904: END IF;
83905:
83906: END LOOP;
83907: l_result := XLA_AE_LINES_PKG.InsertLines ;
83908: end loop;
83909: close line_cur;
83910:
83911:
84396: l_first_event_id NUMBER;
84397: l_last_event_id NUMBER;
84398:
84399: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
84400: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
84401: --
84402: --
84403: l_result BOOLEAN := TRUE;
84404: l_rows NUMBER := 1000;
84665: EXIT WHEN l_array_entity_id.COUNT = 0;
84666:
84667: -- initialize arrays
84668: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
84669: XLA_AE_LINES_PKG.g_rec_lines := NULL;
84670:
84671: --
84672: -- Bug 4458708
84673: --
84670:
84671: --
84672: -- Bug 4458708
84673: --
84674: XLA_AE_LINES_PKG.g_LineNumber := 0;
84675:
84676:
84677: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
84678: g_last_hdr_idx := l_array_event_id.LAST;
84797: --
84798: -- following sets the accounting attributes needed to reverse
84799: -- accounting for a distributeion
84800: --
84801: xla_ae_lines_pkg.SetTrxReversalAttrs
84802: (p_event_id => l_event_id
84803: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
84804: ,p_trx_reversal_source => l_trx_reversal_source);
84805:
84829: --
84830: -- insert dummy rows into lines gt table that were created due to
84831: -- transaction reversals
84832: --
84833: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
84834: l_result := XLA_AE_LINES_PKG.InsertLines;
84835: END IF;
84836:
84837: --
84830: -- insert dummy rows into lines gt table that were created due to
84831: -- transaction reversals
84832: --
84833: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
84834: l_result := XLA_AE_LINES_PKG.InsertLines;
84835: END IF;
84836:
84837: --
84838: -- reset the temp_line_num for each set of events fetched from header
84838: -- reset the temp_line_num for each set of events fetched from header
84839: -- cursor rather than doing it for each new event in line cursor
84840: -- Bug 3939231
84841: --
84842: xla_ae_lines_pkg.g_temp_line_num := 0;
84843:
84844:
84845:
84846: --
84915: END IF;
84916: --
84917: EXIT WHEN l_array_entity_id.count = 0;
84918:
84919: XLA_AE_LINES_PKG.g_rec_lines := null;
84920:
84921: --
84922: -- Bug 4458708
84923: --
84920:
84921: --
84922: -- Bug 4458708
84923: --
84924: XLA_AE_LINES_PKG.g_LineNumber := 0;
84925: --
84926: --
84927:
84928: FOR Idx IN 1..l_array_event_id.count LOOP
84992:
84993:
84994:
84995: --
84996: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
84997:
84998: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
84999:
85000: IF l_continue_with_lines THEN
85076: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
85077: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
85078:
85079:
85080: xla_ae_lines_pkg.SetAcctReversalAttrs
85081: (p_event_id => l_event_id
85082: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
85083: ,p_calculate_acctd_flag => l_calculate_acctd_flag
85084: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
85242:
85243: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
85244: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
85245: AND (l_actual_flag = 'A')) THEN
85246: XLA_AE_LINES_PKG.CreateGainOrLossLines(
85247: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
85248: ,p_application_id => p_application_id
85249: ,p_amb_context_code => 'DEFAULT'
85250: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
85275: END IF;
85276: END IF;
85277:
85278: END LOOP;
85279: l_result := XLA_AE_LINES_PKG.InsertLines ;
85280: end loop;
85281: close line_cur;
85282:
85283:
85768: l_first_event_id NUMBER;
85769: l_last_event_id NUMBER;
85770:
85771: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
85772: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
85773: --
85774: --
85775: l_result BOOLEAN := TRUE;
85776: l_rows NUMBER := 1000;
86037: EXIT WHEN l_array_entity_id.COUNT = 0;
86038:
86039: -- initialize arrays
86040: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
86041: XLA_AE_LINES_PKG.g_rec_lines := NULL;
86042:
86043: --
86044: -- Bug 4458708
86045: --
86042:
86043: --
86044: -- Bug 4458708
86045: --
86046: XLA_AE_LINES_PKG.g_LineNumber := 0;
86047:
86048:
86049: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
86050: g_last_hdr_idx := l_array_event_id.LAST;
86169: --
86170: -- following sets the accounting attributes needed to reverse
86171: -- accounting for a distributeion
86172: --
86173: xla_ae_lines_pkg.SetTrxReversalAttrs
86174: (p_event_id => l_event_id
86175: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
86176: ,p_trx_reversal_source => l_trx_reversal_source);
86177:
86201: --
86202: -- insert dummy rows into lines gt table that were created due to
86203: -- transaction reversals
86204: --
86205: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
86206: l_result := XLA_AE_LINES_PKG.InsertLines;
86207: END IF;
86208:
86209: --
86202: -- insert dummy rows into lines gt table that were created due to
86203: -- transaction reversals
86204: --
86205: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
86206: l_result := XLA_AE_LINES_PKG.InsertLines;
86207: END IF;
86208:
86209: --
86210: -- reset the temp_line_num for each set of events fetched from header
86210: -- reset the temp_line_num for each set of events fetched from header
86211: -- cursor rather than doing it for each new event in line cursor
86212: -- Bug 3939231
86213: --
86214: xla_ae_lines_pkg.g_temp_line_num := 0;
86215:
86216:
86217:
86218: --
86287: END IF;
86288: --
86289: EXIT WHEN l_array_entity_id.count = 0;
86290:
86291: XLA_AE_LINES_PKG.g_rec_lines := null;
86292:
86293: --
86294: -- Bug 4458708
86295: --
86292:
86293: --
86294: -- Bug 4458708
86295: --
86296: XLA_AE_LINES_PKG.g_LineNumber := 0;
86297: --
86298: --
86299:
86300: FOR Idx IN 1..l_array_event_id.count LOOP
86364:
86365:
86366:
86367: --
86368: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
86369:
86370: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
86371:
86372: IF l_continue_with_lines THEN
86448: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
86449: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
86450:
86451:
86452: xla_ae_lines_pkg.SetAcctReversalAttrs
86453: (p_event_id => l_event_id
86454: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
86455: ,p_calculate_acctd_flag => l_calculate_acctd_flag
86456: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
86614:
86615: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
86616: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
86617: AND (l_actual_flag = 'A')) THEN
86618: XLA_AE_LINES_PKG.CreateGainOrLossLines(
86619: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
86620: ,p_application_id => p_application_id
86621: ,p_amb_context_code => 'DEFAULT'
86622: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
86647: END IF;
86648: END IF;
86649:
86650: END LOOP;
86651: l_result := XLA_AE_LINES_PKG.InsertLines ;
86652: end loop;
86653: close line_cur;
86654:
86655:
87140: l_first_event_id NUMBER;
87141: l_last_event_id NUMBER;
87142:
87143: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
87144: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
87145: --
87146: --
87147: l_result BOOLEAN := TRUE;
87148: l_rows NUMBER := 1000;
87409: EXIT WHEN l_array_entity_id.COUNT = 0;
87410:
87411: -- initialize arrays
87412: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
87413: XLA_AE_LINES_PKG.g_rec_lines := NULL;
87414:
87415: --
87416: -- Bug 4458708
87417: --
87414:
87415: --
87416: -- Bug 4458708
87417: --
87418: XLA_AE_LINES_PKG.g_LineNumber := 0;
87419:
87420:
87421: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
87422: g_last_hdr_idx := l_array_event_id.LAST;
87541: --
87542: -- following sets the accounting attributes needed to reverse
87543: -- accounting for a distributeion
87544: --
87545: xla_ae_lines_pkg.SetTrxReversalAttrs
87546: (p_event_id => l_event_id
87547: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
87548: ,p_trx_reversal_source => l_trx_reversal_source);
87549:
87573: --
87574: -- insert dummy rows into lines gt table that were created due to
87575: -- transaction reversals
87576: --
87577: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
87578: l_result := XLA_AE_LINES_PKG.InsertLines;
87579: END IF;
87580:
87581: --
87574: -- insert dummy rows into lines gt table that were created due to
87575: -- transaction reversals
87576: --
87577: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
87578: l_result := XLA_AE_LINES_PKG.InsertLines;
87579: END IF;
87580:
87581: --
87582: -- reset the temp_line_num for each set of events fetched from header
87582: -- reset the temp_line_num for each set of events fetched from header
87583: -- cursor rather than doing it for each new event in line cursor
87584: -- Bug 3939231
87585: --
87586: xla_ae_lines_pkg.g_temp_line_num := 0;
87587:
87588:
87589:
87590: --
87659: END IF;
87660: --
87661: EXIT WHEN l_array_entity_id.count = 0;
87662:
87663: XLA_AE_LINES_PKG.g_rec_lines := null;
87664:
87665: --
87666: -- Bug 4458708
87667: --
87664:
87665: --
87666: -- Bug 4458708
87667: --
87668: XLA_AE_LINES_PKG.g_LineNumber := 0;
87669: --
87670: --
87671:
87672: FOR Idx IN 1..l_array_event_id.count LOOP
87736:
87737:
87738:
87739: --
87740: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
87741:
87742: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
87743:
87744: IF l_continue_with_lines THEN
87820: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
87821: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
87822:
87823:
87824: xla_ae_lines_pkg.SetAcctReversalAttrs
87825: (p_event_id => l_event_id
87826: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
87827: ,p_calculate_acctd_flag => l_calculate_acctd_flag
87828: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
87986:
87987: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
87988: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
87989: AND (l_actual_flag = 'A')) THEN
87990: XLA_AE_LINES_PKG.CreateGainOrLossLines(
87991: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
87992: ,p_application_id => p_application_id
87993: ,p_amb_context_code => 'DEFAULT'
87994: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
88019: END IF;
88020: END IF;
88021:
88022: END LOOP;
88023: l_result := XLA_AE_LINES_PKG.InsertLines ;
88024: end loop;
88025: close line_cur;
88026:
88027:
88512: l_first_event_id NUMBER;
88513: l_last_event_id NUMBER;
88514:
88515: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
88516: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
88517: --
88518: --
88519: l_result BOOLEAN := TRUE;
88520: l_rows NUMBER := 1000;
88781: EXIT WHEN l_array_entity_id.COUNT = 0;
88782:
88783: -- initialize arrays
88784: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
88785: XLA_AE_LINES_PKG.g_rec_lines := NULL;
88786:
88787: --
88788: -- Bug 4458708
88789: --
88786:
88787: --
88788: -- Bug 4458708
88789: --
88790: XLA_AE_LINES_PKG.g_LineNumber := 0;
88791:
88792:
88793: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
88794: g_last_hdr_idx := l_array_event_id.LAST;
88913: --
88914: -- following sets the accounting attributes needed to reverse
88915: -- accounting for a distributeion
88916: --
88917: xla_ae_lines_pkg.SetTrxReversalAttrs
88918: (p_event_id => l_event_id
88919: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
88920: ,p_trx_reversal_source => l_trx_reversal_source);
88921:
88945: --
88946: -- insert dummy rows into lines gt table that were created due to
88947: -- transaction reversals
88948: --
88949: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
88950: l_result := XLA_AE_LINES_PKG.InsertLines;
88951: END IF;
88952:
88953: --
88946: -- insert dummy rows into lines gt table that were created due to
88947: -- transaction reversals
88948: --
88949: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
88950: l_result := XLA_AE_LINES_PKG.InsertLines;
88951: END IF;
88952:
88953: --
88954: -- reset the temp_line_num for each set of events fetched from header
88954: -- reset the temp_line_num for each set of events fetched from header
88955: -- cursor rather than doing it for each new event in line cursor
88956: -- Bug 3939231
88957: --
88958: xla_ae_lines_pkg.g_temp_line_num := 0;
88959:
88960:
88961:
88962: --
89031: END IF;
89032: --
89033: EXIT WHEN l_array_entity_id.count = 0;
89034:
89035: XLA_AE_LINES_PKG.g_rec_lines := null;
89036:
89037: --
89038: -- Bug 4458708
89039: --
89036:
89037: --
89038: -- Bug 4458708
89039: --
89040: XLA_AE_LINES_PKG.g_LineNumber := 0;
89041: --
89042: --
89043:
89044: FOR Idx IN 1..l_array_event_id.count LOOP
89108:
89109:
89110:
89111: --
89112: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
89113:
89114: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
89115:
89116: IF l_continue_with_lines THEN
89192: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
89193: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
89194:
89195:
89196: xla_ae_lines_pkg.SetAcctReversalAttrs
89197: (p_event_id => l_event_id
89198: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
89199: ,p_calculate_acctd_flag => l_calculate_acctd_flag
89200: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
89358:
89359: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
89360: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
89361: AND (l_actual_flag = 'A')) THEN
89362: XLA_AE_LINES_PKG.CreateGainOrLossLines(
89363: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
89364: ,p_application_id => p_application_id
89365: ,p_amb_context_code => 'DEFAULT'
89366: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
89391: END IF;
89392: END IF;
89393:
89394: END LOOP;
89395: l_result := XLA_AE_LINES_PKG.InsertLines ;
89396: end loop;
89397: close line_cur;
89398:
89399:
89884: l_first_event_id NUMBER;
89885: l_last_event_id NUMBER;
89886:
89887: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
89888: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
89889: --
89890: --
89891: l_result BOOLEAN := TRUE;
89892: l_rows NUMBER := 1000;
90153: EXIT WHEN l_array_entity_id.COUNT = 0;
90154:
90155: -- initialize arrays
90156: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
90157: XLA_AE_LINES_PKG.g_rec_lines := NULL;
90158:
90159: --
90160: -- Bug 4458708
90161: --
90158:
90159: --
90160: -- Bug 4458708
90161: --
90162: XLA_AE_LINES_PKG.g_LineNumber := 0;
90163:
90164:
90165: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
90166: g_last_hdr_idx := l_array_event_id.LAST;
90285: --
90286: -- following sets the accounting attributes needed to reverse
90287: -- accounting for a distributeion
90288: --
90289: xla_ae_lines_pkg.SetTrxReversalAttrs
90290: (p_event_id => l_event_id
90291: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
90292: ,p_trx_reversal_source => l_trx_reversal_source);
90293:
90317: --
90318: -- insert dummy rows into lines gt table that were created due to
90319: -- transaction reversals
90320: --
90321: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
90322: l_result := XLA_AE_LINES_PKG.InsertLines;
90323: END IF;
90324:
90325: --
90318: -- insert dummy rows into lines gt table that were created due to
90319: -- transaction reversals
90320: --
90321: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
90322: l_result := XLA_AE_LINES_PKG.InsertLines;
90323: END IF;
90324:
90325: --
90326: -- reset the temp_line_num for each set of events fetched from header
90326: -- reset the temp_line_num for each set of events fetched from header
90327: -- cursor rather than doing it for each new event in line cursor
90328: -- Bug 3939231
90329: --
90330: xla_ae_lines_pkg.g_temp_line_num := 0;
90331:
90332:
90333:
90334: --
90403: END IF;
90404: --
90405: EXIT WHEN l_array_entity_id.count = 0;
90406:
90407: XLA_AE_LINES_PKG.g_rec_lines := null;
90408:
90409: --
90410: -- Bug 4458708
90411: --
90408:
90409: --
90410: -- Bug 4458708
90411: --
90412: XLA_AE_LINES_PKG.g_LineNumber := 0;
90413: --
90414: --
90415:
90416: FOR Idx IN 1..l_array_event_id.count LOOP
90480:
90481:
90482:
90483: --
90484: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
90485:
90486: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
90487:
90488: IF l_continue_with_lines THEN
90564: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
90565: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
90566:
90567:
90568: xla_ae_lines_pkg.SetAcctReversalAttrs
90569: (p_event_id => l_event_id
90570: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
90571: ,p_calculate_acctd_flag => l_calculate_acctd_flag
90572: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
90656:
90657: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
90658: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
90659: AND (l_actual_flag = 'A')) THEN
90660: XLA_AE_LINES_PKG.CreateGainOrLossLines(
90661: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
90662: ,p_application_id => p_application_id
90663: ,p_amb_context_code => 'DEFAULT'
90664: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
90689: END IF;
90690: END IF;
90691:
90692: END LOOP;
90693: l_result := XLA_AE_LINES_PKG.InsertLines ;
90694: end loop;
90695: close line_cur;
90696:
90697:
91182: l_first_event_id NUMBER;
91183: l_last_event_id NUMBER;
91184:
91185: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
91186: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
91187: --
91188: --
91189: l_result BOOLEAN := TRUE;
91190: l_rows NUMBER := 1000;
91451: EXIT WHEN l_array_entity_id.COUNT = 0;
91452:
91453: -- initialize arrays
91454: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
91455: XLA_AE_LINES_PKG.g_rec_lines := NULL;
91456:
91457: --
91458: -- Bug 4458708
91459: --
91456:
91457: --
91458: -- Bug 4458708
91459: --
91460: XLA_AE_LINES_PKG.g_LineNumber := 0;
91461:
91462:
91463: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
91464: g_last_hdr_idx := l_array_event_id.LAST;
91583: --
91584: -- following sets the accounting attributes needed to reverse
91585: -- accounting for a distributeion
91586: --
91587: xla_ae_lines_pkg.SetTrxReversalAttrs
91588: (p_event_id => l_event_id
91589: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
91590: ,p_trx_reversal_source => l_trx_reversal_source);
91591:
91615: --
91616: -- insert dummy rows into lines gt table that were created due to
91617: -- transaction reversals
91618: --
91619: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
91620: l_result := XLA_AE_LINES_PKG.InsertLines;
91621: END IF;
91622:
91623: --
91616: -- insert dummy rows into lines gt table that were created due to
91617: -- transaction reversals
91618: --
91619: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
91620: l_result := XLA_AE_LINES_PKG.InsertLines;
91621: END IF;
91622:
91623: --
91624: -- reset the temp_line_num for each set of events fetched from header
91624: -- reset the temp_line_num for each set of events fetched from header
91625: -- cursor rather than doing it for each new event in line cursor
91626: -- Bug 3939231
91627: --
91628: xla_ae_lines_pkg.g_temp_line_num := 0;
91629:
91630:
91631:
91632: --
91701: END IF;
91702: --
91703: EXIT WHEN l_array_entity_id.count = 0;
91704:
91705: XLA_AE_LINES_PKG.g_rec_lines := null;
91706:
91707: --
91708: -- Bug 4458708
91709: --
91706:
91707: --
91708: -- Bug 4458708
91709: --
91710: XLA_AE_LINES_PKG.g_LineNumber := 0;
91711: --
91712: --
91713:
91714: FOR Idx IN 1..l_array_event_id.count LOOP
91778:
91779:
91780:
91781: --
91782: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
91783:
91784: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
91785:
91786: IF l_continue_with_lines THEN
91862: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
91863: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
91864:
91865:
91866: xla_ae_lines_pkg.SetAcctReversalAttrs
91867: (p_event_id => l_event_id
91868: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
91869: ,p_calculate_acctd_flag => l_calculate_acctd_flag
91870: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
91954:
91955: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
91956: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
91957: AND (l_actual_flag = 'A')) THEN
91958: XLA_AE_LINES_PKG.CreateGainOrLossLines(
91959: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
91960: ,p_application_id => p_application_id
91961: ,p_amb_context_code => 'DEFAULT'
91962: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
91987: END IF;
91988: END IF;
91989:
91990: END LOOP;
91991: l_result := XLA_AE_LINES_PKG.InsertLines ;
91992: end loop;
91993: close line_cur;
91994:
91995:
92534: l_first_event_id NUMBER;
92535: l_last_event_id NUMBER;
92536:
92537: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
92538: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
92539: --
92540: --
92541: l_result BOOLEAN := TRUE;
92542: l_rows NUMBER := 1000;
92837: EXIT WHEN l_array_entity_id.COUNT = 0;
92838:
92839: -- initialize arrays
92840: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
92841: XLA_AE_LINES_PKG.g_rec_lines := NULL;
92842:
92843: --
92844: -- Bug 4458708
92845: --
92842:
92843: --
92844: -- Bug 4458708
92845: --
92846: XLA_AE_LINES_PKG.g_LineNumber := 0;
92847:
92848:
92849: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
92850: g_last_hdr_idx := l_array_event_id.LAST;
92972: --
92973: -- following sets the accounting attributes needed to reverse
92974: -- accounting for a distributeion
92975: --
92976: xla_ae_lines_pkg.SetTrxReversalAttrs
92977: (p_event_id => l_event_id
92978: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
92979: ,p_trx_reversal_source => l_trx_reversal_source);
92980:
93004: --
93005: -- insert dummy rows into lines gt table that were created due to
93006: -- transaction reversals
93007: --
93008: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
93009: l_result := XLA_AE_LINES_PKG.InsertLines;
93010: END IF;
93011:
93012: --
93005: -- insert dummy rows into lines gt table that were created due to
93006: -- transaction reversals
93007: --
93008: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
93009: l_result := XLA_AE_LINES_PKG.InsertLines;
93010: END IF;
93011:
93012: --
93013: -- reset the temp_line_num for each set of events fetched from header
93013: -- reset the temp_line_num for each set of events fetched from header
93014: -- cursor rather than doing it for each new event in line cursor
93015: -- Bug 3939231
93016: --
93017: xla_ae_lines_pkg.g_temp_line_num := 0;
93018:
93019:
93020:
93021: --
93097: END IF;
93098: --
93099: EXIT WHEN l_array_entity_id.count = 0;
93100:
93101: XLA_AE_LINES_PKG.g_rec_lines := null;
93102:
93103: --
93104: -- Bug 4458708
93105: --
93102:
93103: --
93104: -- Bug 4458708
93105: --
93106: XLA_AE_LINES_PKG.g_LineNumber := 0;
93107: --
93108: --
93109:
93110: FOR Idx IN 1..l_array_event_id.count LOOP
93174:
93175:
93176:
93177: --
93178: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
93179:
93180: l_acct_reversal_source := SUBSTR(NULL, 1,30);
93181:
93182: IF l_continue_with_lines THEN
93210: --
93211:
93212: -- No reversal code generated
93213:
93214: xla_ae_lines_pkg.SetAcctReversalAttrs
93215: (p_event_id => l_event_id
93216: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
93217: ,p_calculate_acctd_flag => l_calculate_acctd_flag
93218: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
93723:
93724: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
93725: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
93726: AND (l_actual_flag = 'A')) THEN
93727: XLA_AE_LINES_PKG.CreateGainOrLossLines(
93728: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
93729: ,p_application_id => p_application_id
93730: ,p_amb_context_code => 'DEFAULT'
93731: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
93756: END IF;
93757: END IF;
93758:
93759: END LOOP;
93760: l_result := XLA_AE_LINES_PKG.InsertLines ;
93761: end loop;
93762: close line_cur;
93763:
93764:
94263: l_first_event_id NUMBER;
94264: l_last_event_id NUMBER;
94265:
94266: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
94267: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
94268: --
94269: --
94270: l_result BOOLEAN := TRUE;
94271: l_rows NUMBER := 1000;
94542: EXIT WHEN l_array_entity_id.COUNT = 0;
94543:
94544: -- initialize arrays
94545: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
94546: XLA_AE_LINES_PKG.g_rec_lines := NULL;
94547:
94548: --
94549: -- Bug 4458708
94550: --
94547:
94548: --
94549: -- Bug 4458708
94550: --
94551: XLA_AE_LINES_PKG.g_LineNumber := 0;
94552:
94553:
94554: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
94555: g_last_hdr_idx := l_array_event_id.LAST;
94677: --
94678: -- following sets the accounting attributes needed to reverse
94679: -- accounting for a distributeion
94680: --
94681: xla_ae_lines_pkg.SetTrxReversalAttrs
94682: (p_event_id => l_event_id
94683: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
94684: ,p_trx_reversal_source => l_trx_reversal_source);
94685:
94709: --
94710: -- insert dummy rows into lines gt table that were created due to
94711: -- transaction reversals
94712: --
94713: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
94714: l_result := XLA_AE_LINES_PKG.InsertLines;
94715: END IF;
94716:
94717: --
94710: -- insert dummy rows into lines gt table that were created due to
94711: -- transaction reversals
94712: --
94713: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
94714: l_result := XLA_AE_LINES_PKG.InsertLines;
94715: END IF;
94716:
94717: --
94718: -- reset the temp_line_num for each set of events fetched from header
94718: -- reset the temp_line_num for each set of events fetched from header
94719: -- cursor rather than doing it for each new event in line cursor
94720: -- Bug 3939231
94721: --
94722: xla_ae_lines_pkg.g_temp_line_num := 0;
94723:
94724:
94725:
94726: --
94794: END IF;
94795: --
94796: EXIT WHEN l_array_entity_id.count = 0;
94797:
94798: XLA_AE_LINES_PKG.g_rec_lines := null;
94799:
94800: --
94801: -- Bug 4458708
94802: --
94799:
94800: --
94801: -- Bug 4458708
94802: --
94803: XLA_AE_LINES_PKG.g_LineNumber := 0;
94804: --
94805: --
94806:
94807: FOR Idx IN 1..l_array_event_id.count LOOP
94871:
94872:
94873:
94874: --
94875: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
94876:
94877: l_acct_reversal_source := SUBSTR(NULL, 1,30);
94878:
94879: IF l_continue_with_lines THEN
94907: --
94908:
94909: -- No reversal code generated
94910:
94911: xla_ae_lines_pkg.SetAcctReversalAttrs
94912: (p_event_id => l_event_id
94913: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
94914: ,p_calculate_acctd_flag => l_calculate_acctd_flag
94915: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
95496:
95497: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
95498: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
95499: AND (l_actual_flag = 'A')) THEN
95500: XLA_AE_LINES_PKG.CreateGainOrLossLines(
95501: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
95502: ,p_application_id => p_application_id
95503: ,p_amb_context_code => 'DEFAULT'
95504: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
95529: END IF;
95530: END IF;
95531:
95532: END LOOP;
95533: l_result := XLA_AE_LINES_PKG.InsertLines ;
95534: end loop;
95535: close line_cur;
95536:
95537:
96042: l_first_event_id NUMBER;
96043: l_last_event_id NUMBER;
96044:
96045: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
96046: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
96047: --
96048: --
96049: l_result BOOLEAN := TRUE;
96050: l_rows NUMBER := 1000;
96320: EXIT WHEN l_array_entity_id.COUNT = 0;
96321:
96322: -- initialize arrays
96323: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
96324: XLA_AE_LINES_PKG.g_rec_lines := NULL;
96325:
96326: --
96327: -- Bug 4458708
96328: --
96325:
96326: --
96327: -- Bug 4458708
96328: --
96329: XLA_AE_LINES_PKG.g_LineNumber := 0;
96330:
96331:
96332: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
96333: g_last_hdr_idx := l_array_event_id.LAST;
96454: --
96455: -- following sets the accounting attributes needed to reverse
96456: -- accounting for a distributeion
96457: --
96458: xla_ae_lines_pkg.SetTrxReversalAttrs
96459: (p_event_id => l_event_id
96460: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
96461: ,p_trx_reversal_source => l_trx_reversal_source);
96462:
96486: --
96487: -- insert dummy rows into lines gt table that were created due to
96488: -- transaction reversals
96489: --
96490: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
96491: l_result := XLA_AE_LINES_PKG.InsertLines;
96492: END IF;
96493:
96494: --
96487: -- insert dummy rows into lines gt table that were created due to
96488: -- transaction reversals
96489: --
96490: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
96491: l_result := XLA_AE_LINES_PKG.InsertLines;
96492: END IF;
96493:
96494: --
96495: -- reset the temp_line_num for each set of events fetched from header
96495: -- reset the temp_line_num for each set of events fetched from header
96496: -- cursor rather than doing it for each new event in line cursor
96497: -- Bug 3939231
96498: --
96499: xla_ae_lines_pkg.g_temp_line_num := 0;
96500:
96501:
96502:
96503: --
96572: END IF;
96573: --
96574: EXIT WHEN l_array_entity_id.count = 0;
96575:
96576: XLA_AE_LINES_PKG.g_rec_lines := null;
96577:
96578: --
96579: -- Bug 4458708
96580: --
96577:
96578: --
96579: -- Bug 4458708
96580: --
96581: XLA_AE_LINES_PKG.g_LineNumber := 0;
96582: --
96583: --
96584:
96585: FOR Idx IN 1..l_array_event_id.count LOOP
96649:
96650:
96651:
96652: --
96653: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
96654:
96655: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
96656:
96657: IF l_continue_with_lines THEN
96733: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
96734: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
96735:
96736:
96737: xla_ae_lines_pkg.SetAcctReversalAttrs
96738: (p_event_id => l_event_id
96739: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
96740: ,p_calculate_acctd_flag => l_calculate_acctd_flag
96741: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
97057:
97058: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
97059: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
97060: AND (l_actual_flag = 'A')) THEN
97061: XLA_AE_LINES_PKG.CreateGainOrLossLines(
97062: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
97063: ,p_application_id => p_application_id
97064: ,p_amb_context_code => 'DEFAULT'
97065: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
97090: END IF;
97091: END IF;
97092:
97093: END LOOP;
97094: l_result := XLA_AE_LINES_PKG.InsertLines ;
97095: end loop;
97096: close line_cur;
97097:
97098:
97603: l_first_event_id NUMBER;
97604: l_last_event_id NUMBER;
97605:
97606: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
97607: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
97608: --
97609: --
97610: l_result BOOLEAN := TRUE;
97611: l_rows NUMBER := 1000;
97881: EXIT WHEN l_array_entity_id.COUNT = 0;
97882:
97883: -- initialize arrays
97884: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
97885: XLA_AE_LINES_PKG.g_rec_lines := NULL;
97886:
97887: --
97888: -- Bug 4458708
97889: --
97886:
97887: --
97888: -- Bug 4458708
97889: --
97890: XLA_AE_LINES_PKG.g_LineNumber := 0;
97891:
97892:
97893: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
97894: g_last_hdr_idx := l_array_event_id.LAST;
98015: --
98016: -- following sets the accounting attributes needed to reverse
98017: -- accounting for a distributeion
98018: --
98019: xla_ae_lines_pkg.SetTrxReversalAttrs
98020: (p_event_id => l_event_id
98021: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
98022: ,p_trx_reversal_source => l_trx_reversal_source);
98023:
98047: --
98048: -- insert dummy rows into lines gt table that were created due to
98049: -- transaction reversals
98050: --
98051: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
98052: l_result := XLA_AE_LINES_PKG.InsertLines;
98053: END IF;
98054:
98055: --
98048: -- insert dummy rows into lines gt table that were created due to
98049: -- transaction reversals
98050: --
98051: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
98052: l_result := XLA_AE_LINES_PKG.InsertLines;
98053: END IF;
98054:
98055: --
98056: -- reset the temp_line_num for each set of events fetched from header
98056: -- reset the temp_line_num for each set of events fetched from header
98057: -- cursor rather than doing it for each new event in line cursor
98058: -- Bug 3939231
98059: --
98060: xla_ae_lines_pkg.g_temp_line_num := 0;
98061:
98062:
98063:
98064: --
98133: END IF;
98134: --
98135: EXIT WHEN l_array_entity_id.count = 0;
98136:
98137: XLA_AE_LINES_PKG.g_rec_lines := null;
98138:
98139: --
98140: -- Bug 4458708
98141: --
98138:
98139: --
98140: -- Bug 4458708
98141: --
98142: XLA_AE_LINES_PKG.g_LineNumber := 0;
98143: --
98144: --
98145:
98146: FOR Idx IN 1..l_array_event_id.count LOOP
98210:
98211:
98212:
98213: --
98214: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
98215:
98216: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
98217:
98218: IF l_continue_with_lines THEN
98294: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
98295: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
98296:
98297:
98298: xla_ae_lines_pkg.SetAcctReversalAttrs
98299: (p_event_id => l_event_id
98300: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
98301: ,p_calculate_acctd_flag => l_calculate_acctd_flag
98302: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
98618:
98619: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
98620: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
98621: AND (l_actual_flag = 'A')) THEN
98622: XLA_AE_LINES_PKG.CreateGainOrLossLines(
98623: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
98624: ,p_application_id => p_application_id
98625: ,p_amb_context_code => 'DEFAULT'
98626: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
98651: END IF;
98652: END IF;
98653:
98654: END LOOP;
98655: l_result := XLA_AE_LINES_PKG.InsertLines ;
98656: end loop;
98657: close line_cur;
98658:
98659:
99204: l_first_event_id NUMBER;
99205: l_last_event_id NUMBER;
99206:
99207: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
99208: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
99209: --
99210: --
99211: l_result BOOLEAN := TRUE;
99212: l_rows NUMBER := 1000;
99509: EXIT WHEN l_array_entity_id.COUNT = 0;
99510:
99511: -- initialize arrays
99512: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
99513: XLA_AE_LINES_PKG.g_rec_lines := NULL;
99514:
99515: --
99516: -- Bug 4458708
99517: --
99514:
99515: --
99516: -- Bug 4458708
99517: --
99518: XLA_AE_LINES_PKG.g_LineNumber := 0;
99519:
99520:
99521: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
99522: g_last_hdr_idx := l_array_event_id.LAST;
99641: --
99642: -- following sets the accounting attributes needed to reverse
99643: -- accounting for a distributeion
99644: --
99645: xla_ae_lines_pkg.SetTrxReversalAttrs
99646: (p_event_id => l_event_id
99647: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
99648: ,p_trx_reversal_source => l_trx_reversal_source);
99649:
99673: --
99674: -- insert dummy rows into lines gt table that were created due to
99675: -- transaction reversals
99676: --
99677: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
99678: l_result := XLA_AE_LINES_PKG.InsertLines;
99679: END IF;
99680:
99681: --
99674: -- insert dummy rows into lines gt table that were created due to
99675: -- transaction reversals
99676: --
99677: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
99678: l_result := XLA_AE_LINES_PKG.InsertLines;
99679: END IF;
99680:
99681: --
99682: -- reset the temp_line_num for each set of events fetched from header
99682: -- reset the temp_line_num for each set of events fetched from header
99683: -- cursor rather than doing it for each new event in line cursor
99684: -- Bug 3939231
99685: --
99686: xla_ae_lines_pkg.g_temp_line_num := 0;
99687:
99688:
99689:
99690: --
99771: END IF;
99772: --
99773: EXIT WHEN l_array_entity_id.count = 0;
99774:
99775: XLA_AE_LINES_PKG.g_rec_lines := null;
99776:
99777: --
99778: -- Bug 4458708
99779: --
99776:
99777: --
99778: -- Bug 4458708
99779: --
99780: XLA_AE_LINES_PKG.g_LineNumber := 0;
99781: --
99782: --
99783:
99784: FOR Idx IN 1..l_array_event_id.count LOOP
99848:
99849:
99850:
99851: --
99852: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
99853:
99854: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
99855:
99856: IF l_continue_with_lines THEN
99953: l_rec_rev_acct_attrs.array_acct_attr_code(33) := 'UPG_DR_ENC_TYPE_ID';
99954: l_rec_rev_acct_attrs.array_num_value(33) := l_array_source_63(Idx);
99955:
99956:
99957: xla_ae_lines_pkg.SetAcctReversalAttrs
99958: (p_event_id => l_event_id
99959: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
99960: ,p_calculate_acctd_flag => l_calculate_acctd_flag
99961: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
100167:
100168: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
100169: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
100170: AND (l_actual_flag = 'A')) THEN
100171: XLA_AE_LINES_PKG.CreateGainOrLossLines(
100172: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
100173: ,p_application_id => p_application_id
100174: ,p_amb_context_code => 'DEFAULT'
100175: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
100200: END IF;
100201: END IF;
100202:
100203: END LOOP;
100204: l_result := XLA_AE_LINES_PKG.InsertLines ;
100205: end loop;
100206: close line_cur;
100207:
100208:
100758: l_first_event_id NUMBER;
100759: l_last_event_id NUMBER;
100760:
100761: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
100762: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
100763: --
100764: --
100765: l_result BOOLEAN := TRUE;
100766: l_rows NUMBER := 1000;
101066: EXIT WHEN l_array_entity_id.COUNT = 0;
101067:
101068: -- initialize arrays
101069: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
101070: XLA_AE_LINES_PKG.g_rec_lines := NULL;
101071:
101072: --
101073: -- Bug 4458708
101074: --
101071:
101072: --
101073: -- Bug 4458708
101074: --
101075: XLA_AE_LINES_PKG.g_LineNumber := 0;
101076:
101077:
101078: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
101079: g_last_hdr_idx := l_array_event_id.LAST;
101198: --
101199: -- following sets the accounting attributes needed to reverse
101200: -- accounting for a distributeion
101201: --
101202: xla_ae_lines_pkg.SetTrxReversalAttrs
101203: (p_event_id => l_event_id
101204: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
101205: ,p_trx_reversal_source => l_trx_reversal_source);
101206:
101230: --
101231: -- insert dummy rows into lines gt table that were created due to
101232: -- transaction reversals
101233: --
101234: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
101235: l_result := XLA_AE_LINES_PKG.InsertLines;
101236: END IF;
101237:
101238: --
101231: -- insert dummy rows into lines gt table that were created due to
101232: -- transaction reversals
101233: --
101234: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
101235: l_result := XLA_AE_LINES_PKG.InsertLines;
101236: END IF;
101237:
101238: --
101239: -- reset the temp_line_num for each set of events fetched from header
101239: -- reset the temp_line_num for each set of events fetched from header
101240: -- cursor rather than doing it for each new event in line cursor
101241: -- Bug 3939231
101242: --
101243: xla_ae_lines_pkg.g_temp_line_num := 0;
101244:
101245:
101246:
101247: --
101329: END IF;
101330: --
101331: EXIT WHEN l_array_entity_id.count = 0;
101332:
101333: XLA_AE_LINES_PKG.g_rec_lines := null;
101334:
101335: --
101336: -- Bug 4458708
101337: --
101334:
101335: --
101336: -- Bug 4458708
101337: --
101338: XLA_AE_LINES_PKG.g_LineNumber := 0;
101339: --
101340: --
101341:
101342: FOR Idx IN 1..l_array_event_id.count LOOP
101406:
101407:
101408:
101409: --
101410: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
101411:
101412: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
101413:
101414: IF l_continue_with_lines THEN
101528: l_rec_rev_acct_attrs.array_acct_attr_code(39) := 'UPG_DR_ENC_TYPE_ID';
101529: l_rec_rev_acct_attrs.array_num_value(39) := l_array_source_63(Idx);
101530:
101531:
101532: xla_ae_lines_pkg.SetAcctReversalAttrs
101533: (p_event_id => l_event_id
101534: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
101535: ,p_calculate_acctd_flag => l_calculate_acctd_flag
101536: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
101746:
101747: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
101748: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
101749: AND (l_actual_flag = 'A')) THEN
101750: XLA_AE_LINES_PKG.CreateGainOrLossLines(
101751: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
101752: ,p_application_id => p_application_id
101753: ,p_amb_context_code => 'DEFAULT'
101754: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
101779: END IF;
101780: END IF;
101781:
101782: END LOOP;
101783: l_result := XLA_AE_LINES_PKG.InsertLines ;
101784: end loop;
101785: close line_cur;
101786:
101787:
102272: l_first_event_id NUMBER;
102273: l_last_event_id NUMBER;
102274:
102275: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
102276: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
102277: --
102278: --
102279: l_result BOOLEAN := TRUE;
102280: l_rows NUMBER := 1000;
102541: EXIT WHEN l_array_entity_id.COUNT = 0;
102542:
102543: -- initialize arrays
102544: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
102545: XLA_AE_LINES_PKG.g_rec_lines := NULL;
102546:
102547: --
102548: -- Bug 4458708
102549: --
102546:
102547: --
102548: -- Bug 4458708
102549: --
102550: XLA_AE_LINES_PKG.g_LineNumber := 0;
102551:
102552:
102553: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
102554: g_last_hdr_idx := l_array_event_id.LAST;
102673: --
102674: -- following sets the accounting attributes needed to reverse
102675: -- accounting for a distributeion
102676: --
102677: xla_ae_lines_pkg.SetTrxReversalAttrs
102678: (p_event_id => l_event_id
102679: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
102680: ,p_trx_reversal_source => l_trx_reversal_source);
102681:
102705: --
102706: -- insert dummy rows into lines gt table that were created due to
102707: -- transaction reversals
102708: --
102709: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
102710: l_result := XLA_AE_LINES_PKG.InsertLines;
102711: END IF;
102712:
102713: --
102706: -- insert dummy rows into lines gt table that were created due to
102707: -- transaction reversals
102708: --
102709: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
102710: l_result := XLA_AE_LINES_PKG.InsertLines;
102711: END IF;
102712:
102713: --
102714: -- reset the temp_line_num for each set of events fetched from header
102714: -- reset the temp_line_num for each set of events fetched from header
102715: -- cursor rather than doing it for each new event in line cursor
102716: -- Bug 3939231
102717: --
102718: xla_ae_lines_pkg.g_temp_line_num := 0;
102719:
102720:
102721:
102722: --
102791: END IF;
102792: --
102793: EXIT WHEN l_array_entity_id.count = 0;
102794:
102795: XLA_AE_LINES_PKG.g_rec_lines := null;
102796:
102797: --
102798: -- Bug 4458708
102799: --
102796:
102797: --
102798: -- Bug 4458708
102799: --
102800: XLA_AE_LINES_PKG.g_LineNumber := 0;
102801: --
102802: --
102803:
102804: FOR Idx IN 1..l_array_event_id.count LOOP
102868:
102869:
102870:
102871: --
102872: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
102873:
102874: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
102875:
102876: IF l_continue_with_lines THEN
102952: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
102953: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
102954:
102955:
102956: xla_ae_lines_pkg.SetAcctReversalAttrs
102957: (p_event_id => l_event_id
102958: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
102959: ,p_calculate_acctd_flag => l_calculate_acctd_flag
102960: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
103118:
103119: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
103120: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
103121: AND (l_actual_flag = 'A')) THEN
103122: XLA_AE_LINES_PKG.CreateGainOrLossLines(
103123: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
103124: ,p_application_id => p_application_id
103125: ,p_amb_context_code => 'DEFAULT'
103126: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
103151: END IF;
103152: END IF;
103153:
103154: END LOOP;
103155: l_result := XLA_AE_LINES_PKG.InsertLines ;
103156: end loop;
103157: close line_cur;
103158:
103159:
103644: l_first_event_id NUMBER;
103645: l_last_event_id NUMBER;
103646:
103647: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
103648: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
103649: --
103650: --
103651: l_result BOOLEAN := TRUE;
103652: l_rows NUMBER := 1000;
103913: EXIT WHEN l_array_entity_id.COUNT = 0;
103914:
103915: -- initialize arrays
103916: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
103917: XLA_AE_LINES_PKG.g_rec_lines := NULL;
103918:
103919: --
103920: -- Bug 4458708
103921: --
103918:
103919: --
103920: -- Bug 4458708
103921: --
103922: XLA_AE_LINES_PKG.g_LineNumber := 0;
103923:
103924:
103925: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
103926: g_last_hdr_idx := l_array_event_id.LAST;
104045: --
104046: -- following sets the accounting attributes needed to reverse
104047: -- accounting for a distributeion
104048: --
104049: xla_ae_lines_pkg.SetTrxReversalAttrs
104050: (p_event_id => l_event_id
104051: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
104052: ,p_trx_reversal_source => l_trx_reversal_source);
104053:
104077: --
104078: -- insert dummy rows into lines gt table that were created due to
104079: -- transaction reversals
104080: --
104081: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
104082: l_result := XLA_AE_LINES_PKG.InsertLines;
104083: END IF;
104084:
104085: --
104078: -- insert dummy rows into lines gt table that were created due to
104079: -- transaction reversals
104080: --
104081: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
104082: l_result := XLA_AE_LINES_PKG.InsertLines;
104083: END IF;
104084:
104085: --
104086: -- reset the temp_line_num for each set of events fetched from header
104086: -- reset the temp_line_num for each set of events fetched from header
104087: -- cursor rather than doing it for each new event in line cursor
104088: -- Bug 3939231
104089: --
104090: xla_ae_lines_pkg.g_temp_line_num := 0;
104091:
104092:
104093:
104094: --
104163: END IF;
104164: --
104165: EXIT WHEN l_array_entity_id.count = 0;
104166:
104167: XLA_AE_LINES_PKG.g_rec_lines := null;
104168:
104169: --
104170: -- Bug 4458708
104171: --
104168:
104169: --
104170: -- Bug 4458708
104171: --
104172: XLA_AE_LINES_PKG.g_LineNumber := 0;
104173: --
104174: --
104175:
104176: FOR Idx IN 1..l_array_event_id.count LOOP
104240:
104241:
104242:
104243: --
104244: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
104245:
104246: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
104247:
104248: IF l_continue_with_lines THEN
104324: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
104325: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
104326:
104327:
104328: xla_ae_lines_pkg.SetAcctReversalAttrs
104329: (p_event_id => l_event_id
104330: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
104331: ,p_calculate_acctd_flag => l_calculate_acctd_flag
104332: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
104490:
104491: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
104492: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
104493: AND (l_actual_flag = 'A')) THEN
104494: XLA_AE_LINES_PKG.CreateGainOrLossLines(
104495: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
104496: ,p_application_id => p_application_id
104497: ,p_amb_context_code => 'DEFAULT'
104498: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
104523: END IF;
104524: END IF;
104525:
104526: END LOOP;
104527: l_result := XLA_AE_LINES_PKG.InsertLines ;
104528: end loop;
104529: close line_cur;
104530:
104531:
105016: l_first_event_id NUMBER;
105017: l_last_event_id NUMBER;
105018:
105019: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
105020: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
105021: --
105022: --
105023: l_result BOOLEAN := TRUE;
105024: l_rows NUMBER := 1000;
105285: EXIT WHEN l_array_entity_id.COUNT = 0;
105286:
105287: -- initialize arrays
105288: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
105289: XLA_AE_LINES_PKG.g_rec_lines := NULL;
105290:
105291: --
105292: -- Bug 4458708
105293: --
105290:
105291: --
105292: -- Bug 4458708
105293: --
105294: XLA_AE_LINES_PKG.g_LineNumber := 0;
105295:
105296:
105297: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
105298: g_last_hdr_idx := l_array_event_id.LAST;
105417: --
105418: -- following sets the accounting attributes needed to reverse
105419: -- accounting for a distributeion
105420: --
105421: xla_ae_lines_pkg.SetTrxReversalAttrs
105422: (p_event_id => l_event_id
105423: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
105424: ,p_trx_reversal_source => l_trx_reversal_source);
105425:
105449: --
105450: -- insert dummy rows into lines gt table that were created due to
105451: -- transaction reversals
105452: --
105453: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
105454: l_result := XLA_AE_LINES_PKG.InsertLines;
105455: END IF;
105456:
105457: --
105450: -- insert dummy rows into lines gt table that were created due to
105451: -- transaction reversals
105452: --
105453: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
105454: l_result := XLA_AE_LINES_PKG.InsertLines;
105455: END IF;
105456:
105457: --
105458: -- reset the temp_line_num for each set of events fetched from header
105458: -- reset the temp_line_num for each set of events fetched from header
105459: -- cursor rather than doing it for each new event in line cursor
105460: -- Bug 3939231
105461: --
105462: xla_ae_lines_pkg.g_temp_line_num := 0;
105463:
105464:
105465:
105466: --
105535: END IF;
105536: --
105537: EXIT WHEN l_array_entity_id.count = 0;
105538:
105539: XLA_AE_LINES_PKG.g_rec_lines := null;
105540:
105541: --
105542: -- Bug 4458708
105543: --
105540:
105541: --
105542: -- Bug 4458708
105543: --
105544: XLA_AE_LINES_PKG.g_LineNumber := 0;
105545: --
105546: --
105547:
105548: FOR Idx IN 1..l_array_event_id.count LOOP
105612:
105613:
105614:
105615: --
105616: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
105617:
105618: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
105619:
105620: IF l_continue_with_lines THEN
105696: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
105697: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
105698:
105699:
105700: xla_ae_lines_pkg.SetAcctReversalAttrs
105701: (p_event_id => l_event_id
105702: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
105703: ,p_calculate_acctd_flag => l_calculate_acctd_flag
105704: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
105862:
105863: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
105864: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
105865: AND (l_actual_flag = 'A')) THEN
105866: XLA_AE_LINES_PKG.CreateGainOrLossLines(
105867: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
105868: ,p_application_id => p_application_id
105869: ,p_amb_context_code => 'DEFAULT'
105870: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
105895: END IF;
105896: END IF;
105897:
105898: END LOOP;
105899: l_result := XLA_AE_LINES_PKG.InsertLines ;
105900: end loop;
105901: close line_cur;
105902:
105903:
106388: l_first_event_id NUMBER;
106389: l_last_event_id NUMBER;
106390:
106391: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
106392: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
106393: --
106394: --
106395: l_result BOOLEAN := TRUE;
106396: l_rows NUMBER := 1000;
106657: EXIT WHEN l_array_entity_id.COUNT = 0;
106658:
106659: -- initialize arrays
106660: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
106661: XLA_AE_LINES_PKG.g_rec_lines := NULL;
106662:
106663: --
106664: -- Bug 4458708
106665: --
106662:
106663: --
106664: -- Bug 4458708
106665: --
106666: XLA_AE_LINES_PKG.g_LineNumber := 0;
106667:
106668:
106669: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
106670: g_last_hdr_idx := l_array_event_id.LAST;
106789: --
106790: -- following sets the accounting attributes needed to reverse
106791: -- accounting for a distributeion
106792: --
106793: xla_ae_lines_pkg.SetTrxReversalAttrs
106794: (p_event_id => l_event_id
106795: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
106796: ,p_trx_reversal_source => l_trx_reversal_source);
106797:
106821: --
106822: -- insert dummy rows into lines gt table that were created due to
106823: -- transaction reversals
106824: --
106825: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
106826: l_result := XLA_AE_LINES_PKG.InsertLines;
106827: END IF;
106828:
106829: --
106822: -- insert dummy rows into lines gt table that were created due to
106823: -- transaction reversals
106824: --
106825: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
106826: l_result := XLA_AE_LINES_PKG.InsertLines;
106827: END IF;
106828:
106829: --
106830: -- reset the temp_line_num for each set of events fetched from header
106830: -- reset the temp_line_num for each set of events fetched from header
106831: -- cursor rather than doing it for each new event in line cursor
106832: -- Bug 3939231
106833: --
106834: xla_ae_lines_pkg.g_temp_line_num := 0;
106835:
106836:
106837:
106838: --
106907: END IF;
106908: --
106909: EXIT WHEN l_array_entity_id.count = 0;
106910:
106911: XLA_AE_LINES_PKG.g_rec_lines := null;
106912:
106913: --
106914: -- Bug 4458708
106915: --
106912:
106913: --
106914: -- Bug 4458708
106915: --
106916: XLA_AE_LINES_PKG.g_LineNumber := 0;
106917: --
106918: --
106919:
106920: FOR Idx IN 1..l_array_event_id.count LOOP
106984:
106985:
106986:
106987: --
106988: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
106989:
106990: l_acct_reversal_source := SUBSTR(l_array_source_23(Idx), 1,30);
106991:
106992: IF l_continue_with_lines THEN
107068: l_rec_rev_acct_attrs.array_acct_attr_code(25) := 'REVERSED_DISTRIBUTION_TYPE';
107069: l_rec_rev_acct_attrs.array_char_value(25) := l_array_source_35(Idx);
107070:
107071:
107072: xla_ae_lines_pkg.SetAcctReversalAttrs
107073: (p_event_id => l_event_id
107074: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
107075: ,p_calculate_acctd_flag => l_calculate_acctd_flag
107076: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
107234:
107235: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
107236: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
107237: AND (l_actual_flag = 'A')) THEN
107238: XLA_AE_LINES_PKG.CreateGainOrLossLines(
107239: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
107240: ,p_application_id => p_application_id
107241: ,p_amb_context_code => 'DEFAULT'
107242: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
107267: END IF;
107268: END IF;
107269:
107270: END LOOP;
107271: l_result := XLA_AE_LINES_PKG.InsertLines ;
107272: end loop;
107273: close line_cur;
107274:
107275:
107367:
107368: --
107369: -- initialize array of lines with NULL
107370: --
107371: xla_ae_lines_pkg.SetNullLine;
107372:
107373: --
107374: -- initialize header extract count -- Bug 4865292
107375: --