[Home] [Help]
860: --
861: -- bulk performance
862: --
863: l_balance_type_code VARCHAR2(1);
864: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
865: l_log_module VARCHAR2(240);
866:
867: --
868: -- Upgrade strategy
930: ') = 'N'
931: THEN
932:
933: --
934: XLA_AE_LINES_PKG.SetNewLine;
935:
936: p_balance_type_code := l_balance_type_code;
937: -- set the flag so later we will know whether the gain loss line needs to be created
938:
942:
943: --
944: -- bulk performance
945: --
946: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
947: p_header_num => 0); -- 4262811
948: --
949: -- set accounting line options
950: --
947: p_header_num => 0); -- 4262811
948: --
949: -- set accounting line options
950: --
951: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
952: p_natural_side_code => 'C'
953: , p_gain_or_loss_flag => 'N'
954: , p_gl_transfer_mode_code => 'S'
955: , p_acct_entry_type_code => 'A'
961: --
962: --
963: -- set accounting line type info
964: --
965: xla_ae_lines_pkg.SetAcctLineType
966: (p_component_type => l_component_type
967: ,p_event_type_code => l_event_type_code
968: ,p_line_definition_owner_code => l_line_definition_owner_code
969: ,p_line_definition_code => l_line_definition_code
975: ,p_event_class_code => l_event_class_code);
976: --
977: -- set accounting class
978: --
979: xla_ae_lines_pkg.SetAcctClass(
980: p_accounting_class_code => 'BANK_CHG'
981: , p_ae_header_id => l_ae_header_id
982: );
983:
983:
984: --
985: -- set rounding class
986: --
987: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
988: 'RECEIVABLE';
989:
990: --
991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
987: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
988: 'RECEIVABLE';
989:
990: --
991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
993: --
994: -- bulk performance
995: --
988: 'RECEIVABLE';
989:
990: --
991: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
993: --
994: -- bulk performance
995: --
996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
992: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
993: --
994: -- bulk performance
995: --
996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
997:
998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1000:
994: -- bulk performance
995: --
996: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
997:
998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1000:
1001: -- 4955764
1002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
998: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
999: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1000:
1001: -- 4955764
1002: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1003: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1004:
1005: -- 4458381 Public Sector Enh
1006:
1026: l_rec_acct_attrs.array_char_value(7) := p_source_15;
1027: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1028: l_rec_acct_attrs.array_num_value(8) := p_source_16;
1029:
1030: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1031: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1032:
1033: ---------------------------------------------------------------------------------------------------------------
1034: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1027: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1028: l_rec_acct_attrs.array_num_value(8) := p_source_16;
1029:
1030: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1031: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1032:
1033: ---------------------------------------------------------------------------------------------------------------
1034: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1035: ---------------------------------------------------------------------------------------------------------------
1030: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1031: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1032:
1033: ---------------------------------------------------------------------------------------------------------------
1034: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1035: ---------------------------------------------------------------------------------------------------------------
1036: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1037:
1038: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1032:
1033: ---------------------------------------------------------------------------------------------------------------
1034: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1035: ---------------------------------------------------------------------------------------------------------------
1036: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1037:
1038: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1039: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1040:
1034: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1035: ---------------------------------------------------------------------------------------------------------------
1036: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1037:
1038: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1039: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1040:
1041: IF xla_accounting_cache_pkg.GetValueChar
1042: (p_source_code => 'LEDGER_CATEGORY_CODE'
1035: ---------------------------------------------------------------------------------------------------------------
1036: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1037:
1038: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1039: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1040:
1041: IF xla_accounting_cache_pkg.GetValueChar
1042: (p_source_code => 'LEDGER_CATEGORY_CODE'
1043: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
1046: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
1047: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
1048: )
1049: THEN
1050: xla_ae_lines_pkg.BflowUpgEntry
1051: (p_business_method_code => l_bflow_method_code
1052: ,p_business_class_code => l_bflow_class_code
1053: ,p_balance_type => l_balance_type_code);
1054: ELSE
1086: , x_value_type_code => l_adr_value_type_code
1087: , p_side => 'NA'
1088: );
1089:
1090: xla_ae_lines_pkg.set_ccid(
1091: p_code_combination_id => l_ccid
1092: , p_value_type_code => l_adr_value_type_code
1093: , p_transaction_coa_id => l_adr_transaction_coa_id
1094: , p_accounting_coa_id => l_adr_accounting_coa_id
1122: xla_accounting_err_pkg.build_message
1123: (p_appli_s_name => 'XLA'
1124: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
1125: ,p_token_1 => 'LINE_NUMBER'
1126: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
1127: ,p_token_2 => 'LINE_TYPE_NAME'
1128: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
1129: l_component_type
1130: ,l_component_code
1158: --
1159: --
1160: ------------------------------------------------------------------------------------------------
1161: -- 4219869 Business Flow
1162: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1163: -- Prior Entry. Currently, the following code is always generated.
1164: ------------------------------------------------------------------------------------------------
1165: XLA_AE_LINES_PKG.ValidateCurrentLine;
1166:
1161: -- 4219869 Business Flow
1162: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1163: -- Prior Entry. Currently, the following code is always generated.
1164: ------------------------------------------------------------------------------------------------
1165: XLA_AE_LINES_PKG.ValidateCurrentLine;
1166:
1167: ------------------------------------------------------------------------------------
1168: -- 4219869 Business Flow
1169: -- Populated credit and debit amounts -- Need to generate this within IF
1167: ------------------------------------------------------------------------------------
1168: -- 4219869 Business Flow
1169: -- Populated credit and debit amounts -- Need to generate this within IF
1170: ------------------------------------------------------------------------------------
1171: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1172:
1173: ----------------------------------------------------------------------------------
1174: -- 4219869 Business Flow
1175: -- Update journal entry status -- Need to generate this within IF
1199: -- To allow MPA report to determine if it should generate report process
1200: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1201: ------------------------------------------------------------------------------------------
1202:
1203: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1204: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1205: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1206: -- call ADRs
1207: -- Bug 4922099
1200: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1201: ------------------------------------------------------------------------------------------
1202:
1203: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1204: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1205: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1206: -- call ADRs
1207: -- Bug 4922099
1208: --
1224: , x_value_type_code => l_adr_value_type_code
1225: , p_side => 'NA'
1226: );
1227:
1228: xla_ae_lines_pkg.set_ccid(
1229: p_code_combination_id => l_ccid
1230: , p_value_type_code => l_adr_value_type_code
1231: , p_transaction_coa_id => l_adr_transaction_coa_id
1232: , p_accounting_coa_id => l_adr_accounting_coa_id
1247:
1248: --
1249: -- Update the line information that should be overwritten
1250: --
1251: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1252: p_header_num => 1);
1253: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1254:
1255: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1249: -- Update the line information that should be overwritten
1250: --
1251: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1252: p_header_num => 1);
1253: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1254:
1255: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1256:
1257: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1251: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1252: p_header_num => 1);
1253: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1254:
1255: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1256:
1257: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1258: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1259: END IF;
1254:
1255: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1256:
1257: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1258: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1259: END IF;
1260:
1261: --
1262: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1261: --
1262: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1263: --
1264: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
1265: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
1266: ELSE
1267: ---------------------------------------------------------------------------------------------------
1268: -- 4262811a Switch Sign
1269: ---------------------------------------------------------------------------------------------------
1266: ELSE
1267: ---------------------------------------------------------------------------------------------------
1268: -- 4262811a Switch Sign
1269: ---------------------------------------------------------------------------------------------------
1270: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1271: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1267: ---------------------------------------------------------------------------------------------------
1268: -- 4262811a Switch Sign
1269: ---------------------------------------------------------------------------------------------------
1270: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1271: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1268: -- 4262811a Switch Sign
1269: ---------------------------------------------------------------------------------------------------
1270: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1271: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1276: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1269: ---------------------------------------------------------------------------------------------------
1270: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1271: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1276: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1277: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1270: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1271: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1276: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1277: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1278:
1272: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1276: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1277: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1278:
1279: END IF;
1280:
1273: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1274: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1275: -- 5132302
1276: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1277: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1278:
1279: END IF;
1280:
1281: -- 4955764
1278:
1279: END IF;
1280:
1281: -- 4955764
1282: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1283: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1284:
1285:
1286: XLA_AE_LINES_PKG.ValidateCurrentLine;
1282: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1283: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1284:
1285:
1286: XLA_AE_LINES_PKG.ValidateCurrentLine;
1287: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1288:
1289: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1290: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1283: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1284:
1285:
1286: XLA_AE_LINES_PKG.ValidateCurrentLine;
1287: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1288:
1289: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1290: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1291: ,p_balance_type_code => l_balance_type_code);
1418: --
1419: -- bulk performance
1420: --
1421: l_balance_type_code VARCHAR2(1);
1422: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1423: l_log_module VARCHAR2(240);
1424:
1425: --
1426: -- Upgrade strategy
1488: ') = 'N'
1489: THEN
1490:
1491: --
1492: XLA_AE_LINES_PKG.SetNewLine;
1493:
1494: p_balance_type_code := l_balance_type_code;
1495: -- set the flag so later we will know whether the gain loss line needs to be created
1496:
1500:
1501: --
1502: -- bulk performance
1503: --
1504: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
1505: p_header_num => 0); -- 4262811
1506: --
1507: -- set accounting line options
1508: --
1505: p_header_num => 0); -- 4262811
1506: --
1507: -- set accounting line options
1508: --
1509: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
1510: p_natural_side_code => 'C'
1511: , p_gain_or_loss_flag => 'N'
1512: , p_gl_transfer_mode_code => 'S'
1513: , p_acct_entry_type_code => 'A'
1519: --
1520: --
1521: -- set accounting line type info
1522: --
1523: xla_ae_lines_pkg.SetAcctLineType
1524: (p_component_type => l_component_type
1525: ,p_event_type_code => l_event_type_code
1526: ,p_line_definition_owner_code => l_line_definition_owner_code
1527: ,p_line_definition_code => l_line_definition_code
1533: ,p_event_class_code => l_event_class_code);
1534: --
1535: -- set accounting class
1536: --
1537: xla_ae_lines_pkg.SetAcctClass(
1538: p_accounting_class_code => 'CASH'
1539: , p_ae_header_id => l_ae_header_id
1540: );
1541:
1541:
1542: --
1543: -- set rounding class
1544: --
1545: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1546: 'RECEIVABLE';
1547:
1548: --
1549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1545: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
1546: 'RECEIVABLE';
1547:
1548: --
1549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1551: --
1552: -- bulk performance
1553: --
1546: 'RECEIVABLE';
1547:
1548: --
1549: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
1550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1551: --
1552: -- bulk performance
1553: --
1554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1550: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
1551: --
1552: -- bulk performance
1553: --
1554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1555:
1556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1558:
1552: -- bulk performance
1553: --
1554: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
1555:
1556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1558:
1559: -- 4955764
1560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1556: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
1557: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
1558:
1559: -- 4955764
1560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1561: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
1562:
1563: -- 4458381 Public Sector Enh
1564:
1584: l_rec_acct_attrs.array_char_value(7) := p_source_15;
1585: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1586: l_rec_acct_attrs.array_num_value(8) := p_source_16;
1587:
1588: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1589: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1590:
1591: ---------------------------------------------------------------------------------------------------------------
1592: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1585: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
1586: l_rec_acct_attrs.array_num_value(8) := p_source_16;
1587:
1588: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1589: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1590:
1591: ---------------------------------------------------------------------------------------------------------------
1592: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1593: ---------------------------------------------------------------------------------------------------------------
1588: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
1589: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
1590:
1591: ---------------------------------------------------------------------------------------------------------------
1592: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1593: ---------------------------------------------------------------------------------------------------------------
1594: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1595:
1596: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1590:
1591: ---------------------------------------------------------------------------------------------------------------
1592: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1593: ---------------------------------------------------------------------------------------------------------------
1594: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1595:
1596: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1597: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1598:
1592: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
1593: ---------------------------------------------------------------------------------------------------------------
1594: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1595:
1596: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1597: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1598:
1599: IF xla_accounting_cache_pkg.GetValueChar
1600: (p_source_code => 'LEDGER_CATEGORY_CODE'
1593: ---------------------------------------------------------------------------------------------------------------
1594: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
1595:
1596: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1597: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
1598:
1599: IF xla_accounting_cache_pkg.GetValueChar
1600: (p_source_code => 'LEDGER_CATEGORY_CODE'
1601: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
1604: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
1605: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
1606: )
1607: THEN
1608: xla_ae_lines_pkg.BflowUpgEntry
1609: (p_business_method_code => l_bflow_method_code
1610: ,p_business_class_code => l_bflow_class_code
1611: ,p_balance_type => l_balance_type_code);
1612: ELSE
1644: , x_value_type_code => l_adr_value_type_code
1645: , p_side => 'NA'
1646: );
1647:
1648: xla_ae_lines_pkg.set_ccid(
1649: p_code_combination_id => l_ccid
1650: , p_value_type_code => l_adr_value_type_code
1651: , p_transaction_coa_id => l_adr_transaction_coa_id
1652: , p_accounting_coa_id => l_adr_accounting_coa_id
1680: xla_accounting_err_pkg.build_message
1681: (p_appli_s_name => 'XLA'
1682: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
1683: ,p_token_1 => 'LINE_NUMBER'
1684: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
1685: ,p_token_2 => 'LINE_TYPE_NAME'
1686: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
1687: l_component_type
1688: ,l_component_code
1716: --
1717: --
1718: ------------------------------------------------------------------------------------------------
1719: -- 4219869 Business Flow
1720: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1721: -- Prior Entry. Currently, the following code is always generated.
1722: ------------------------------------------------------------------------------------------------
1723: XLA_AE_LINES_PKG.ValidateCurrentLine;
1724:
1719: -- 4219869 Business Flow
1720: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
1721: -- Prior Entry. Currently, the following code is always generated.
1722: ------------------------------------------------------------------------------------------------
1723: XLA_AE_LINES_PKG.ValidateCurrentLine;
1724:
1725: ------------------------------------------------------------------------------------
1726: -- 4219869 Business Flow
1727: -- Populated credit and debit amounts -- Need to generate this within IF
1725: ------------------------------------------------------------------------------------
1726: -- 4219869 Business Flow
1727: -- Populated credit and debit amounts -- Need to generate this within IF
1728: ------------------------------------------------------------------------------------
1729: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1730:
1731: ----------------------------------------------------------------------------------
1732: -- 4219869 Business Flow
1733: -- Update journal entry status -- Need to generate this within IF
1757: -- To allow MPA report to determine if it should generate report process
1758: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1759: ------------------------------------------------------------------------------------------
1760:
1761: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1762: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1763: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1764: -- call ADRs
1765: -- Bug 4922099
1758: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
1759: ------------------------------------------------------------------------------------------
1760:
1761: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
1762: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
1763: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
1764: -- call ADRs
1765: -- Bug 4922099
1766: --
1782: , x_value_type_code => l_adr_value_type_code
1783: , p_side => 'NA'
1784: );
1785:
1786: xla_ae_lines_pkg.set_ccid(
1787: p_code_combination_id => l_ccid
1788: , p_value_type_code => l_adr_value_type_code
1789: , p_transaction_coa_id => l_adr_transaction_coa_id
1790: , p_accounting_coa_id => l_adr_accounting_coa_id
1805:
1806: --
1807: -- Update the line information that should be overwritten
1808: --
1809: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1810: p_header_num => 1);
1811: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1812:
1813: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1807: -- Update the line information that should be overwritten
1808: --
1809: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1810: p_header_num => 1);
1811: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1812:
1813: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1814:
1815: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1809: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
1810: p_header_num => 1);
1811: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
1812:
1813: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1814:
1815: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1816: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1817: END IF;
1812:
1813: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
1814:
1815: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
1816: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
1817: END IF;
1818:
1819: --
1820: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1819: --
1820: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
1821: --
1822: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
1823: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
1824: ELSE
1825: ---------------------------------------------------------------------------------------------------
1826: -- 4262811a Switch Sign
1827: ---------------------------------------------------------------------------------------------------
1824: ELSE
1825: ---------------------------------------------------------------------------------------------------
1826: -- 4262811a Switch Sign
1827: ---------------------------------------------------------------------------------------------------
1828: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1825: ---------------------------------------------------------------------------------------------------
1826: -- 4262811a Switch Sign
1827: ---------------------------------------------------------------------------------------------------
1828: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1826: -- 4262811a Switch Sign
1827: ---------------------------------------------------------------------------------------------------
1828: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1827: ---------------------------------------------------------------------------------------------------
1828: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1828: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
1829: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1836:
1830: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1836:
1837: END IF;
1838:
1831: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
1832: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1833: -- 5132302
1834: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
1835: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
1836:
1837: END IF;
1838:
1839: -- 4955764
1836:
1837: END IF;
1838:
1839: -- 4955764
1840: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1841: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1842:
1843:
1844: XLA_AE_LINES_PKG.ValidateCurrentLine;
1840: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
1841: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1842:
1843:
1844: XLA_AE_LINES_PKG.ValidateCurrentLine;
1845: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1846:
1847: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1848: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1841: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
1842:
1843:
1844: XLA_AE_LINES_PKG.ValidateCurrentLine;
1845: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
1846:
1847: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
1848: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
1849: ,p_balance_type_code => l_balance_type_code);
1976: --
1977: -- bulk performance
1978: --
1979: l_balance_type_code VARCHAR2(1);
1980: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
1981: l_log_module VARCHAR2(240);
1982:
1983: --
1984: -- Upgrade strategy
2046: ') = 'N'
2047: THEN
2048:
2049: --
2050: XLA_AE_LINES_PKG.SetNewLine;
2051:
2052: p_balance_type_code := l_balance_type_code;
2053: -- set the flag so later we will know whether the gain loss line needs to be created
2054:
2058:
2059: --
2060: -- bulk performance
2061: --
2062: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2063: p_header_num => 0); -- 4262811
2064: --
2065: -- set accounting line options
2066: --
2063: p_header_num => 0); -- 4262811
2064: --
2065: -- set accounting line options
2066: --
2067: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2068: p_natural_side_code => 'C'
2069: , p_gain_or_loss_flag => 'N'
2070: , p_gl_transfer_mode_code => 'S'
2071: , p_acct_entry_type_code => 'A'
2077: --
2078: --
2079: -- set accounting line type info
2080: --
2081: xla_ae_lines_pkg.SetAcctLineType
2082: (p_component_type => l_component_type
2083: ,p_event_type_code => l_event_type_code
2084: ,p_line_definition_owner_code => l_line_definition_owner_code
2085: ,p_line_definition_code => l_line_definition_code
2091: ,p_event_class_code => l_event_class_code);
2092: --
2093: -- set accounting class
2094: --
2095: xla_ae_lines_pkg.SetAcctClass(
2096: p_accounting_class_code => 'CONFIRMATION'
2097: , p_ae_header_id => l_ae_header_id
2098: );
2099:
2099:
2100: --
2101: -- set rounding class
2102: --
2103: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2104: 'RECEIVABLE';
2105:
2106: --
2107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2103: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2104: 'RECEIVABLE';
2105:
2106: --
2107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2109: --
2110: -- bulk performance
2111: --
2104: 'RECEIVABLE';
2105:
2106: --
2107: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2109: --
2110: -- bulk performance
2111: --
2112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2108: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2109: --
2110: -- bulk performance
2111: --
2112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2113:
2114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2116:
2110: -- bulk performance
2111: --
2112: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2113:
2114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2116:
2117: -- 4955764
2118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2114: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2115: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2116:
2117: -- 4955764
2118: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2119: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2120:
2121: -- 4458381 Public Sector Enh
2122:
2142: l_rec_acct_attrs.array_char_value(7) := p_source_15;
2143: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2144: l_rec_acct_attrs.array_num_value(8) := p_source_16;
2145:
2146: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2147: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2148:
2149: ---------------------------------------------------------------------------------------------------------------
2150: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2143: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2144: l_rec_acct_attrs.array_num_value(8) := p_source_16;
2145:
2146: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2147: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2148:
2149: ---------------------------------------------------------------------------------------------------------------
2150: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2151: ---------------------------------------------------------------------------------------------------------------
2146: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2147: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2148:
2149: ---------------------------------------------------------------------------------------------------------------
2150: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2151: ---------------------------------------------------------------------------------------------------------------
2152: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2153:
2154: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2148:
2149: ---------------------------------------------------------------------------------------------------------------
2150: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2151: ---------------------------------------------------------------------------------------------------------------
2152: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2153:
2154: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2155: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2156:
2150: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2151: ---------------------------------------------------------------------------------------------------------------
2152: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2153:
2154: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2155: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2156:
2157: IF xla_accounting_cache_pkg.GetValueChar
2158: (p_source_code => 'LEDGER_CATEGORY_CODE'
2151: ---------------------------------------------------------------------------------------------------------------
2152: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2153:
2154: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2155: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2156:
2157: IF xla_accounting_cache_pkg.GetValueChar
2158: (p_source_code => 'LEDGER_CATEGORY_CODE'
2159: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
2162: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
2163: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
2164: )
2165: THEN
2166: xla_ae_lines_pkg.BflowUpgEntry
2167: (p_business_method_code => l_bflow_method_code
2168: ,p_business_class_code => l_bflow_class_code
2169: ,p_balance_type => l_balance_type_code);
2170: ELSE
2202: , x_value_type_code => l_adr_value_type_code
2203: , p_side => 'NA'
2204: );
2205:
2206: xla_ae_lines_pkg.set_ccid(
2207: p_code_combination_id => l_ccid
2208: , p_value_type_code => l_adr_value_type_code
2209: , p_transaction_coa_id => l_adr_transaction_coa_id
2210: , p_accounting_coa_id => l_adr_accounting_coa_id
2238: xla_accounting_err_pkg.build_message
2239: (p_appli_s_name => 'XLA'
2240: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
2241: ,p_token_1 => 'LINE_NUMBER'
2242: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
2243: ,p_token_2 => 'LINE_TYPE_NAME'
2244: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
2245: l_component_type
2246: ,l_component_code
2274: --
2275: --
2276: ------------------------------------------------------------------------------------------------
2277: -- 4219869 Business Flow
2278: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2279: -- Prior Entry. Currently, the following code is always generated.
2280: ------------------------------------------------------------------------------------------------
2281: XLA_AE_LINES_PKG.ValidateCurrentLine;
2282:
2277: -- 4219869 Business Flow
2278: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2279: -- Prior Entry. Currently, the following code is always generated.
2280: ------------------------------------------------------------------------------------------------
2281: XLA_AE_LINES_PKG.ValidateCurrentLine;
2282:
2283: ------------------------------------------------------------------------------------
2284: -- 4219869 Business Flow
2285: -- Populated credit and debit amounts -- Need to generate this within IF
2283: ------------------------------------------------------------------------------------
2284: -- 4219869 Business Flow
2285: -- Populated credit and debit amounts -- Need to generate this within IF
2286: ------------------------------------------------------------------------------------
2287: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2288:
2289: ----------------------------------------------------------------------------------
2290: -- 4219869 Business Flow
2291: -- Update journal entry status -- Need to generate this within IF
2315: -- To allow MPA report to determine if it should generate report process
2316: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2317: ------------------------------------------------------------------------------------------
2318:
2319: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2320: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2321: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2322: -- call ADRs
2323: -- Bug 4922099
2316: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2317: ------------------------------------------------------------------------------------------
2318:
2319: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2320: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2321: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2322: -- call ADRs
2323: -- Bug 4922099
2324: --
2340: , x_value_type_code => l_adr_value_type_code
2341: , p_side => 'NA'
2342: );
2343:
2344: xla_ae_lines_pkg.set_ccid(
2345: p_code_combination_id => l_ccid
2346: , p_value_type_code => l_adr_value_type_code
2347: , p_transaction_coa_id => l_adr_transaction_coa_id
2348: , p_accounting_coa_id => l_adr_accounting_coa_id
2363:
2364: --
2365: -- Update the line information that should be overwritten
2366: --
2367: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2368: p_header_num => 1);
2369: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2370:
2371: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2365: -- Update the line information that should be overwritten
2366: --
2367: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2368: p_header_num => 1);
2369: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2370:
2371: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2372:
2373: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2367: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2368: p_header_num => 1);
2369: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2370:
2371: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2372:
2373: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2374: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2375: END IF;
2370:
2371: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2372:
2373: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2374: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2375: END IF;
2376:
2377: --
2378: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2377: --
2378: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2379: --
2380: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
2381: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
2382: ELSE
2383: ---------------------------------------------------------------------------------------------------
2384: -- 4262811a Switch Sign
2385: ---------------------------------------------------------------------------------------------------
2382: ELSE
2383: ---------------------------------------------------------------------------------------------------
2384: -- 4262811a Switch Sign
2385: ---------------------------------------------------------------------------------------------------
2386: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2387: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2383: ---------------------------------------------------------------------------------------------------
2384: -- 4262811a Switch Sign
2385: ---------------------------------------------------------------------------------------------------
2386: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2387: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2384: -- 4262811a Switch Sign
2385: ---------------------------------------------------------------------------------------------------
2386: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2387: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2392: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2385: ---------------------------------------------------------------------------------------------------
2386: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2387: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2392: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2393: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2386: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2387: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2392: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2393: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2394:
2388: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2392: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2393: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2394:
2395: END IF;
2396:
2389: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2390: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2391: -- 5132302
2392: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2393: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2394:
2395: END IF;
2396:
2397: -- 4955764
2394:
2395: END IF;
2396:
2397: -- 4955764
2398: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2399: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2400:
2401:
2402: XLA_AE_LINES_PKG.ValidateCurrentLine;
2398: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2399: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2400:
2401:
2402: XLA_AE_LINES_PKG.ValidateCurrentLine;
2403: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2404:
2405: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2406: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2399: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2400:
2401:
2402: XLA_AE_LINES_PKG.ValidateCurrentLine;
2403: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2404:
2405: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2406: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2407: ,p_balance_type_code => l_balance_type_code);
2534: --
2535: -- bulk performance
2536: --
2537: l_balance_type_code VARCHAR2(1);
2538: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
2539: l_log_module VARCHAR2(240);
2540:
2541: --
2542: -- Upgrade strategy
2604: ') = 'N'
2605: THEN
2606:
2607: --
2608: XLA_AE_LINES_PKG.SetNewLine;
2609:
2610: p_balance_type_code := l_balance_type_code;
2611: -- set the flag so later we will know whether the gain loss line needs to be created
2612:
2616:
2617: --
2618: -- bulk performance
2619: --
2620: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
2621: p_header_num => 0); -- 4262811
2622: --
2623: -- set accounting line options
2624: --
2621: p_header_num => 0); -- 4262811
2622: --
2623: -- set accounting line options
2624: --
2625: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
2626: p_natural_side_code => 'C'
2627: , p_gain_or_loss_flag => 'N'
2628: , p_gl_transfer_mode_code => 'S'
2629: , p_acct_entry_type_code => 'A'
2635: --
2636: --
2637: -- set accounting line type info
2638: --
2639: xla_ae_lines_pkg.SetAcctLineType
2640: (p_component_type => l_component_type
2641: ,p_event_type_code => l_event_type_code
2642: ,p_line_definition_owner_code => l_line_definition_owner_code
2643: ,p_line_definition_code => l_line_definition_code
2649: ,p_event_class_code => l_event_class_code);
2650: --
2651: -- set accounting class
2652: --
2653: xla_ae_lines_pkg.SetAcctClass(
2654: p_accounting_class_code => 'SHORT_TERM_DEBT'
2655: , p_ae_header_id => l_ae_header_id
2656: );
2657:
2657:
2658: --
2659: -- set rounding class
2660: --
2661: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2662: 'RECEIVABLE';
2663:
2664: --
2665: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2661: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
2662: 'RECEIVABLE';
2663:
2664: --
2665: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2666: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2667: --
2668: -- bulk performance
2669: --
2662: 'RECEIVABLE';
2663:
2664: --
2665: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
2666: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2667: --
2668: -- bulk performance
2669: --
2670: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2666: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
2667: --
2668: -- bulk performance
2669: --
2670: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2671:
2672: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2673: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2674:
2668: -- bulk performance
2669: --
2670: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
2671:
2672: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2673: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2674:
2675: -- 4955764
2676: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2672: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
2673: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
2674:
2675: -- 4955764
2676: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2677: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
2678:
2679: -- 4458381 Public Sector Enh
2680:
2700: l_rec_acct_attrs.array_char_value(7) := p_source_15;
2701: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2702: l_rec_acct_attrs.array_num_value(8) := p_source_16;
2703:
2704: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2705: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2706:
2707: ---------------------------------------------------------------------------------------------------------------
2708: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2701: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
2702: l_rec_acct_attrs.array_num_value(8) := p_source_16;
2703:
2704: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2705: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2706:
2707: ---------------------------------------------------------------------------------------------------------------
2708: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2709: ---------------------------------------------------------------------------------------------------------------
2704: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
2705: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
2706:
2707: ---------------------------------------------------------------------------------------------------------------
2708: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2709: ---------------------------------------------------------------------------------------------------------------
2710: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2711:
2712: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2706:
2707: ---------------------------------------------------------------------------------------------------------------
2708: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2709: ---------------------------------------------------------------------------------------------------------------
2710: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2711:
2712: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2713: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2714:
2708: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
2709: ---------------------------------------------------------------------------------------------------------------
2710: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2711:
2712: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2713: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2714:
2715: IF xla_accounting_cache_pkg.GetValueChar
2716: (p_source_code => 'LEDGER_CATEGORY_CODE'
2709: ---------------------------------------------------------------------------------------------------------------
2710: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
2711:
2712: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2713: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
2714:
2715: IF xla_accounting_cache_pkg.GetValueChar
2716: (p_source_code => 'LEDGER_CATEGORY_CODE'
2717: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
2720: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
2721: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
2722: )
2723: THEN
2724: xla_ae_lines_pkg.BflowUpgEntry
2725: (p_business_method_code => l_bflow_method_code
2726: ,p_business_class_code => l_bflow_class_code
2727: ,p_balance_type => l_balance_type_code);
2728: ELSE
2760: , x_value_type_code => l_adr_value_type_code
2761: , p_side => 'NA'
2762: );
2763:
2764: xla_ae_lines_pkg.set_ccid(
2765: p_code_combination_id => l_ccid
2766: , p_value_type_code => l_adr_value_type_code
2767: , p_transaction_coa_id => l_adr_transaction_coa_id
2768: , p_accounting_coa_id => l_adr_accounting_coa_id
2796: xla_accounting_err_pkg.build_message
2797: (p_appli_s_name => 'XLA'
2798: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
2799: ,p_token_1 => 'LINE_NUMBER'
2800: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
2801: ,p_token_2 => 'LINE_TYPE_NAME'
2802: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
2803: l_component_type
2804: ,l_component_code
2832: --
2833: --
2834: ------------------------------------------------------------------------------------------------
2835: -- 4219869 Business Flow
2836: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2837: -- Prior Entry. Currently, the following code is always generated.
2838: ------------------------------------------------------------------------------------------------
2839: XLA_AE_LINES_PKG.ValidateCurrentLine;
2840:
2835: -- 4219869 Business Flow
2836: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
2837: -- Prior Entry. Currently, the following code is always generated.
2838: ------------------------------------------------------------------------------------------------
2839: XLA_AE_LINES_PKG.ValidateCurrentLine;
2840:
2841: ------------------------------------------------------------------------------------
2842: -- 4219869 Business Flow
2843: -- Populated credit and debit amounts -- Need to generate this within IF
2841: ------------------------------------------------------------------------------------
2842: -- 4219869 Business Flow
2843: -- Populated credit and debit amounts -- Need to generate this within IF
2844: ------------------------------------------------------------------------------------
2845: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2846:
2847: ----------------------------------------------------------------------------------
2848: -- 4219869 Business Flow
2849: -- Update journal entry status -- Need to generate this within IF
2873: -- To allow MPA report to determine if it should generate report process
2874: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2875: ------------------------------------------------------------------------------------------
2876:
2877: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2878: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2879: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2880: -- call ADRs
2881: -- Bug 4922099
2874: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
2875: ------------------------------------------------------------------------------------------
2876:
2877: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
2878: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
2879: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
2880: -- call ADRs
2881: -- Bug 4922099
2882: --
2898: , x_value_type_code => l_adr_value_type_code
2899: , p_side => 'NA'
2900: );
2901:
2902: xla_ae_lines_pkg.set_ccid(
2903: p_code_combination_id => l_ccid
2904: , p_value_type_code => l_adr_value_type_code
2905: , p_transaction_coa_id => l_adr_transaction_coa_id
2906: , p_accounting_coa_id => l_adr_accounting_coa_id
2921:
2922: --
2923: -- Update the line information that should be overwritten
2924: --
2925: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2926: p_header_num => 1);
2927: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2928:
2929: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2923: -- Update the line information that should be overwritten
2924: --
2925: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2926: p_header_num => 1);
2927: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2928:
2929: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2930:
2931: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2925: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
2926: p_header_num => 1);
2927: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
2928:
2929: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2930:
2931: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2932: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2933: END IF;
2928:
2929: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
2930:
2931: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
2932: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
2933: END IF;
2934:
2935: --
2936: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2935: --
2936: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
2937: --
2938: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
2939: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
2940: ELSE
2941: ---------------------------------------------------------------------------------------------------
2942: -- 4262811a Switch Sign
2943: ---------------------------------------------------------------------------------------------------
2940: ELSE
2941: ---------------------------------------------------------------------------------------------------
2942: -- 4262811a Switch Sign
2943: ---------------------------------------------------------------------------------------------------
2944: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2945: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2941: ---------------------------------------------------------------------------------------------------
2942: -- 4262811a Switch Sign
2943: ---------------------------------------------------------------------------------------------------
2944: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2945: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2942: -- 4262811a Switch Sign
2943: ---------------------------------------------------------------------------------------------------
2944: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2945: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2950: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2943: ---------------------------------------------------------------------------------------------------
2944: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2945: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2950: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2951: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2944: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
2945: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2950: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2951: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2952:
2946: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2950: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2951: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2952:
2953: END IF;
2954:
2947: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
2948: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2949: -- 5132302
2950: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
2951: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
2952:
2953: END IF;
2954:
2955: -- 4955764
2952:
2953: END IF;
2954:
2955: -- 4955764
2956: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2957: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2958:
2959:
2960: XLA_AE_LINES_PKG.ValidateCurrentLine;
2956: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
2957: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2958:
2959:
2960: XLA_AE_LINES_PKG.ValidateCurrentLine;
2961: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2962:
2963: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2964: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2957: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
2958:
2959:
2960: XLA_AE_LINES_PKG.ValidateCurrentLine;
2961: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
2962:
2963: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
2964: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
2965: ,p_balance_type_code => l_balance_type_code);
3092: --
3093: -- bulk performance
3094: --
3095: l_balance_type_code VARCHAR2(1);
3096: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3097: l_log_module VARCHAR2(240);
3098:
3099: --
3100: -- Upgrade strategy
3162: ') = 'N'
3163: THEN
3164:
3165: --
3166: XLA_AE_LINES_PKG.SetNewLine;
3167:
3168: p_balance_type_code := l_balance_type_code;
3169: -- set the flag so later we will know whether the gain loss line needs to be created
3170:
3174:
3175: --
3176: -- bulk performance
3177: --
3178: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3179: p_header_num => 0); -- 4262811
3180: --
3181: -- set accounting line options
3182: --
3179: p_header_num => 0); -- 4262811
3180: --
3181: -- set accounting line options
3182: --
3183: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3184: p_natural_side_code => 'C'
3185: , p_gain_or_loss_flag => 'N'
3186: , p_gl_transfer_mode_code => 'S'
3187: , p_acct_entry_type_code => 'A'
3193: --
3194: --
3195: -- set accounting line type info
3196: --
3197: xla_ae_lines_pkg.SetAcctLineType
3198: (p_component_type => l_component_type
3199: ,p_event_type_code => l_event_type_code
3200: ,p_line_definition_owner_code => l_line_definition_owner_code
3201: ,p_line_definition_code => l_line_definition_code
3207: ,p_event_class_code => l_event_class_code);
3208: --
3209: -- set accounting class
3210: --
3211: xla_ae_lines_pkg.SetAcctClass(
3212: p_accounting_class_code => 'FACTOR'
3213: , p_ae_header_id => l_ae_header_id
3214: );
3215:
3215:
3216: --
3217: -- set rounding class
3218: --
3219: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3220: 'RECEIVABLE';
3221:
3222: --
3223: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3219: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3220: 'RECEIVABLE';
3221:
3222: --
3223: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3224: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3225: --
3226: -- bulk performance
3227: --
3220: 'RECEIVABLE';
3221:
3222: --
3223: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3224: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3225: --
3226: -- bulk performance
3227: --
3228: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3224: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3225: --
3226: -- bulk performance
3227: --
3228: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3229:
3230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3231: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3232:
3226: -- bulk performance
3227: --
3228: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3229:
3230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3231: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3232:
3233: -- 4955764
3234: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3230: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3231: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3232:
3233: -- 4955764
3234: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3235: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
3236:
3237: -- 4458381 Public Sector Enh
3238:
3258: l_rec_acct_attrs.array_char_value(7) := p_source_15;
3259: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
3260: l_rec_acct_attrs.array_num_value(8) := p_source_16;
3261:
3262: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3263: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3264:
3265: ---------------------------------------------------------------------------------------------------------------
3266: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3259: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
3260: l_rec_acct_attrs.array_num_value(8) := p_source_16;
3261:
3262: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3263: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3264:
3265: ---------------------------------------------------------------------------------------------------------------
3266: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3267: ---------------------------------------------------------------------------------------------------------------
3262: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3263: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3264:
3265: ---------------------------------------------------------------------------------------------------------------
3266: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3267: ---------------------------------------------------------------------------------------------------------------
3268: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3269:
3270: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3264:
3265: ---------------------------------------------------------------------------------------------------------------
3266: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3267: ---------------------------------------------------------------------------------------------------------------
3268: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3269:
3270: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3271: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3272:
3266: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3267: ---------------------------------------------------------------------------------------------------------------
3268: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3269:
3270: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3271: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3272:
3273: IF xla_accounting_cache_pkg.GetValueChar
3274: (p_source_code => 'LEDGER_CATEGORY_CODE'
3267: ---------------------------------------------------------------------------------------------------------------
3268: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3269:
3270: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3271: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3272:
3273: IF xla_accounting_cache_pkg.GetValueChar
3274: (p_source_code => 'LEDGER_CATEGORY_CODE'
3275: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
3278: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
3279: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
3280: )
3281: THEN
3282: xla_ae_lines_pkg.BflowUpgEntry
3283: (p_business_method_code => l_bflow_method_code
3284: ,p_business_class_code => l_bflow_class_code
3285: ,p_balance_type => l_balance_type_code);
3286: ELSE
3318: , x_value_type_code => l_adr_value_type_code
3319: , p_side => 'NA'
3320: );
3321:
3322: xla_ae_lines_pkg.set_ccid(
3323: p_code_combination_id => l_ccid
3324: , p_value_type_code => l_adr_value_type_code
3325: , p_transaction_coa_id => l_adr_transaction_coa_id
3326: , p_accounting_coa_id => l_adr_accounting_coa_id
3354: xla_accounting_err_pkg.build_message
3355: (p_appli_s_name => 'XLA'
3356: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
3357: ,p_token_1 => 'LINE_NUMBER'
3358: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
3359: ,p_token_2 => 'LINE_TYPE_NAME'
3360: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
3361: l_component_type
3362: ,l_component_code
3390: --
3391: --
3392: ------------------------------------------------------------------------------------------------
3393: -- 4219869 Business Flow
3394: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3395: -- Prior Entry. Currently, the following code is always generated.
3396: ------------------------------------------------------------------------------------------------
3397: XLA_AE_LINES_PKG.ValidateCurrentLine;
3398:
3393: -- 4219869 Business Flow
3394: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3395: -- Prior Entry. Currently, the following code is always generated.
3396: ------------------------------------------------------------------------------------------------
3397: XLA_AE_LINES_PKG.ValidateCurrentLine;
3398:
3399: ------------------------------------------------------------------------------------
3400: -- 4219869 Business Flow
3401: -- Populated credit and debit amounts -- Need to generate this within IF
3399: ------------------------------------------------------------------------------------
3400: -- 4219869 Business Flow
3401: -- Populated credit and debit amounts -- Need to generate this within IF
3402: ------------------------------------------------------------------------------------
3403: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3404:
3405: ----------------------------------------------------------------------------------
3406: -- 4219869 Business Flow
3407: -- Update journal entry status -- Need to generate this within IF
3431: -- To allow MPA report to determine if it should generate report process
3432: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3433: ------------------------------------------------------------------------------------------
3434:
3435: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3436: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3437: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3438: -- call ADRs
3439: -- Bug 4922099
3432: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3433: ------------------------------------------------------------------------------------------
3434:
3435: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3436: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3437: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3438: -- call ADRs
3439: -- Bug 4922099
3440: --
3456: , x_value_type_code => l_adr_value_type_code
3457: , p_side => 'NA'
3458: );
3459:
3460: xla_ae_lines_pkg.set_ccid(
3461: p_code_combination_id => l_ccid
3462: , p_value_type_code => l_adr_value_type_code
3463: , p_transaction_coa_id => l_adr_transaction_coa_id
3464: , p_accounting_coa_id => l_adr_accounting_coa_id
3479:
3480: --
3481: -- Update the line information that should be overwritten
3482: --
3483: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3484: p_header_num => 1);
3485: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3486:
3487: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3481: -- Update the line information that should be overwritten
3482: --
3483: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3484: p_header_num => 1);
3485: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3486:
3487: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3488:
3489: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3483: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
3484: p_header_num => 1);
3485: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
3486:
3487: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3488:
3489: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3490: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3491: END IF;
3486:
3487: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
3488:
3489: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
3490: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
3491: END IF;
3492:
3493: --
3494: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3493: --
3494: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
3495: --
3496: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
3497: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
3498: ELSE
3499: ---------------------------------------------------------------------------------------------------
3500: -- 4262811a Switch Sign
3501: ---------------------------------------------------------------------------------------------------
3498: ELSE
3499: ---------------------------------------------------------------------------------------------------
3500: -- 4262811a Switch Sign
3501: ---------------------------------------------------------------------------------------------------
3502: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3503: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3499: ---------------------------------------------------------------------------------------------------
3500: -- 4262811a Switch Sign
3501: ---------------------------------------------------------------------------------------------------
3502: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3503: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3500: -- 4262811a Switch Sign
3501: ---------------------------------------------------------------------------------------------------
3502: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3503: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3508: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3501: ---------------------------------------------------------------------------------------------------
3502: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3503: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3508: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3509: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3502: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
3503: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3508: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3509: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3510:
3504: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3508: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3509: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3510:
3511: END IF;
3512:
3505: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
3506: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3507: -- 5132302
3508: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
3509: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
3510:
3511: END IF;
3512:
3513: -- 4955764
3510:
3511: END IF;
3512:
3513: -- 4955764
3514: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3515: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3516:
3517:
3518: XLA_AE_LINES_PKG.ValidateCurrentLine;
3514: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3515: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3516:
3517:
3518: XLA_AE_LINES_PKG.ValidateCurrentLine;
3519: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3520:
3521: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3522: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3515: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
3516:
3517:
3518: XLA_AE_LINES_PKG.ValidateCurrentLine;
3519: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3520:
3521: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
3522: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
3523: ,p_balance_type_code => l_balance_type_code);
3650: --
3651: -- bulk performance
3652: --
3653: l_balance_type_code VARCHAR2(1);
3654: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
3655: l_log_module VARCHAR2(240);
3656:
3657: --
3658: -- Upgrade strategy
3720: ') = 'N'
3721: THEN
3722:
3723: --
3724: XLA_AE_LINES_PKG.SetNewLine;
3725:
3726: p_balance_type_code := l_balance_type_code;
3727: -- set the flag so later we will know whether the gain loss line needs to be created
3728:
3732:
3733: --
3734: -- bulk performance
3735: --
3736: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
3737: p_header_num => 0); -- 4262811
3738: --
3739: -- set accounting line options
3740: --
3737: p_header_num => 0); -- 4262811
3738: --
3739: -- set accounting line options
3740: --
3741: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
3742: p_natural_side_code => 'C'
3743: , p_gain_or_loss_flag => 'N'
3744: , p_gl_transfer_mode_code => 'S'
3745: , p_acct_entry_type_code => 'A'
3751: --
3752: --
3753: -- set accounting line type info
3754: --
3755: xla_ae_lines_pkg.SetAcctLineType
3756: (p_component_type => l_component_type
3757: ,p_event_type_code => l_event_type_code
3758: ,p_line_definition_owner_code => l_line_definition_owner_code
3759: ,p_line_definition_code => l_line_definition_code
3765: ,p_event_class_code => l_event_class_code);
3766: --
3767: -- set accounting class
3768: --
3769: xla_ae_lines_pkg.SetAcctClass(
3770: p_accounting_class_code => 'MISC_CASH'
3771: , p_ae_header_id => l_ae_header_id
3772: );
3773:
3773:
3774: --
3775: -- set rounding class
3776: --
3777: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3778: 'RECEIVABLE';
3779:
3780: --
3781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3777: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
3778: 'RECEIVABLE';
3779:
3780: --
3781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3783: --
3784: -- bulk performance
3785: --
3778: 'RECEIVABLE';
3779:
3780: --
3781: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
3782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3783: --
3784: -- bulk performance
3785: --
3786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3782: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
3783: --
3784: -- bulk performance
3785: --
3786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3787:
3788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3790:
3784: -- bulk performance
3785: --
3786: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
3787:
3788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3790:
3791: -- 4955764
3792: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3788: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
3789: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
3790:
3791: -- 4955764
3792: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
3793: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
3794:
3795: -- 4458381 Public Sector Enh
3796:
3816: l_rec_acct_attrs.array_char_value(7) := p_source_15;
3817: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
3818: l_rec_acct_attrs.array_num_value(8) := p_source_16;
3819:
3820: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3821: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3822:
3823: ---------------------------------------------------------------------------------------------------------------
3824: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3817: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
3818: l_rec_acct_attrs.array_num_value(8) := p_source_16;
3819:
3820: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3821: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3822:
3823: ---------------------------------------------------------------------------------------------------------------
3824: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3825: ---------------------------------------------------------------------------------------------------------------
3820: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
3821: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
3822:
3823: ---------------------------------------------------------------------------------------------------------------
3824: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3825: ---------------------------------------------------------------------------------------------------------------
3826: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3827:
3828: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3822:
3823: ---------------------------------------------------------------------------------------------------------------
3824: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3825: ---------------------------------------------------------------------------------------------------------------
3826: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3827:
3828: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3829: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3830:
3824: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
3825: ---------------------------------------------------------------------------------------------------------------
3826: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3827:
3828: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3829: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3830:
3831: IF xla_accounting_cache_pkg.GetValueChar
3832: (p_source_code => 'LEDGER_CATEGORY_CODE'
3825: ---------------------------------------------------------------------------------------------------------------
3826: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
3827:
3828: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3829: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
3830:
3831: IF xla_accounting_cache_pkg.GetValueChar
3832: (p_source_code => 'LEDGER_CATEGORY_CODE'
3833: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
3836: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
3837: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
3838: )
3839: THEN
3840: xla_ae_lines_pkg.BflowUpgEntry
3841: (p_business_method_code => l_bflow_method_code
3842: ,p_business_class_code => l_bflow_class_code
3843: ,p_balance_type => l_balance_type_code);
3844: ELSE
3876: , x_value_type_code => l_adr_value_type_code
3877: , p_side => 'NA'
3878: );
3879:
3880: xla_ae_lines_pkg.set_ccid(
3881: p_code_combination_id => l_ccid
3882: , p_value_type_code => l_adr_value_type_code
3883: , p_transaction_coa_id => l_adr_transaction_coa_id
3884: , p_accounting_coa_id => l_adr_accounting_coa_id
3912: xla_accounting_err_pkg.build_message
3913: (p_appli_s_name => 'XLA'
3914: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
3915: ,p_token_1 => 'LINE_NUMBER'
3916: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
3917: ,p_token_2 => 'LINE_TYPE_NAME'
3918: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
3919: l_component_type
3920: ,l_component_code
3948: --
3949: --
3950: ------------------------------------------------------------------------------------------------
3951: -- 4219869 Business Flow
3952: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3953: -- Prior Entry. Currently, the following code is always generated.
3954: ------------------------------------------------------------------------------------------------
3955: XLA_AE_LINES_PKG.ValidateCurrentLine;
3956:
3951: -- 4219869 Business Flow
3952: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
3953: -- Prior Entry. Currently, the following code is always generated.
3954: ------------------------------------------------------------------------------------------------
3955: XLA_AE_LINES_PKG.ValidateCurrentLine;
3956:
3957: ------------------------------------------------------------------------------------
3958: -- 4219869 Business Flow
3959: -- Populated credit and debit amounts -- Need to generate this within IF
3957: ------------------------------------------------------------------------------------
3958: -- 4219869 Business Flow
3959: -- Populated credit and debit amounts -- Need to generate this within IF
3960: ------------------------------------------------------------------------------------
3961: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
3962:
3963: ----------------------------------------------------------------------------------
3964: -- 4219869 Business Flow
3965: -- Update journal entry status -- Need to generate this within IF
3989: -- To allow MPA report to determine if it should generate report process
3990: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3991: ------------------------------------------------------------------------------------------
3992:
3993: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3994: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3995: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3996: -- call ADRs
3997: -- Bug 4922099
3990: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
3991: ------------------------------------------------------------------------------------------
3992:
3993: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
3994: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
3995: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
3996: -- call ADRs
3997: -- Bug 4922099
3998: --
4014: , x_value_type_code => l_adr_value_type_code
4015: , p_side => 'NA'
4016: );
4017:
4018: xla_ae_lines_pkg.set_ccid(
4019: p_code_combination_id => l_ccid
4020: , p_value_type_code => l_adr_value_type_code
4021: , p_transaction_coa_id => l_adr_transaction_coa_id
4022: , p_accounting_coa_id => l_adr_accounting_coa_id
4037:
4038: --
4039: -- Update the line information that should be overwritten
4040: --
4041: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4042: p_header_num => 1);
4043: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4044:
4045: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4039: -- Update the line information that should be overwritten
4040: --
4041: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4042: p_header_num => 1);
4043: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4044:
4045: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4046:
4047: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4041: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4042: p_header_num => 1);
4043: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4044:
4045: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4046:
4047: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4048: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4049: END IF;
4044:
4045: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4046:
4047: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4048: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4049: END IF;
4050:
4051: --
4052: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4051: --
4052: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4053: --
4054: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4055: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4056: ELSE
4057: ---------------------------------------------------------------------------------------------------
4058: -- 4262811a Switch Sign
4059: ---------------------------------------------------------------------------------------------------
4056: ELSE
4057: ---------------------------------------------------------------------------------------------------
4058: -- 4262811a Switch Sign
4059: ---------------------------------------------------------------------------------------------------
4060: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4061: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4057: ---------------------------------------------------------------------------------------------------
4058: -- 4262811a Switch Sign
4059: ---------------------------------------------------------------------------------------------------
4060: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4061: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4058: -- 4262811a Switch Sign
4059: ---------------------------------------------------------------------------------------------------
4060: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4061: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4066: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4059: ---------------------------------------------------------------------------------------------------
4060: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4061: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4066: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4067: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4060: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4061: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4066: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4067: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4068:
4062: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4066: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4067: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4068:
4069: END IF;
4070:
4063: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4064: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4065: -- 5132302
4066: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4067: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4068:
4069: END IF;
4070:
4071: -- 4955764
4068:
4069: END IF;
4070:
4071: -- 4955764
4072: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4073: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4074:
4075:
4076: XLA_AE_LINES_PKG.ValidateCurrentLine;
4072: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4073: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4074:
4075:
4076: XLA_AE_LINES_PKG.ValidateCurrentLine;
4077: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4078:
4079: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4080: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4073: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4074:
4075:
4076: XLA_AE_LINES_PKG.ValidateCurrentLine;
4077: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4078:
4079: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4080: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4081: ,p_balance_type_code => l_balance_type_code);
4208: --
4209: -- bulk performance
4210: --
4211: l_balance_type_code VARCHAR2(1);
4212: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4213: l_log_module VARCHAR2(240);
4214:
4215: --
4216: -- Upgrade strategy
4278: ') = 'N'
4279: THEN
4280:
4281: --
4282: XLA_AE_LINES_PKG.SetNewLine;
4283:
4284: p_balance_type_code := l_balance_type_code;
4285: -- set the flag so later we will know whether the gain loss line needs to be created
4286:
4290:
4291: --
4292: -- bulk performance
4293: --
4294: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
4295: p_header_num => 0); -- 4262811
4296: --
4297: -- set accounting line options
4298: --
4295: p_header_num => 0); -- 4262811
4296: --
4297: -- set accounting line options
4298: --
4299: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
4300: p_natural_side_code => 'C'
4301: , p_gain_or_loss_flag => 'N'
4302: , p_gl_transfer_mode_code => 'S'
4303: , p_acct_entry_type_code => 'A'
4309: --
4310: --
4311: -- set accounting line type info
4312: --
4313: xla_ae_lines_pkg.SetAcctLineType
4314: (p_component_type => l_component_type
4315: ,p_event_type_code => l_event_type_code
4316: ,p_line_definition_owner_code => l_line_definition_owner_code
4317: ,p_line_definition_code => l_line_definition_code
4323: ,p_event_class_code => l_event_class_code);
4324: --
4325: -- set accounting class
4326: --
4327: xla_ae_lines_pkg.SetAcctClass(
4328: p_accounting_class_code => 'REMITTANCE'
4329: , p_ae_header_id => l_ae_header_id
4330: );
4331:
4331:
4332: --
4333: -- set rounding class
4334: --
4335: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4336: 'RECEIVABLE';
4337:
4338: --
4339: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4335: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4336: 'RECEIVABLE';
4337:
4338: --
4339: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4340: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4341: --
4342: -- bulk performance
4343: --
4336: 'RECEIVABLE';
4337:
4338: --
4339: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4340: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4341: --
4342: -- bulk performance
4343: --
4344: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4340: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4341: --
4342: -- bulk performance
4343: --
4344: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4345:
4346: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4347: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4348:
4342: -- bulk performance
4343: --
4344: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4345:
4346: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4347: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4348:
4349: -- 4955764
4350: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4346: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4347: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4348:
4349: -- 4955764
4350: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4351: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4352:
4353: -- 4458381 Public Sector Enh
4354:
4374: l_rec_acct_attrs.array_char_value(7) := p_source_15;
4375: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
4376: l_rec_acct_attrs.array_num_value(8) := p_source_16;
4377:
4378: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4379: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4380:
4381: ---------------------------------------------------------------------------------------------------------------
4382: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4375: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
4376: l_rec_acct_attrs.array_num_value(8) := p_source_16;
4377:
4378: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4379: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4380:
4381: ---------------------------------------------------------------------------------------------------------------
4382: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4383: ---------------------------------------------------------------------------------------------------------------
4378: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4379: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4380:
4381: ---------------------------------------------------------------------------------------------------------------
4382: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4383: ---------------------------------------------------------------------------------------------------------------
4384: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4385:
4386: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4380:
4381: ---------------------------------------------------------------------------------------------------------------
4382: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4383: ---------------------------------------------------------------------------------------------------------------
4384: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4385:
4386: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4387: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4388:
4382: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4383: ---------------------------------------------------------------------------------------------------------------
4384: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4385:
4386: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4387: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4388:
4389: IF xla_accounting_cache_pkg.GetValueChar
4390: (p_source_code => 'LEDGER_CATEGORY_CODE'
4383: ---------------------------------------------------------------------------------------------------------------
4384: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4385:
4386: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4387: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4388:
4389: IF xla_accounting_cache_pkg.GetValueChar
4390: (p_source_code => 'LEDGER_CATEGORY_CODE'
4391: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4394: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4395: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4396: )
4397: THEN
4398: xla_ae_lines_pkg.BflowUpgEntry
4399: (p_business_method_code => l_bflow_method_code
4400: ,p_business_class_code => l_bflow_class_code
4401: ,p_balance_type => l_balance_type_code);
4402: ELSE
4434: , x_value_type_code => l_adr_value_type_code
4435: , p_side => 'NA'
4436: );
4437:
4438: xla_ae_lines_pkg.set_ccid(
4439: p_code_combination_id => l_ccid
4440: , p_value_type_code => l_adr_value_type_code
4441: , p_transaction_coa_id => l_adr_transaction_coa_id
4442: , p_accounting_coa_id => l_adr_accounting_coa_id
4470: xla_accounting_err_pkg.build_message
4471: (p_appli_s_name => 'XLA'
4472: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
4473: ,p_token_1 => 'LINE_NUMBER'
4474: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
4475: ,p_token_2 => 'LINE_TYPE_NAME'
4476: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
4477: l_component_type
4478: ,l_component_code
4506: --
4507: --
4508: ------------------------------------------------------------------------------------------------
4509: -- 4219869 Business Flow
4510: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4511: -- Prior Entry. Currently, the following code is always generated.
4512: ------------------------------------------------------------------------------------------------
4513: XLA_AE_LINES_PKG.ValidateCurrentLine;
4514:
4509: -- 4219869 Business Flow
4510: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
4511: -- Prior Entry. Currently, the following code is always generated.
4512: ------------------------------------------------------------------------------------------------
4513: XLA_AE_LINES_PKG.ValidateCurrentLine;
4514:
4515: ------------------------------------------------------------------------------------
4516: -- 4219869 Business Flow
4517: -- Populated credit and debit amounts -- Need to generate this within IF
4515: ------------------------------------------------------------------------------------
4516: -- 4219869 Business Flow
4517: -- Populated credit and debit amounts -- Need to generate this within IF
4518: ------------------------------------------------------------------------------------
4519: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4520:
4521: ----------------------------------------------------------------------------------
4522: -- 4219869 Business Flow
4523: -- Update journal entry status -- Need to generate this within IF
4547: -- To allow MPA report to determine if it should generate report process
4548: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4549: ------------------------------------------------------------------------------------------
4550:
4551: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4552: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4553: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4554: -- call ADRs
4555: -- Bug 4922099
4548: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
4549: ------------------------------------------------------------------------------------------
4550:
4551: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
4552: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
4553: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
4554: -- call ADRs
4555: -- Bug 4922099
4556: --
4572: , x_value_type_code => l_adr_value_type_code
4573: , p_side => 'NA'
4574: );
4575:
4576: xla_ae_lines_pkg.set_ccid(
4577: p_code_combination_id => l_ccid
4578: , p_value_type_code => l_adr_value_type_code
4579: , p_transaction_coa_id => l_adr_transaction_coa_id
4580: , p_accounting_coa_id => l_adr_accounting_coa_id
4595:
4596: --
4597: -- Update the line information that should be overwritten
4598: --
4599: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4600: p_header_num => 1);
4601: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4602:
4603: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4597: -- Update the line information that should be overwritten
4598: --
4599: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4600: p_header_num => 1);
4601: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4602:
4603: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4604:
4605: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4599: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
4600: p_header_num => 1);
4601: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
4602:
4603: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4604:
4605: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4606: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4607: END IF;
4602:
4603: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
4604:
4605: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
4606: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
4607: END IF;
4608:
4609: --
4610: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4609: --
4610: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
4611: --
4612: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
4613: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
4614: ELSE
4615: ---------------------------------------------------------------------------------------------------
4616: -- 4262811a Switch Sign
4617: ---------------------------------------------------------------------------------------------------
4614: ELSE
4615: ---------------------------------------------------------------------------------------------------
4616: -- 4262811a Switch Sign
4617: ---------------------------------------------------------------------------------------------------
4618: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4615: ---------------------------------------------------------------------------------------------------
4616: -- 4262811a Switch Sign
4617: ---------------------------------------------------------------------------------------------------
4618: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4616: -- 4262811a Switch Sign
4617: ---------------------------------------------------------------------------------------------------
4618: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4624: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4617: ---------------------------------------------------------------------------------------------------
4618: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4624: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4625: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4618: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
4619: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4624: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4625: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4626:
4620: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4624: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4625: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4626:
4627: END IF;
4628:
4621: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
4622: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4623: -- 5132302
4624: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
4625: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
4626:
4627: END IF;
4628:
4629: -- 4955764
4626:
4627: END IF;
4628:
4629: -- 4955764
4630: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4631: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4632:
4633:
4634: XLA_AE_LINES_PKG.ValidateCurrentLine;
4630: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4631: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4632:
4633:
4634: XLA_AE_LINES_PKG.ValidateCurrentLine;
4635: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4636:
4637: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4638: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4631: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
4632:
4633:
4634: XLA_AE_LINES_PKG.ValidateCurrentLine;
4635: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
4636:
4637: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
4638: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
4639: ,p_balance_type_code => l_balance_type_code);
4766: --
4767: -- bulk performance
4768: --
4769: l_balance_type_code VARCHAR2(1);
4770: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
4771: l_log_module VARCHAR2(240);
4772:
4773: --
4774: -- Upgrade strategy
4836: ') = 'N'
4837: THEN
4838:
4839: --
4840: XLA_AE_LINES_PKG.SetNewLine;
4841:
4842: p_balance_type_code := l_balance_type_code;
4843: -- set the flag so later we will know whether the gain loss line needs to be created
4844:
4848:
4849: --
4850: -- bulk performance
4851: --
4852: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
4853: p_header_num => 0); -- 4262811
4854: --
4855: -- set accounting line options
4856: --
4853: p_header_num => 0); -- 4262811
4854: --
4855: -- set accounting line options
4856: --
4857: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
4858: p_natural_side_code => 'C'
4859: , p_gain_or_loss_flag => 'N'
4860: , p_gl_transfer_mode_code => 'S'
4861: , p_acct_entry_type_code => 'A'
4867: --
4868: --
4869: -- set accounting line type info
4870: --
4871: xla_ae_lines_pkg.SetAcctLineType
4872: (p_component_type => l_component_type
4873: ,p_event_type_code => l_event_type_code
4874: ,p_line_definition_owner_code => l_line_definition_owner_code
4875: ,p_line_definition_code => l_line_definition_code
4881: ,p_event_class_code => l_event_class_code);
4882: --
4883: -- set accounting class
4884: --
4885: xla_ae_lines_pkg.SetAcctClass(
4886: p_accounting_class_code => 'TAX'
4887: , p_ae_header_id => l_ae_header_id
4888: );
4889:
4889:
4890: --
4891: -- set rounding class
4892: --
4893: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4894: 'RECEIVABLE';
4895:
4896: --
4897: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4893: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
4894: 'RECEIVABLE';
4895:
4896: --
4897: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4898: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4899: --
4900: -- bulk performance
4901: --
4894: 'RECEIVABLE';
4895:
4896: --
4897: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
4898: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4899: --
4900: -- bulk performance
4901: --
4902: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4898: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
4899: --
4900: -- bulk performance
4901: --
4902: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4903:
4904: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4905: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4906:
4900: -- bulk performance
4901: --
4902: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
4903:
4904: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4905: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4906:
4907: -- 4955764
4908: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4904: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
4905: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
4906:
4907: -- 4955764
4908: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
4909: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
4910:
4911: -- 4458381 Public Sector Enh
4912:
4932: l_rec_acct_attrs.array_char_value(7) := p_source_15;
4933: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
4934: l_rec_acct_attrs.array_num_value(8) := p_source_16;
4935:
4936: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4937: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4938:
4939: ---------------------------------------------------------------------------------------------------------------
4940: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4933: l_rec_acct_attrs.array_acct_attr_code(8) := 'LEDGER_AMOUNT';
4934: l_rec_acct_attrs.array_num_value(8) := p_source_16;
4935:
4936: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4937: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4938:
4939: ---------------------------------------------------------------------------------------------------------------
4940: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4941: ---------------------------------------------------------------------------------------------------------------
4936: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
4937: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
4938:
4939: ---------------------------------------------------------------------------------------------------------------
4940: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4941: ---------------------------------------------------------------------------------------------------------------
4942: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4943:
4944: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4938:
4939: ---------------------------------------------------------------------------------------------------------------
4940: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4941: ---------------------------------------------------------------------------------------------------------------
4942: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4943:
4944: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4945: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4946:
4940: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
4941: ---------------------------------------------------------------------------------------------------------------
4942: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4943:
4944: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4945: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4946:
4947: IF xla_accounting_cache_pkg.GetValueChar
4948: (p_source_code => 'LEDGER_CATEGORY_CODE'
4941: ---------------------------------------------------------------------------------------------------------------
4942: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
4943:
4944: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4945: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
4946:
4947: IF xla_accounting_cache_pkg.GetValueChar
4948: (p_source_code => 'LEDGER_CATEGORY_CODE'
4949: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
4952: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
4953: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
4954: )
4955: THEN
4956: xla_ae_lines_pkg.BflowUpgEntry
4957: (p_business_method_code => l_bflow_method_code
4958: ,p_business_class_code => l_bflow_class_code
4959: ,p_balance_type => l_balance_type_code);
4960: ELSE
4992: , x_value_type_code => l_adr_value_type_code
4993: , p_side => 'NA'
4994: );
4995:
4996: xla_ae_lines_pkg.set_ccid(
4997: p_code_combination_id => l_ccid
4998: , p_value_type_code => l_adr_value_type_code
4999: , p_transaction_coa_id => l_adr_transaction_coa_id
5000: , p_accounting_coa_id => l_adr_accounting_coa_id
5028: xla_accounting_err_pkg.build_message
5029: (p_appli_s_name => 'XLA'
5030: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5031: ,p_token_1 => 'LINE_NUMBER'
5032: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5033: ,p_token_2 => 'LINE_TYPE_NAME'
5034: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5035: l_component_type
5036: ,l_component_code
5064: --
5065: --
5066: ------------------------------------------------------------------------------------------------
5067: -- 4219869 Business Flow
5068: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5069: -- Prior Entry. Currently, the following code is always generated.
5070: ------------------------------------------------------------------------------------------------
5071: XLA_AE_LINES_PKG.ValidateCurrentLine;
5072:
5067: -- 4219869 Business Flow
5068: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5069: -- Prior Entry. Currently, the following code is always generated.
5070: ------------------------------------------------------------------------------------------------
5071: XLA_AE_LINES_PKG.ValidateCurrentLine;
5072:
5073: ------------------------------------------------------------------------------------
5074: -- 4219869 Business Flow
5075: -- Populated credit and debit amounts -- Need to generate this within IF
5073: ------------------------------------------------------------------------------------
5074: -- 4219869 Business Flow
5075: -- Populated credit and debit amounts -- Need to generate this within IF
5076: ------------------------------------------------------------------------------------
5077: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5078:
5079: ----------------------------------------------------------------------------------
5080: -- 4219869 Business Flow
5081: -- Update journal entry status -- Need to generate this within IF
5105: -- To allow MPA report to determine if it should generate report process
5106: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5107: ------------------------------------------------------------------------------------------
5108:
5109: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5110: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5111: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5112: -- call ADRs
5113: -- Bug 4922099
5106: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5107: ------------------------------------------------------------------------------------------
5108:
5109: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5110: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5111: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5112: -- call ADRs
5113: -- Bug 4922099
5114: --
5130: , x_value_type_code => l_adr_value_type_code
5131: , p_side => 'NA'
5132: );
5133:
5134: xla_ae_lines_pkg.set_ccid(
5135: p_code_combination_id => l_ccid
5136: , p_value_type_code => l_adr_value_type_code
5137: , p_transaction_coa_id => l_adr_transaction_coa_id
5138: , p_accounting_coa_id => l_adr_accounting_coa_id
5153:
5154: --
5155: -- Update the line information that should be overwritten
5156: --
5157: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5158: p_header_num => 1);
5159: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5160:
5161: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5155: -- Update the line information that should be overwritten
5156: --
5157: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5158: p_header_num => 1);
5159: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5160:
5161: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5162:
5163: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5157: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5158: p_header_num => 1);
5159: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5160:
5161: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5162:
5163: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5164: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5165: END IF;
5160:
5161: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5162:
5163: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5164: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5165: END IF;
5166:
5167: --
5168: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5167: --
5168: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5169: --
5170: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5171: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5172: ELSE
5173: ---------------------------------------------------------------------------------------------------
5174: -- 4262811a Switch Sign
5175: ---------------------------------------------------------------------------------------------------
5172: ELSE
5173: ---------------------------------------------------------------------------------------------------
5174: -- 4262811a Switch Sign
5175: ---------------------------------------------------------------------------------------------------
5176: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5177: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5173: ---------------------------------------------------------------------------------------------------
5174: -- 4262811a Switch Sign
5175: ---------------------------------------------------------------------------------------------------
5176: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5177: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5174: -- 4262811a Switch Sign
5175: ---------------------------------------------------------------------------------------------------
5176: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5177: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5182: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5175: ---------------------------------------------------------------------------------------------------
5176: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5177: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5182: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5183: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5176: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5177: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5182: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5183: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5184:
5178: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5182: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5183: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5184:
5185: END IF;
5186:
5179: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5180: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5181: -- 5132302
5182: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5183: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5184:
5185: END IF;
5186:
5187: -- 4955764
5184:
5185: END IF;
5186:
5187: -- 4955764
5188: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5189: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5190:
5191:
5192: XLA_AE_LINES_PKG.ValidateCurrentLine;
5188: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5189: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5190:
5191:
5192: XLA_AE_LINES_PKG.ValidateCurrentLine;
5193: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5194:
5195: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5196: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5189: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5190:
5191:
5192: XLA_AE_LINES_PKG.ValidateCurrentLine;
5193: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5194:
5195: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5196: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5197: ,p_balance_type_code => l_balance_type_code);
5340: --
5341: -- bulk performance
5342: --
5343: l_balance_type_code VARCHAR2(1);
5344: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5345: l_log_module VARCHAR2(240);
5346:
5347: --
5348: -- Upgrade strategy
5410: ') = 'N'
5411: THEN
5412:
5413: --
5414: XLA_AE_LINES_PKG.SetNewLine;
5415:
5416: p_balance_type_code := l_balance_type_code;
5417: -- set the flag so later we will know whether the gain loss line needs to be created
5418:
5422:
5423: --
5424: -- bulk performance
5425: --
5426: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
5427: p_header_num => 0); -- 4262811
5428: --
5429: -- set accounting line options
5430: --
5427: p_header_num => 0); -- 4262811
5428: --
5429: -- set accounting line options
5430: --
5431: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
5432: p_natural_side_code => 'C'
5433: , p_gain_or_loss_flag => 'N'
5434: , p_gl_transfer_mode_code => 'S'
5435: , p_acct_entry_type_code => 'A'
5441: --
5442: --
5443: -- set accounting line type info
5444: --
5445: xla_ae_lines_pkg.SetAcctLineType
5446: (p_component_type => l_component_type
5447: ,p_event_type_code => l_event_type_code
5448: ,p_line_definition_owner_code => l_line_definition_owner_code
5449: ,p_line_definition_code => l_line_definition_code
5455: ,p_event_class_code => l_event_class_code);
5456: --
5457: -- set accounting class
5458: --
5459: xla_ae_lines_pkg.SetAcctClass(
5460: p_accounting_class_code => 'ACC'
5461: , p_ae_header_id => l_ae_header_id
5462: );
5463:
5463:
5464: --
5465: -- set rounding class
5466: --
5467: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5468: 'RECEIVABLE';
5469:
5470: --
5471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5467: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
5468: 'RECEIVABLE';
5469:
5470: --
5471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5473: --
5474: -- bulk performance
5475: --
5468: 'RECEIVABLE';
5469:
5470: --
5471: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
5472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5473: --
5474: -- bulk performance
5475: --
5476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5472: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
5473: --
5474: -- bulk performance
5475: --
5476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5477:
5478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5480:
5474: -- bulk performance
5475: --
5476: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
5477:
5478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5480:
5481: -- 4955764
5482: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5478: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
5479: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
5480:
5481: -- 4955764
5482: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5483: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
5484:
5485: -- 4458381 Public Sector Enh
5486:
5522: l_rec_acct_attrs.array_num_value(15) := p_source_27;
5523: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
5524: l_rec_acct_attrs.array_char_value(16) := p_source_28;
5525:
5526: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5527: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5528:
5529: ---------------------------------------------------------------------------------------------------------------
5530: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5523: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
5524: l_rec_acct_attrs.array_char_value(16) := p_source_28;
5525:
5526: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5527: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5528:
5529: ---------------------------------------------------------------------------------------------------------------
5530: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5531: ---------------------------------------------------------------------------------------------------------------
5526: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
5527: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
5528:
5529: ---------------------------------------------------------------------------------------------------------------
5530: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5531: ---------------------------------------------------------------------------------------------------------------
5532: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5533:
5534: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5528:
5529: ---------------------------------------------------------------------------------------------------------------
5530: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5531: ---------------------------------------------------------------------------------------------------------------
5532: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5533:
5534: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5535: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5536:
5530: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
5531: ---------------------------------------------------------------------------------------------------------------
5532: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5533:
5534: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5535: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5536:
5537: IF xla_accounting_cache_pkg.GetValueChar
5538: (p_source_code => 'LEDGER_CATEGORY_CODE'
5531: ---------------------------------------------------------------------------------------------------------------
5532: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
5533:
5534: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5535: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
5536:
5537: IF xla_accounting_cache_pkg.GetValueChar
5538: (p_source_code => 'LEDGER_CATEGORY_CODE'
5539: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
5542: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
5543: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
5544: )
5545: THEN
5546: xla_ae_lines_pkg.BflowUpgEntry
5547: (p_business_method_code => l_bflow_method_code
5548: ,p_business_class_code => l_bflow_class_code
5549: ,p_balance_type => l_balance_type_code);
5550: ELSE
5582: , x_value_type_code => l_adr_value_type_code
5583: , p_side => 'NA'
5584: );
5585:
5586: xla_ae_lines_pkg.set_ccid(
5587: p_code_combination_id => l_ccid
5588: , p_value_type_code => l_adr_value_type_code
5589: , p_transaction_coa_id => l_adr_transaction_coa_id
5590: , p_accounting_coa_id => l_adr_accounting_coa_id
5618: xla_accounting_err_pkg.build_message
5619: (p_appli_s_name => 'XLA'
5620: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
5621: ,p_token_1 => 'LINE_NUMBER'
5622: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
5623: ,p_token_2 => 'LINE_TYPE_NAME'
5624: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
5625: l_component_type
5626: ,l_component_code
5654: --
5655: --
5656: ------------------------------------------------------------------------------------------------
5657: -- 4219869 Business Flow
5658: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5659: -- Prior Entry. Currently, the following code is always generated.
5660: ------------------------------------------------------------------------------------------------
5661: XLA_AE_LINES_PKG.ValidateCurrentLine;
5662:
5657: -- 4219869 Business Flow
5658: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
5659: -- Prior Entry. Currently, the following code is always generated.
5660: ------------------------------------------------------------------------------------------------
5661: XLA_AE_LINES_PKG.ValidateCurrentLine;
5662:
5663: ------------------------------------------------------------------------------------
5664: -- 4219869 Business Flow
5665: -- Populated credit and debit amounts -- Need to generate this within IF
5663: ------------------------------------------------------------------------------------
5664: -- 4219869 Business Flow
5665: -- Populated credit and debit amounts -- Need to generate this within IF
5666: ------------------------------------------------------------------------------------
5667: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5668:
5669: ----------------------------------------------------------------------------------
5670: -- 4219869 Business Flow
5671: -- Update journal entry status -- Need to generate this within IF
5695: -- To allow MPA report to determine if it should generate report process
5696: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5697: ------------------------------------------------------------------------------------------
5698:
5699: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5700: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5701: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5702: -- call ADRs
5703: -- Bug 4922099
5696: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
5697: ------------------------------------------------------------------------------------------
5698:
5699: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
5700: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
5701: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
5702: -- call ADRs
5703: -- Bug 4922099
5704: --
5720: , x_value_type_code => l_adr_value_type_code
5721: , p_side => 'NA'
5722: );
5723:
5724: xla_ae_lines_pkg.set_ccid(
5725: p_code_combination_id => l_ccid
5726: , p_value_type_code => l_adr_value_type_code
5727: , p_transaction_coa_id => l_adr_transaction_coa_id
5728: , p_accounting_coa_id => l_adr_accounting_coa_id
5743:
5744: --
5745: -- Update the line information that should be overwritten
5746: --
5747: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5748: p_header_num => 1);
5749: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5750:
5751: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5745: -- Update the line information that should be overwritten
5746: --
5747: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5748: p_header_num => 1);
5749: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5750:
5751: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5752:
5753: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5747: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
5748: p_header_num => 1);
5749: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
5750:
5751: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5752:
5753: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5754: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5755: END IF;
5750:
5751: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
5752:
5753: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
5754: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
5755: END IF;
5756:
5757: --
5758: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5757: --
5758: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
5759: --
5760: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
5761: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
5762: ELSE
5763: ---------------------------------------------------------------------------------------------------
5764: -- 4262811a Switch Sign
5765: ---------------------------------------------------------------------------------------------------
5762: ELSE
5763: ---------------------------------------------------------------------------------------------------
5764: -- 4262811a Switch Sign
5765: ---------------------------------------------------------------------------------------------------
5766: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5767: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5763: ---------------------------------------------------------------------------------------------------
5764: -- 4262811a Switch Sign
5765: ---------------------------------------------------------------------------------------------------
5766: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5767: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5764: -- 4262811a Switch Sign
5765: ---------------------------------------------------------------------------------------------------
5766: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5767: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5772: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5765: ---------------------------------------------------------------------------------------------------
5766: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5767: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5772: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5773: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5766: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
5767: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5772: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5773: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5774:
5768: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5772: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5773: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5774:
5775: END IF;
5776:
5769: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
5770: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5771: -- 5132302
5772: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
5773: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
5774:
5775: END IF;
5776:
5777: -- 4955764
5774:
5775: END IF;
5776:
5777: -- 4955764
5778: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5779: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5780:
5781:
5782: XLA_AE_LINES_PKG.ValidateCurrentLine;
5778: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
5779: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5780:
5781:
5782: XLA_AE_LINES_PKG.ValidateCurrentLine;
5783: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5784:
5785: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5786: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5779: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
5780:
5781:
5782: XLA_AE_LINES_PKG.ValidateCurrentLine;
5783: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
5784:
5785: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
5786: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
5787: ,p_balance_type_code => l_balance_type_code);
5932: --
5933: -- bulk performance
5934: --
5935: l_balance_type_code VARCHAR2(1);
5936: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
5937: l_log_module VARCHAR2(240);
5938:
5939: --
5940: -- Upgrade strategy
6002: ') = 'FREIGHT')
6003: THEN
6004:
6005: --
6006: XLA_AE_LINES_PKG.SetNewLine;
6007:
6008: p_balance_type_code := l_balance_type_code;
6009: -- set the flag so later we will know whether the gain loss line needs to be created
6010:
6014:
6015: --
6016: -- bulk performance
6017: --
6018: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6019: p_header_num => 0); -- 4262811
6020: --
6021: -- set accounting line options
6022: --
6019: p_header_num => 0); -- 4262811
6020: --
6021: -- set accounting line options
6022: --
6023: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6024: p_natural_side_code => 'C'
6025: , p_gain_or_loss_flag => 'N'
6026: , p_gl_transfer_mode_code => 'S'
6027: , p_acct_entry_type_code => 'A'
6033: --
6034: --
6035: -- set accounting line type info
6036: --
6037: xla_ae_lines_pkg.SetAcctLineType
6038: (p_component_type => l_component_type
6039: ,p_event_type_code => l_event_type_code
6040: ,p_line_definition_owner_code => l_line_definition_owner_code
6041: ,p_line_definition_code => l_line_definition_code
6047: ,p_event_class_code => l_event_class_code);
6048: --
6049: -- set accounting class
6050: --
6051: xla_ae_lines_pkg.SetAcctClass(
6052: p_accounting_class_code => 'FREIGHT'
6053: , p_ae_header_id => l_ae_header_id
6054: );
6055:
6055:
6056: --
6057: -- set rounding class
6058: --
6059: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6060: 'RECEIVABLE';
6061:
6062: --
6063: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6059: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6060: 'RECEIVABLE';
6061:
6062: --
6063: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6064: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6065: --
6066: -- bulk performance
6067: --
6060: 'RECEIVABLE';
6061:
6062: --
6063: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6064: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6065: --
6066: -- bulk performance
6067: --
6068: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6064: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6065: --
6066: -- bulk performance
6067: --
6068: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6069:
6070: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6071: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6072:
6066: -- bulk performance
6067: --
6068: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6069:
6070: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6071: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6072:
6073: -- 4955764
6074: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6070: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6071: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6072:
6073: -- 4955764
6074: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6075: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6076:
6077: -- 4458381 Public Sector Enh
6078:
6114: l_rec_acct_attrs.array_num_value(15) := p_source_27;
6115: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
6116: l_rec_acct_attrs.array_char_value(16) := p_source_28;
6117:
6118: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6119: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6120:
6121: ---------------------------------------------------------------------------------------------------------------
6122: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6115: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
6116: l_rec_acct_attrs.array_char_value(16) := p_source_28;
6117:
6118: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6119: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6120:
6121: ---------------------------------------------------------------------------------------------------------------
6122: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6123: ---------------------------------------------------------------------------------------------------------------
6118: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6119: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6120:
6121: ---------------------------------------------------------------------------------------------------------------
6122: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6123: ---------------------------------------------------------------------------------------------------------------
6124: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6125:
6126: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6120:
6121: ---------------------------------------------------------------------------------------------------------------
6122: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6123: ---------------------------------------------------------------------------------------------------------------
6124: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6125:
6126: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6127: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6128:
6122: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6123: ---------------------------------------------------------------------------------------------------------------
6124: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6125:
6126: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6127: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6128:
6129: IF xla_accounting_cache_pkg.GetValueChar
6130: (p_source_code => 'LEDGER_CATEGORY_CODE'
6123: ---------------------------------------------------------------------------------------------------------------
6124: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6125:
6126: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6127: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6128:
6129: IF xla_accounting_cache_pkg.GetValueChar
6130: (p_source_code => 'LEDGER_CATEGORY_CODE'
6131: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6134: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6135: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6136: )
6137: THEN
6138: xla_ae_lines_pkg.BflowUpgEntry
6139: (p_business_method_code => l_bflow_method_code
6140: ,p_business_class_code => l_bflow_class_code
6141: ,p_balance_type => l_balance_type_code);
6142: ELSE
6175: , x_value_type_code => l_adr_value_type_code
6176: , p_side => 'NA'
6177: );
6178:
6179: xla_ae_lines_pkg.set_ccid(
6180: p_code_combination_id => l_ccid
6181: , p_value_type_code => l_adr_value_type_code
6182: , p_transaction_coa_id => l_adr_transaction_coa_id
6183: , p_accounting_coa_id => l_adr_accounting_coa_id
6211: xla_accounting_err_pkg.build_message
6212: (p_appli_s_name => 'XLA'
6213: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6214: ,p_token_1 => 'LINE_NUMBER'
6215: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6216: ,p_token_2 => 'LINE_TYPE_NAME'
6217: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6218: l_component_type
6219: ,l_component_code
6247: --
6248: --
6249: ------------------------------------------------------------------------------------------------
6250: -- 4219869 Business Flow
6251: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6252: -- Prior Entry. Currently, the following code is always generated.
6253: ------------------------------------------------------------------------------------------------
6254: XLA_AE_LINES_PKG.ValidateCurrentLine;
6255:
6250: -- 4219869 Business Flow
6251: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6252: -- Prior Entry. Currently, the following code is always generated.
6253: ------------------------------------------------------------------------------------------------
6254: XLA_AE_LINES_PKG.ValidateCurrentLine;
6255:
6256: ------------------------------------------------------------------------------------
6257: -- 4219869 Business Flow
6258: -- Populated credit and debit amounts -- Need to generate this within IF
6256: ------------------------------------------------------------------------------------
6257: -- 4219869 Business Flow
6258: -- Populated credit and debit amounts -- Need to generate this within IF
6259: ------------------------------------------------------------------------------------
6260: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6261:
6262: ----------------------------------------------------------------------------------
6263: -- 4219869 Business Flow
6264: -- Update journal entry status -- Need to generate this within IF
6288: -- To allow MPA report to determine if it should generate report process
6289: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6290: ------------------------------------------------------------------------------------------
6291:
6292: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6293: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6294: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6295: -- call ADRs
6296: -- Bug 4922099
6289: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6290: ------------------------------------------------------------------------------------------
6291:
6292: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6293: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6294: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6295: -- call ADRs
6296: -- Bug 4922099
6297: --
6314: , x_value_type_code => l_adr_value_type_code
6315: , p_side => 'NA'
6316: );
6317:
6318: xla_ae_lines_pkg.set_ccid(
6319: p_code_combination_id => l_ccid
6320: , p_value_type_code => l_adr_value_type_code
6321: , p_transaction_coa_id => l_adr_transaction_coa_id
6322: , p_accounting_coa_id => l_adr_accounting_coa_id
6337:
6338: --
6339: -- Update the line information that should be overwritten
6340: --
6341: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6342: p_header_num => 1);
6343: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6344:
6345: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6339: -- Update the line information that should be overwritten
6340: --
6341: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6342: p_header_num => 1);
6343: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6344:
6345: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6346:
6347: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6341: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6342: p_header_num => 1);
6343: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6344:
6345: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6346:
6347: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6348: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6349: END IF;
6344:
6345: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6346:
6347: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6348: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6349: END IF;
6350:
6351: --
6352: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6351: --
6352: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6353: --
6354: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6355: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6356: ELSE
6357: ---------------------------------------------------------------------------------------------------
6358: -- 4262811a Switch Sign
6359: ---------------------------------------------------------------------------------------------------
6356: ELSE
6357: ---------------------------------------------------------------------------------------------------
6358: -- 4262811a Switch Sign
6359: ---------------------------------------------------------------------------------------------------
6360: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6357: ---------------------------------------------------------------------------------------------------
6358: -- 4262811a Switch Sign
6359: ---------------------------------------------------------------------------------------------------
6360: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6358: -- 4262811a Switch Sign
6359: ---------------------------------------------------------------------------------------------------
6360: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6359: ---------------------------------------------------------------------------------------------------
6360: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6367: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6360: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6361: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6367: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6368:
6362: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6367: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6368:
6369: END IF;
6370:
6363: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6364: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6365: -- 5132302
6366: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6367: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6368:
6369: END IF;
6370:
6371: -- 4955764
6368:
6369: END IF;
6370:
6371: -- 4955764
6372: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6373: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6374:
6375:
6376: XLA_AE_LINES_PKG.ValidateCurrentLine;
6372: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6373: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6374:
6375:
6376: XLA_AE_LINES_PKG.ValidateCurrentLine;
6377: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6378:
6379: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6380: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6373: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6374:
6375:
6376: XLA_AE_LINES_PKG.ValidateCurrentLine;
6377: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6378:
6379: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6380: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6381: ,p_balance_type_code => l_balance_type_code);
6526: --
6527: -- bulk performance
6528: --
6529: l_balance_type_code VARCHAR2(1);
6530: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
6531: l_log_module VARCHAR2(240);
6532:
6533: --
6534: -- Upgrade strategy
6596: ') = 'REV'
6597: THEN
6598:
6599: --
6600: XLA_AE_LINES_PKG.SetNewLine;
6601:
6602: p_balance_type_code := l_balance_type_code;
6603: -- set the flag so later we will know whether the gain loss line needs to be created
6604:
6608:
6609: --
6610: -- bulk performance
6611: --
6612: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
6613: p_header_num => 0); -- 4262811
6614: --
6615: -- set accounting line options
6616: --
6613: p_header_num => 0); -- 4262811
6614: --
6615: -- set accounting line options
6616: --
6617: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
6618: p_natural_side_code => 'C'
6619: , p_gain_or_loss_flag => 'N'
6620: , p_gl_transfer_mode_code => 'S'
6621: , p_acct_entry_type_code => 'A'
6627: --
6628: --
6629: -- set accounting line type info
6630: --
6631: xla_ae_lines_pkg.SetAcctLineType
6632: (p_component_type => l_component_type
6633: ,p_event_type_code => l_event_type_code
6634: ,p_line_definition_owner_code => l_line_definition_owner_code
6635: ,p_line_definition_code => l_line_definition_code
6641: ,p_event_class_code => l_event_class_code);
6642: --
6643: -- set accounting class
6644: --
6645: xla_ae_lines_pkg.SetAcctClass(
6646: p_accounting_class_code => 'REVENUE'
6647: , p_ae_header_id => l_ae_header_id
6648: );
6649:
6649:
6650: --
6651: -- set rounding class
6652: --
6653: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6654: 'RECEIVABLE';
6655:
6656: --
6657: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6653: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
6654: 'RECEIVABLE';
6655:
6656: --
6657: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6658: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6659: --
6660: -- bulk performance
6661: --
6654: 'RECEIVABLE';
6655:
6656: --
6657: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
6658: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6659: --
6660: -- bulk performance
6661: --
6662: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6658: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
6659: --
6660: -- bulk performance
6661: --
6662: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6663:
6664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6665: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6666:
6660: -- bulk performance
6661: --
6662: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
6663:
6664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6665: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6666:
6667: -- 4955764
6668: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6664: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
6665: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
6666:
6667: -- 4955764
6668: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6669: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
6670:
6671: -- 4458381 Public Sector Enh
6672:
6708: l_rec_acct_attrs.array_num_value(15) := p_source_27;
6709: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
6710: l_rec_acct_attrs.array_char_value(16) := p_source_28;
6711:
6712: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6713: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6714:
6715: ---------------------------------------------------------------------------------------------------------------
6716: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6709: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
6710: l_rec_acct_attrs.array_char_value(16) := p_source_28;
6711:
6712: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6713: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6714:
6715: ---------------------------------------------------------------------------------------------------------------
6716: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6717: ---------------------------------------------------------------------------------------------------------------
6712: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
6713: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
6714:
6715: ---------------------------------------------------------------------------------------------------------------
6716: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6717: ---------------------------------------------------------------------------------------------------------------
6718: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6719:
6720: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6714:
6715: ---------------------------------------------------------------------------------------------------------------
6716: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6717: ---------------------------------------------------------------------------------------------------------------
6718: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6719:
6720: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6721: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6722:
6716: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
6717: ---------------------------------------------------------------------------------------------------------------
6718: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6719:
6720: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6721: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6722:
6723: IF xla_accounting_cache_pkg.GetValueChar
6724: (p_source_code => 'LEDGER_CATEGORY_CODE'
6717: ---------------------------------------------------------------------------------------------------------------
6718: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
6719:
6720: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6721: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
6722:
6723: IF xla_accounting_cache_pkg.GetValueChar
6724: (p_source_code => 'LEDGER_CATEGORY_CODE'
6725: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
6728: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
6729: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
6730: )
6731: THEN
6732: xla_ae_lines_pkg.BflowUpgEntry
6733: (p_business_method_code => l_bflow_method_code
6734: ,p_business_class_code => l_bflow_class_code
6735: ,p_balance_type => l_balance_type_code);
6736: ELSE
6769: , x_value_type_code => l_adr_value_type_code
6770: , p_side => 'NA'
6771: );
6772:
6773: xla_ae_lines_pkg.set_ccid(
6774: p_code_combination_id => l_ccid
6775: , p_value_type_code => l_adr_value_type_code
6776: , p_transaction_coa_id => l_adr_transaction_coa_id
6777: , p_accounting_coa_id => l_adr_accounting_coa_id
6805: xla_accounting_err_pkg.build_message
6806: (p_appli_s_name => 'XLA'
6807: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
6808: ,p_token_1 => 'LINE_NUMBER'
6809: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
6810: ,p_token_2 => 'LINE_TYPE_NAME'
6811: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
6812: l_component_type
6813: ,l_component_code
6841: --
6842: --
6843: ------------------------------------------------------------------------------------------------
6844: -- 4219869 Business Flow
6845: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6846: -- Prior Entry. Currently, the following code is always generated.
6847: ------------------------------------------------------------------------------------------------
6848: XLA_AE_LINES_PKG.ValidateCurrentLine;
6849:
6844: -- 4219869 Business Flow
6845: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
6846: -- Prior Entry. Currently, the following code is always generated.
6847: ------------------------------------------------------------------------------------------------
6848: XLA_AE_LINES_PKG.ValidateCurrentLine;
6849:
6850: ------------------------------------------------------------------------------------
6851: -- 4219869 Business Flow
6852: -- Populated credit and debit amounts -- Need to generate this within IF
6850: ------------------------------------------------------------------------------------
6851: -- 4219869 Business Flow
6852: -- Populated credit and debit amounts -- Need to generate this within IF
6853: ------------------------------------------------------------------------------------
6854: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6855:
6856: ----------------------------------------------------------------------------------
6857: -- 4219869 Business Flow
6858: -- Update journal entry status -- Need to generate this within IF
6882: -- To allow MPA report to determine if it should generate report process
6883: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6884: ------------------------------------------------------------------------------------------
6885:
6886: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6887: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6888: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6889: -- call ADRs
6890: -- Bug 4922099
6883: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
6884: ------------------------------------------------------------------------------------------
6885:
6886: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
6887: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
6888: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
6889: -- call ADRs
6890: -- Bug 4922099
6891: --
6908: , x_value_type_code => l_adr_value_type_code
6909: , p_side => 'NA'
6910: );
6911:
6912: xla_ae_lines_pkg.set_ccid(
6913: p_code_combination_id => l_ccid
6914: , p_value_type_code => l_adr_value_type_code
6915: , p_transaction_coa_id => l_adr_transaction_coa_id
6916: , p_accounting_coa_id => l_adr_accounting_coa_id
6931:
6932: --
6933: -- Update the line information that should be overwritten
6934: --
6935: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6936: p_header_num => 1);
6937: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6938:
6939: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6933: -- Update the line information that should be overwritten
6934: --
6935: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6936: p_header_num => 1);
6937: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6938:
6939: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6940:
6941: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6935: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
6936: p_header_num => 1);
6937: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
6938:
6939: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6940:
6941: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6942: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6943: END IF;
6938:
6939: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
6940:
6941: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
6942: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
6943: END IF;
6944:
6945: --
6946: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6945: --
6946: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
6947: --
6948: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
6949: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
6950: ELSE
6951: ---------------------------------------------------------------------------------------------------
6952: -- 4262811a Switch Sign
6953: ---------------------------------------------------------------------------------------------------
6950: ELSE
6951: ---------------------------------------------------------------------------------------------------
6952: -- 4262811a Switch Sign
6953: ---------------------------------------------------------------------------------------------------
6954: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6955: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6951: ---------------------------------------------------------------------------------------------------
6952: -- 4262811a Switch Sign
6953: ---------------------------------------------------------------------------------------------------
6954: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6955: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6952: -- 4262811a Switch Sign
6953: ---------------------------------------------------------------------------------------------------
6954: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6955: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6960: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6953: ---------------------------------------------------------------------------------------------------
6954: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6955: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6960: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6961: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6954: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
6955: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6960: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6961: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6962:
6956: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6960: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6961: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6962:
6963: END IF;
6964:
6957: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
6958: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6959: -- 5132302
6960: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
6961: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
6962:
6963: END IF;
6964:
6965: -- 4955764
6962:
6963: END IF;
6964:
6965: -- 4955764
6966: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6967: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6968:
6969:
6970: XLA_AE_LINES_PKG.ValidateCurrentLine;
6966: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
6967: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6968:
6969:
6970: XLA_AE_LINES_PKG.ValidateCurrentLine;
6971: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6972:
6973: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6974: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6967: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
6968:
6969:
6970: XLA_AE_LINES_PKG.ValidateCurrentLine;
6971: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
6972:
6973: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
6974: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
6975: ,p_balance_type_code => l_balance_type_code);
7120: --
7121: -- bulk performance
7122: --
7123: l_balance_type_code VARCHAR2(1);
7124: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7125: l_log_module VARCHAR2(240);
7126:
7127: --
7128: -- Upgrade strategy
7190: ') = 'ROUND')
7191: THEN
7192:
7193: --
7194: XLA_AE_LINES_PKG.SetNewLine;
7195:
7196: p_balance_type_code := l_balance_type_code;
7197: -- set the flag so later we will know whether the gain loss line needs to be created
7198:
7202:
7203: --
7204: -- bulk performance
7205: --
7206: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7207: p_header_num => 0); -- 4262811
7208: --
7209: -- set accounting line options
7210: --
7207: p_header_num => 0); -- 4262811
7208: --
7209: -- set accounting line options
7210: --
7211: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7212: p_natural_side_code => 'C'
7213: , p_gain_or_loss_flag => 'N'
7214: , p_gl_transfer_mode_code => 'S'
7215: , p_acct_entry_type_code => 'A'
7221: --
7222: --
7223: -- set accounting line type info
7224: --
7225: xla_ae_lines_pkg.SetAcctLineType
7226: (p_component_type => l_component_type
7227: ,p_event_type_code => l_event_type_code
7228: ,p_line_definition_owner_code => l_line_definition_owner_code
7229: ,p_line_definition_code => l_line_definition_code
7235: ,p_event_class_code => l_event_class_code);
7236: --
7237: -- set accounting class
7238: --
7239: xla_ae_lines_pkg.SetAcctClass(
7240: p_accounting_class_code => 'ROUNDING'
7241: , p_ae_header_id => l_ae_header_id
7242: );
7243:
7243:
7244: --
7245: -- set rounding class
7246: --
7247: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7248: 'RECEIVABLE';
7249:
7250: --
7251: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7247: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7248: 'RECEIVABLE';
7249:
7250: --
7251: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7252: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7253: --
7254: -- bulk performance
7255: --
7248: 'RECEIVABLE';
7249:
7250: --
7251: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7252: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7253: --
7254: -- bulk performance
7255: --
7256: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7252: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7253: --
7254: -- bulk performance
7255: --
7256: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7257:
7258: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7259: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7260:
7254: -- bulk performance
7255: --
7256: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7257:
7258: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7259: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7260:
7261: -- 4955764
7262: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7258: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7259: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7260:
7261: -- 4955764
7262: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7263: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7264:
7265: -- 4458381 Public Sector Enh
7266:
7302: l_rec_acct_attrs.array_num_value(15) := p_source_27;
7303: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
7304: l_rec_acct_attrs.array_char_value(16) := p_source_28;
7305:
7306: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7307: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7308:
7309: ---------------------------------------------------------------------------------------------------------------
7310: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7303: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
7304: l_rec_acct_attrs.array_char_value(16) := p_source_28;
7305:
7306: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7307: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7308:
7309: ---------------------------------------------------------------------------------------------------------------
7310: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7311: ---------------------------------------------------------------------------------------------------------------
7306: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7307: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7308:
7309: ---------------------------------------------------------------------------------------------------------------
7310: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7311: ---------------------------------------------------------------------------------------------------------------
7312: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7313:
7314: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7308:
7309: ---------------------------------------------------------------------------------------------------------------
7310: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7311: ---------------------------------------------------------------------------------------------------------------
7312: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7313:
7314: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7315: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7316:
7310: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7311: ---------------------------------------------------------------------------------------------------------------
7312: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7313:
7314: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7315: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7316:
7317: IF xla_accounting_cache_pkg.GetValueChar
7318: (p_source_code => 'LEDGER_CATEGORY_CODE'
7311: ---------------------------------------------------------------------------------------------------------------
7312: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7313:
7314: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7315: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7316:
7317: IF xla_accounting_cache_pkg.GetValueChar
7318: (p_source_code => 'LEDGER_CATEGORY_CODE'
7319: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7322: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7323: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7324: )
7325: THEN
7326: xla_ae_lines_pkg.BflowUpgEntry
7327: (p_business_method_code => l_bflow_method_code
7328: ,p_business_class_code => l_bflow_class_code
7329: ,p_balance_type => l_balance_type_code);
7330: ELSE
7363: , x_value_type_code => l_adr_value_type_code
7364: , p_side => 'NA'
7365: );
7366:
7367: xla_ae_lines_pkg.set_ccid(
7368: p_code_combination_id => l_ccid
7369: , p_value_type_code => l_adr_value_type_code
7370: , p_transaction_coa_id => l_adr_transaction_coa_id
7371: , p_accounting_coa_id => l_adr_accounting_coa_id
7399: xla_accounting_err_pkg.build_message
7400: (p_appli_s_name => 'XLA'
7401: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7402: ,p_token_1 => 'LINE_NUMBER'
7403: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7404: ,p_token_2 => 'LINE_TYPE_NAME'
7405: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
7406: l_component_type
7407: ,l_component_code
7435: --
7436: --
7437: ------------------------------------------------------------------------------------------------
7438: -- 4219869 Business Flow
7439: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7440: -- Prior Entry. Currently, the following code is always generated.
7441: ------------------------------------------------------------------------------------------------
7442: XLA_AE_LINES_PKG.ValidateCurrentLine;
7443:
7438: -- 4219869 Business Flow
7439: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
7440: -- Prior Entry. Currently, the following code is always generated.
7441: ------------------------------------------------------------------------------------------------
7442: XLA_AE_LINES_PKG.ValidateCurrentLine;
7443:
7444: ------------------------------------------------------------------------------------
7445: -- 4219869 Business Flow
7446: -- Populated credit and debit amounts -- Need to generate this within IF
7444: ------------------------------------------------------------------------------------
7445: -- 4219869 Business Flow
7446: -- Populated credit and debit amounts -- Need to generate this within IF
7447: ------------------------------------------------------------------------------------
7448: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7449:
7450: ----------------------------------------------------------------------------------
7451: -- 4219869 Business Flow
7452: -- Update journal entry status -- Need to generate this within IF
7476: -- To allow MPA report to determine if it should generate report process
7477: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7478: ------------------------------------------------------------------------------------------
7479:
7480: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7481: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7482: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7483: -- call ADRs
7484: -- Bug 4922099
7477: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
7478: ------------------------------------------------------------------------------------------
7479:
7480: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
7481: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
7482: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
7483: -- call ADRs
7484: -- Bug 4922099
7485: --
7502: , x_value_type_code => l_adr_value_type_code
7503: , p_side => 'NA'
7504: );
7505:
7506: xla_ae_lines_pkg.set_ccid(
7507: p_code_combination_id => l_ccid
7508: , p_value_type_code => l_adr_value_type_code
7509: , p_transaction_coa_id => l_adr_transaction_coa_id
7510: , p_accounting_coa_id => l_adr_accounting_coa_id
7525:
7526: --
7527: -- Update the line information that should be overwritten
7528: --
7529: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7530: p_header_num => 1);
7531: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7532:
7533: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7527: -- Update the line information that should be overwritten
7528: --
7529: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7530: p_header_num => 1);
7531: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7532:
7533: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7534:
7535: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7529: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
7530: p_header_num => 1);
7531: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
7532:
7533: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7534:
7535: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7536: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7537: END IF;
7532:
7533: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
7534:
7535: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
7536: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
7537: END IF;
7538:
7539: --
7540: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7539: --
7540: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
7541: --
7542: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
7543: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
7544: ELSE
7545: ---------------------------------------------------------------------------------------------------
7546: -- 4262811a Switch Sign
7547: ---------------------------------------------------------------------------------------------------
7544: ELSE
7545: ---------------------------------------------------------------------------------------------------
7546: -- 4262811a Switch Sign
7547: ---------------------------------------------------------------------------------------------------
7548: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7549: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7545: ---------------------------------------------------------------------------------------------------
7546: -- 4262811a Switch Sign
7547: ---------------------------------------------------------------------------------------------------
7548: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7549: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7546: -- 4262811a Switch Sign
7547: ---------------------------------------------------------------------------------------------------
7548: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7549: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7554: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7547: ---------------------------------------------------------------------------------------------------
7548: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7549: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7554: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7555: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7548: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
7549: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7554: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7555: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7556:
7550: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7554: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7555: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7556:
7557: END IF;
7558:
7551: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
7552: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7553: -- 5132302
7554: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
7555: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
7556:
7557: END IF;
7558:
7559: -- 4955764
7556:
7557: END IF;
7558:
7559: -- 4955764
7560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7561: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7562:
7563:
7564: XLA_AE_LINES_PKG.ValidateCurrentLine;
7560: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7561: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7562:
7563:
7564: XLA_AE_LINES_PKG.ValidateCurrentLine;
7565: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7566:
7567: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7568: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7561: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
7562:
7563:
7564: XLA_AE_LINES_PKG.ValidateCurrentLine;
7565: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
7566:
7567: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
7568: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
7569: ,p_balance_type_code => l_balance_type_code);
7714: --
7715: -- bulk performance
7716: --
7717: l_balance_type_code VARCHAR2(1);
7718: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
7719: l_log_module VARCHAR2(240);
7720:
7721: --
7722: -- Upgrade strategy
7784: ') = 'SUSPENSE'
7785: THEN
7786:
7787: --
7788: XLA_AE_LINES_PKG.SetNewLine;
7789:
7790: p_balance_type_code := l_balance_type_code;
7791: -- set the flag so later we will know whether the gain loss line needs to be created
7792:
7796:
7797: --
7798: -- bulk performance
7799: --
7800: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
7801: p_header_num => 0); -- 4262811
7802: --
7803: -- set accounting line options
7804: --
7801: p_header_num => 0); -- 4262811
7802: --
7803: -- set accounting line options
7804: --
7805: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
7806: p_natural_side_code => 'C'
7807: , p_gain_or_loss_flag => 'N'
7808: , p_gl_transfer_mode_code => 'S'
7809: , p_acct_entry_type_code => 'A'
7815: --
7816: --
7817: -- set accounting line type info
7818: --
7819: xla_ae_lines_pkg.SetAcctLineType
7820: (p_component_type => l_component_type
7821: ,p_event_type_code => l_event_type_code
7822: ,p_line_definition_owner_code => l_line_definition_owner_code
7823: ,p_line_definition_code => l_line_definition_code
7829: ,p_event_class_code => l_event_class_code);
7830: --
7831: -- set accounting class
7832: --
7833: xla_ae_lines_pkg.SetAcctClass(
7834: p_accounting_class_code => 'UNEARNED_REVENUE'
7835: , p_ae_header_id => l_ae_header_id
7836: );
7837:
7837:
7838: --
7839: -- set rounding class
7840: --
7841: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: 'RECEIVABLE';
7843:
7844: --
7845: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7841: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
7842: 'RECEIVABLE';
7843:
7844: --
7845: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7846: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7847: --
7848: -- bulk performance
7849: --
7842: 'RECEIVABLE';
7843:
7844: --
7845: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
7846: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7847: --
7848: -- bulk performance
7849: --
7850: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7846: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
7847: --
7848: -- bulk performance
7849: --
7850: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7851:
7852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7853: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7854:
7848: -- bulk performance
7849: --
7850: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
7851:
7852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7853: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7854:
7855: -- 4955764
7856: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
7853: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
7854:
7855: -- 4955764
7856: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
7857: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
7858:
7859: -- 4458381 Public Sector Enh
7860:
7896: l_rec_acct_attrs.array_num_value(15) := p_source_27;
7897: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
7898: l_rec_acct_attrs.array_char_value(16) := p_source_28;
7899:
7900: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7901: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7902:
7903: ---------------------------------------------------------------------------------------------------------------
7904: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7897: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
7898: l_rec_acct_attrs.array_char_value(16) := p_source_28;
7899:
7900: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7901: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7902:
7903: ---------------------------------------------------------------------------------------------------------------
7904: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7905: ---------------------------------------------------------------------------------------------------------------
7900: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
7901: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
7902:
7903: ---------------------------------------------------------------------------------------------------------------
7904: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7905: ---------------------------------------------------------------------------------------------------------------
7906: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7907:
7908: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7902:
7903: ---------------------------------------------------------------------------------------------------------------
7904: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7905: ---------------------------------------------------------------------------------------------------------------
7906: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7907:
7908: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7909: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7910:
7904: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
7905: ---------------------------------------------------------------------------------------------------------------
7906: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7907:
7908: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7909: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7910:
7911: IF xla_accounting_cache_pkg.GetValueChar
7912: (p_source_code => 'LEDGER_CATEGORY_CODE'
7905: ---------------------------------------------------------------------------------------------------------------
7906: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
7907:
7908: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7909: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
7910:
7911: IF xla_accounting_cache_pkg.GetValueChar
7912: (p_source_code => 'LEDGER_CATEGORY_CODE'
7913: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
7916: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
7917: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
7918: )
7919: THEN
7920: xla_ae_lines_pkg.BflowUpgEntry
7921: (p_business_method_code => l_bflow_method_code
7922: ,p_business_class_code => l_bflow_class_code
7923: ,p_balance_type => l_balance_type_code);
7924: ELSE
7957: , x_value_type_code => l_adr_value_type_code
7958: , p_side => 'NA'
7959: );
7960:
7961: xla_ae_lines_pkg.set_ccid(
7962: p_code_combination_id => l_ccid
7963: , p_value_type_code => l_adr_value_type_code
7964: , p_transaction_coa_id => l_adr_transaction_coa_id
7965: , p_accounting_coa_id => l_adr_accounting_coa_id
7993: xla_accounting_err_pkg.build_message
7994: (p_appli_s_name => 'XLA'
7995: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
7996: ,p_token_1 => 'LINE_NUMBER'
7997: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
7998: ,p_token_2 => 'LINE_TYPE_NAME'
7999: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8000: l_component_type
8001: ,l_component_code
8029: --
8030: --
8031: ------------------------------------------------------------------------------------------------
8032: -- 4219869 Business Flow
8033: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8034: -- Prior Entry. Currently, the following code is always generated.
8035: ------------------------------------------------------------------------------------------------
8036: XLA_AE_LINES_PKG.ValidateCurrentLine;
8037:
8032: -- 4219869 Business Flow
8033: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8034: -- Prior Entry. Currently, the following code is always generated.
8035: ------------------------------------------------------------------------------------------------
8036: XLA_AE_LINES_PKG.ValidateCurrentLine;
8037:
8038: ------------------------------------------------------------------------------------
8039: -- 4219869 Business Flow
8040: -- Populated credit and debit amounts -- Need to generate this within IF
8038: ------------------------------------------------------------------------------------
8039: -- 4219869 Business Flow
8040: -- Populated credit and debit amounts -- Need to generate this within IF
8041: ------------------------------------------------------------------------------------
8042: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8043:
8044: ----------------------------------------------------------------------------------
8045: -- 4219869 Business Flow
8046: -- Update journal entry status -- Need to generate this within IF
8070: -- To allow MPA report to determine if it should generate report process
8071: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8072: ------------------------------------------------------------------------------------------
8073:
8074: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8075: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8076: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8077: -- call ADRs
8078: -- Bug 4922099
8071: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8072: ------------------------------------------------------------------------------------------
8073:
8074: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8075: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8076: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8077: -- call ADRs
8078: -- Bug 4922099
8079: --
8096: , x_value_type_code => l_adr_value_type_code
8097: , p_side => 'NA'
8098: );
8099:
8100: xla_ae_lines_pkg.set_ccid(
8101: p_code_combination_id => l_ccid
8102: , p_value_type_code => l_adr_value_type_code
8103: , p_transaction_coa_id => l_adr_transaction_coa_id
8104: , p_accounting_coa_id => l_adr_accounting_coa_id
8119:
8120: --
8121: -- Update the line information that should be overwritten
8122: --
8123: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8124: p_header_num => 1);
8125: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8126:
8127: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8121: -- Update the line information that should be overwritten
8122: --
8123: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8124: p_header_num => 1);
8125: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8126:
8127: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8128:
8129: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8123: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8124: p_header_num => 1);
8125: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8126:
8127: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8128:
8129: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8130: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8131: END IF;
8126:
8127: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8128:
8129: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8130: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8131: END IF;
8132:
8133: --
8134: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8133: --
8134: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8135: --
8136: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8137: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8138: ELSE
8139: ---------------------------------------------------------------------------------------------------
8140: -- 4262811a Switch Sign
8141: ---------------------------------------------------------------------------------------------------
8138: ELSE
8139: ---------------------------------------------------------------------------------------------------
8140: -- 4262811a Switch Sign
8141: ---------------------------------------------------------------------------------------------------
8142: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8143: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8139: ---------------------------------------------------------------------------------------------------
8140: -- 4262811a Switch Sign
8141: ---------------------------------------------------------------------------------------------------
8142: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8143: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8140: -- 4262811a Switch Sign
8141: ---------------------------------------------------------------------------------------------------
8142: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8143: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8148: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8141: ---------------------------------------------------------------------------------------------------
8142: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8143: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8148: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8142: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8143: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8148: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8150:
8144: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8148: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8150:
8151: END IF;
8152:
8145: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8146: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8147: -- 5132302
8148: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8149: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8150:
8151: END IF;
8152:
8153: -- 4955764
8150:
8151: END IF;
8152:
8153: -- 4955764
8154: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8155: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8156:
8157:
8158: XLA_AE_LINES_PKG.ValidateCurrentLine;
8154: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8155: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8156:
8157:
8158: XLA_AE_LINES_PKG.ValidateCurrentLine;
8159: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8160:
8161: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8162: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8155: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8156:
8157:
8158: XLA_AE_LINES_PKG.ValidateCurrentLine;
8159: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8160:
8161: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8162: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8163: ,p_balance_type_code => l_balance_type_code);
8308: --
8309: -- bulk performance
8310: --
8311: l_balance_type_code VARCHAR2(1);
8312: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8313: l_log_module VARCHAR2(240);
8314:
8315: --
8316: -- Upgrade strategy
8378: ') = 'TAX')
8379: THEN
8380:
8381: --
8382: XLA_AE_LINES_PKG.SetNewLine;
8383:
8384: p_balance_type_code := l_balance_type_code;
8385: -- set the flag so later we will know whether the gain loss line needs to be created
8386:
8390:
8391: --
8392: -- bulk performance
8393: --
8394: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8395: p_header_num => 0); -- 4262811
8396: --
8397: -- set accounting line options
8398: --
8395: p_header_num => 0); -- 4262811
8396: --
8397: -- set accounting line options
8398: --
8399: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8400: p_natural_side_code => 'C'
8401: , p_gain_or_loss_flag => 'N'
8402: , p_gl_transfer_mode_code => 'S'
8403: , p_acct_entry_type_code => 'A'
8409: --
8410: --
8411: -- set accounting line type info
8412: --
8413: xla_ae_lines_pkg.SetAcctLineType
8414: (p_component_type => l_component_type
8415: ,p_event_type_code => l_event_type_code
8416: ,p_line_definition_owner_code => l_line_definition_owner_code
8417: ,p_line_definition_code => l_line_definition_code
8423: ,p_event_class_code => l_event_class_code);
8424: --
8425: -- set accounting class
8426: --
8427: xla_ae_lines_pkg.SetAcctClass(
8428: p_accounting_class_code => 'TAX'
8429: , p_ae_header_id => l_ae_header_id
8430: );
8431:
8431:
8432: --
8433: -- set rounding class
8434: --
8435: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8436: 'RECEIVABLE';
8437:
8438: --
8439: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8435: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
8436: 'RECEIVABLE';
8437:
8438: --
8439: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8440: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8441: --
8442: -- bulk performance
8443: --
8436: 'RECEIVABLE';
8437:
8438: --
8439: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
8440: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8441: --
8442: -- bulk performance
8443: --
8444: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8440: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
8441: --
8442: -- bulk performance
8443: --
8444: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8445:
8446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8447: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8448:
8442: -- bulk performance
8443: --
8444: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
8445:
8446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8447: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8448:
8449: -- 4955764
8450: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
8447: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
8448:
8449: -- 4955764
8450: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8451: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
8452:
8453: -- 4458381 Public Sector Enh
8454:
8490: l_rec_acct_attrs.array_num_value(15) := p_source_27;
8491: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
8492: l_rec_acct_attrs.array_char_value(16) := p_source_28;
8493:
8494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8496:
8497: ---------------------------------------------------------------------------------------------------------------
8498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8491: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
8492: l_rec_acct_attrs.array_char_value(16) := p_source_28;
8493:
8494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8496:
8497: ---------------------------------------------------------------------------------------------------------------
8498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8499: ---------------------------------------------------------------------------------------------------------------
8494: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
8495: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
8496:
8497: ---------------------------------------------------------------------------------------------------------------
8498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8499: ---------------------------------------------------------------------------------------------------------------
8500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8501:
8502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8496:
8497: ---------------------------------------------------------------------------------------------------------------
8498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8499: ---------------------------------------------------------------------------------------------------------------
8500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8501:
8502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8504:
8498: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
8499: ---------------------------------------------------------------------------------------------------------------
8500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8501:
8502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8504:
8505: IF xla_accounting_cache_pkg.GetValueChar
8506: (p_source_code => 'LEDGER_CATEGORY_CODE'
8499: ---------------------------------------------------------------------------------------------------------------
8500: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
8501:
8502: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8503: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
8504:
8505: IF xla_accounting_cache_pkg.GetValueChar
8506: (p_source_code => 'LEDGER_CATEGORY_CODE'
8507: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
8510: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
8511: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
8512: )
8513: THEN
8514: xla_ae_lines_pkg.BflowUpgEntry
8515: (p_business_method_code => l_bflow_method_code
8516: ,p_business_class_code => l_bflow_class_code
8517: ,p_balance_type => l_balance_type_code);
8518: ELSE
8551: , x_value_type_code => l_adr_value_type_code
8552: , p_side => 'NA'
8553: );
8554:
8555: xla_ae_lines_pkg.set_ccid(
8556: p_code_combination_id => l_ccid
8557: , p_value_type_code => l_adr_value_type_code
8558: , p_transaction_coa_id => l_adr_transaction_coa_id
8559: , p_accounting_coa_id => l_adr_accounting_coa_id
8587: xla_accounting_err_pkg.build_message
8588: (p_appli_s_name => 'XLA'
8589: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
8590: ,p_token_1 => 'LINE_NUMBER'
8591: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
8592: ,p_token_2 => 'LINE_TYPE_NAME'
8593: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
8594: l_component_type
8595: ,l_component_code
8623: --
8624: --
8625: ------------------------------------------------------------------------------------------------
8626: -- 4219869 Business Flow
8627: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8628: -- Prior Entry. Currently, the following code is always generated.
8629: ------------------------------------------------------------------------------------------------
8630: XLA_AE_LINES_PKG.ValidateCurrentLine;
8631:
8626: -- 4219869 Business Flow
8627: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
8628: -- Prior Entry. Currently, the following code is always generated.
8629: ------------------------------------------------------------------------------------------------
8630: XLA_AE_LINES_PKG.ValidateCurrentLine;
8631:
8632: ------------------------------------------------------------------------------------
8633: -- 4219869 Business Flow
8634: -- Populated credit and debit amounts -- Need to generate this within IF
8632: ------------------------------------------------------------------------------------
8633: -- 4219869 Business Flow
8634: -- Populated credit and debit amounts -- Need to generate this within IF
8635: ------------------------------------------------------------------------------------
8636: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8637:
8638: ----------------------------------------------------------------------------------
8639: -- 4219869 Business Flow
8640: -- Update journal entry status -- Need to generate this within IF
8664: -- To allow MPA report to determine if it should generate report process
8665: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8666: ------------------------------------------------------------------------------------------
8667:
8668: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8669: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8670: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8671: -- call ADRs
8672: -- Bug 4922099
8665: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
8666: ------------------------------------------------------------------------------------------
8667:
8668: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
8669: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
8670: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
8671: -- call ADRs
8672: -- Bug 4922099
8673: --
8690: , x_value_type_code => l_adr_value_type_code
8691: , p_side => 'NA'
8692: );
8693:
8694: xla_ae_lines_pkg.set_ccid(
8695: p_code_combination_id => l_ccid
8696: , p_value_type_code => l_adr_value_type_code
8697: , p_transaction_coa_id => l_adr_transaction_coa_id
8698: , p_accounting_coa_id => l_adr_accounting_coa_id
8713:
8714: --
8715: -- Update the line information that should be overwritten
8716: --
8717: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8718: p_header_num => 1);
8719: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8720:
8721: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8715: -- Update the line information that should be overwritten
8716: --
8717: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8718: p_header_num => 1);
8719: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8720:
8721: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8722:
8723: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8717: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
8718: p_header_num => 1);
8719: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
8720:
8721: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8722:
8723: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8724: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8725: END IF;
8720:
8721: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
8722:
8723: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
8724: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
8725: END IF;
8726:
8727: --
8728: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8727: --
8728: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
8729: --
8730: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
8731: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
8732: ELSE
8733: ---------------------------------------------------------------------------------------------------
8734: -- 4262811a Switch Sign
8735: ---------------------------------------------------------------------------------------------------
8732: ELSE
8733: ---------------------------------------------------------------------------------------------------
8734: -- 4262811a Switch Sign
8735: ---------------------------------------------------------------------------------------------------
8736: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8737: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8733: ---------------------------------------------------------------------------------------------------
8734: -- 4262811a Switch Sign
8735: ---------------------------------------------------------------------------------------------------
8736: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8737: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8734: -- 4262811a Switch Sign
8735: ---------------------------------------------------------------------------------------------------
8736: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8737: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8742: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8735: ---------------------------------------------------------------------------------------------------
8736: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8737: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8742: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8736: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
8737: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8742: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8744:
8738: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8742: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8744:
8745: END IF;
8746:
8739: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
8740: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8741: -- 5132302
8742: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
8743: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
8744:
8745: END IF;
8746:
8747: -- 4955764
8744:
8745: END IF;
8746:
8747: -- 4955764
8748: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8749: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8750:
8751:
8752: XLA_AE_LINES_PKG.ValidateCurrentLine;
8748: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
8749: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8750:
8751:
8752: XLA_AE_LINES_PKG.ValidateCurrentLine;
8753: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8754:
8755: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8756: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8749: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
8750:
8751:
8752: XLA_AE_LINES_PKG.ValidateCurrentLine;
8753: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
8754:
8755: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
8756: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
8757: ,p_balance_type_code => l_balance_type_code);
8902: --
8903: -- bulk performance
8904: --
8905: l_balance_type_code VARCHAR2(1);
8906: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
8907: l_log_module VARCHAR2(240);
8908:
8909: --
8910: -- Upgrade strategy
8972: ') = 'UNBILL'
8973: THEN
8974:
8975: --
8976: XLA_AE_LINES_PKG.SetNewLine;
8977:
8978: p_balance_type_code := l_balance_type_code;
8979: -- set the flag so later we will know whether the gain loss line needs to be created
8980:
8984:
8985: --
8986: -- bulk performance
8987: --
8988: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
8989: p_header_num => 0); -- 4262811
8990: --
8991: -- set accounting line options
8992: --
8989: p_header_num => 0); -- 4262811
8990: --
8991: -- set accounting line options
8992: --
8993: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
8994: p_natural_side_code => 'C'
8995: , p_gain_or_loss_flag => 'N'
8996: , p_gl_transfer_mode_code => 'S'
8997: , p_acct_entry_type_code => 'A'
9003: --
9004: --
9005: -- set accounting line type info
9006: --
9007: xla_ae_lines_pkg.SetAcctLineType
9008: (p_component_type => l_component_type
9009: ,p_event_type_code => l_event_type_code
9010: ,p_line_definition_owner_code => l_line_definition_owner_code
9011: ,p_line_definition_code => l_line_definition_code
9017: ,p_event_class_code => l_event_class_code);
9018: --
9019: -- set accounting class
9020: --
9021: xla_ae_lines_pkg.SetAcctClass(
9022: p_accounting_class_code => 'UNBILL'
9023: , p_ae_header_id => l_ae_header_id
9024: );
9025:
9025:
9026: --
9027: -- set rounding class
9028: --
9029: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9030: 'RECEIVABLE';
9031:
9032: --
9033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9029: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9030: 'RECEIVABLE';
9031:
9032: --
9033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9035: --
9036: -- bulk performance
9037: --
9030: 'RECEIVABLE';
9031:
9032: --
9033: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9035: --
9036: -- bulk performance
9037: --
9038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9034: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9035: --
9036: -- bulk performance
9037: --
9038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9042:
9036: -- bulk performance
9037: --
9038: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9039:
9040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9042:
9043: -- 4955764
9044: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9040: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9041: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9042:
9043: -- 4955764
9044: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9045: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9046:
9047: -- 4458381 Public Sector Enh
9048:
9084: l_rec_acct_attrs.array_num_value(15) := p_source_27;
9085: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
9086: l_rec_acct_attrs.array_char_value(16) := p_source_28;
9087:
9088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9090:
9091: ---------------------------------------------------------------------------------------------------------------
9092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9085: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
9086: l_rec_acct_attrs.array_char_value(16) := p_source_28;
9087:
9088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9090:
9091: ---------------------------------------------------------------------------------------------------------------
9092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9093: ---------------------------------------------------------------------------------------------------------------
9088: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9089: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9090:
9091: ---------------------------------------------------------------------------------------------------------------
9092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9093: ---------------------------------------------------------------------------------------------------------------
9094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9095:
9096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9090:
9091: ---------------------------------------------------------------------------------------------------------------
9092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9093: ---------------------------------------------------------------------------------------------------------------
9094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9095:
9096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098:
9092: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9093: ---------------------------------------------------------------------------------------------------------------
9094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9095:
9096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098:
9099: IF xla_accounting_cache_pkg.GetValueChar
9100: (p_source_code => 'LEDGER_CATEGORY_CODE'
9093: ---------------------------------------------------------------------------------------------------------------
9094: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9095:
9096: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9097: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9098:
9099: IF xla_accounting_cache_pkg.GetValueChar
9100: (p_source_code => 'LEDGER_CATEGORY_CODE'
9101: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9104: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9105: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9106: )
9107: THEN
9108: xla_ae_lines_pkg.BflowUpgEntry
9109: (p_business_method_code => l_bflow_method_code
9110: ,p_business_class_code => l_bflow_class_code
9111: ,p_balance_type => l_balance_type_code);
9112: ELSE
9145: , x_value_type_code => l_adr_value_type_code
9146: , p_side => 'NA'
9147: );
9148:
9149: xla_ae_lines_pkg.set_ccid(
9150: p_code_combination_id => l_ccid
9151: , p_value_type_code => l_adr_value_type_code
9152: , p_transaction_coa_id => l_adr_transaction_coa_id
9153: , p_accounting_coa_id => l_adr_accounting_coa_id
9181: xla_accounting_err_pkg.build_message
9182: (p_appli_s_name => 'XLA'
9183: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9184: ,p_token_1 => 'LINE_NUMBER'
9185: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9186: ,p_token_2 => 'LINE_TYPE_NAME'
9187: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9188: l_component_type
9189: ,l_component_code
9217: --
9218: --
9219: ------------------------------------------------------------------------------------------------
9220: -- 4219869 Business Flow
9221: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9222: -- Prior Entry. Currently, the following code is always generated.
9223: ------------------------------------------------------------------------------------------------
9224: XLA_AE_LINES_PKG.ValidateCurrentLine;
9225:
9220: -- 4219869 Business Flow
9221: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9222: -- Prior Entry. Currently, the following code is always generated.
9223: ------------------------------------------------------------------------------------------------
9224: XLA_AE_LINES_PKG.ValidateCurrentLine;
9225:
9226: ------------------------------------------------------------------------------------
9227: -- 4219869 Business Flow
9228: -- Populated credit and debit amounts -- Need to generate this within IF
9226: ------------------------------------------------------------------------------------
9227: -- 4219869 Business Flow
9228: -- Populated credit and debit amounts -- Need to generate this within IF
9229: ------------------------------------------------------------------------------------
9230: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9231:
9232: ----------------------------------------------------------------------------------
9233: -- 4219869 Business Flow
9234: -- Update journal entry status -- Need to generate this within IF
9258: -- To allow MPA report to determine if it should generate report process
9259: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9260: ------------------------------------------------------------------------------------------
9261:
9262: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9263: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9264: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9265: -- call ADRs
9266: -- Bug 4922099
9259: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9260: ------------------------------------------------------------------------------------------
9261:
9262: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9263: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9264: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9265: -- call ADRs
9266: -- Bug 4922099
9267: --
9284: , x_value_type_code => l_adr_value_type_code
9285: , p_side => 'NA'
9286: );
9287:
9288: xla_ae_lines_pkg.set_ccid(
9289: p_code_combination_id => l_ccid
9290: , p_value_type_code => l_adr_value_type_code
9291: , p_transaction_coa_id => l_adr_transaction_coa_id
9292: , p_accounting_coa_id => l_adr_accounting_coa_id
9307:
9308: --
9309: -- Update the line information that should be overwritten
9310: --
9311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9312: p_header_num => 1);
9313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9314:
9315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9309: -- Update the line information that should be overwritten
9310: --
9311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9312: p_header_num => 1);
9313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9314:
9315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9316:
9317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9311: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9312: p_header_num => 1);
9313: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9314:
9315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9316:
9317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9318: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9319: END IF;
9314:
9315: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9316:
9317: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9318: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9319: END IF;
9320:
9321: --
9322: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9321: --
9322: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9323: --
9324: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9325: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9326: ELSE
9327: ---------------------------------------------------------------------------------------------------
9328: -- 4262811a Switch Sign
9329: ---------------------------------------------------------------------------------------------------
9326: ELSE
9327: ---------------------------------------------------------------------------------------------------
9328: -- 4262811a Switch Sign
9329: ---------------------------------------------------------------------------------------------------
9330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9327: ---------------------------------------------------------------------------------------------------
9328: -- 4262811a Switch Sign
9329: ---------------------------------------------------------------------------------------------------
9330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9328: -- 4262811a Switch Sign
9329: ---------------------------------------------------------------------------------------------------
9330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9329: ---------------------------------------------------------------------------------------------------
9330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9330: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9331: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9338:
9332: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9338:
9339: END IF;
9340:
9333: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9334: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9335: -- 5132302
9336: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9337: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9338:
9339: END IF;
9340:
9341: -- 4955764
9338:
9339: END IF;
9340:
9341: -- 4955764
9342: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9344:
9345:
9346: XLA_AE_LINES_PKG.ValidateCurrentLine;
9342: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9344:
9345:
9346: XLA_AE_LINES_PKG.ValidateCurrentLine;
9347: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9348:
9349: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9350: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9343: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9344:
9345:
9346: XLA_AE_LINES_PKG.ValidateCurrentLine;
9347: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9348:
9349: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9350: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9351: ,p_balance_type_code => l_balance_type_code);
9496: --
9497: -- bulk performance
9498: --
9499: l_balance_type_code VARCHAR2(1);
9500: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
9501: l_log_module VARCHAR2(240);
9502:
9503: --
9504: -- Upgrade strategy
9566: ') = 'UNEARN'
9567: THEN
9568:
9569: --
9570: XLA_AE_LINES_PKG.SetNewLine;
9571:
9572: p_balance_type_code := l_balance_type_code;
9573: -- set the flag so later we will know whether the gain loss line needs to be created
9574:
9578:
9579: --
9580: -- bulk performance
9581: --
9582: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
9583: p_header_num => 0); -- 4262811
9584: --
9585: -- set accounting line options
9586: --
9583: p_header_num => 0); -- 4262811
9584: --
9585: -- set accounting line options
9586: --
9587: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
9588: p_natural_side_code => 'C'
9589: , p_gain_or_loss_flag => 'N'
9590: , p_gl_transfer_mode_code => 'S'
9591: , p_acct_entry_type_code => 'A'
9597: --
9598: --
9599: -- set accounting line type info
9600: --
9601: xla_ae_lines_pkg.SetAcctLineType
9602: (p_component_type => l_component_type
9603: ,p_event_type_code => l_event_type_code
9604: ,p_line_definition_owner_code => l_line_definition_owner_code
9605: ,p_line_definition_code => l_line_definition_code
9611: ,p_event_class_code => l_event_class_code);
9612: --
9613: -- set accounting class
9614: --
9615: xla_ae_lines_pkg.SetAcctClass(
9616: p_accounting_class_code => 'UNEARNED_REVENUE'
9617: , p_ae_header_id => l_ae_header_id
9618: );
9619:
9619:
9620: --
9621: -- set rounding class
9622: --
9623: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9624: 'RECEIVABLE';
9625:
9626: --
9627: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9623: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
9624: 'RECEIVABLE';
9625:
9626: --
9627: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9628: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9629: --
9630: -- bulk performance
9631: --
9624: 'RECEIVABLE';
9625:
9626: --
9627: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
9628: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9629: --
9630: -- bulk performance
9631: --
9632: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9628: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
9629: --
9630: -- bulk performance
9631: --
9632: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9633:
9634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9635: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9636:
9630: -- bulk performance
9631: --
9632: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
9633:
9634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9635: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9636:
9637: -- 4955764
9638: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9634: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
9635: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
9636:
9637: -- 4955764
9638: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9639: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
9640:
9641: -- 4458381 Public Sector Enh
9642:
9678: l_rec_acct_attrs.array_num_value(15) := p_source_27;
9679: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
9680: l_rec_acct_attrs.array_char_value(16) := p_source_28;
9681:
9682: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9683: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9684:
9685: ---------------------------------------------------------------------------------------------------------------
9686: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9679: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
9680: l_rec_acct_attrs.array_char_value(16) := p_source_28;
9681:
9682: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9683: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9684:
9685: ---------------------------------------------------------------------------------------------------------------
9686: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9687: ---------------------------------------------------------------------------------------------------------------
9682: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
9683: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
9684:
9685: ---------------------------------------------------------------------------------------------------------------
9686: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9687: ---------------------------------------------------------------------------------------------------------------
9688: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9689:
9690: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9684:
9685: ---------------------------------------------------------------------------------------------------------------
9686: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9687: ---------------------------------------------------------------------------------------------------------------
9688: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9689:
9690: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9691: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9692:
9686: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
9687: ---------------------------------------------------------------------------------------------------------------
9688: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9689:
9690: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9691: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9692:
9693: IF xla_accounting_cache_pkg.GetValueChar
9694: (p_source_code => 'LEDGER_CATEGORY_CODE'
9687: ---------------------------------------------------------------------------------------------------------------
9688: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
9689:
9690: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9691: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
9692:
9693: IF xla_accounting_cache_pkg.GetValueChar
9694: (p_source_code => 'LEDGER_CATEGORY_CODE'
9695: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
9698: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
9699: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
9700: )
9701: THEN
9702: xla_ae_lines_pkg.BflowUpgEntry
9703: (p_business_method_code => l_bflow_method_code
9704: ,p_business_class_code => l_bflow_class_code
9705: ,p_balance_type => l_balance_type_code);
9706: ELSE
9739: , x_value_type_code => l_adr_value_type_code
9740: , p_side => 'NA'
9741: );
9742:
9743: xla_ae_lines_pkg.set_ccid(
9744: p_code_combination_id => l_ccid
9745: , p_value_type_code => l_adr_value_type_code
9746: , p_transaction_coa_id => l_adr_transaction_coa_id
9747: , p_accounting_coa_id => l_adr_accounting_coa_id
9775: xla_accounting_err_pkg.build_message
9776: (p_appli_s_name => 'XLA'
9777: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
9778: ,p_token_1 => 'LINE_NUMBER'
9779: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
9780: ,p_token_2 => 'LINE_TYPE_NAME'
9781: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
9782: l_component_type
9783: ,l_component_code
9811: --
9812: --
9813: ------------------------------------------------------------------------------------------------
9814: -- 4219869 Business Flow
9815: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9816: -- Prior Entry. Currently, the following code is always generated.
9817: ------------------------------------------------------------------------------------------------
9818: XLA_AE_LINES_PKG.ValidateCurrentLine;
9819:
9814: -- 4219869 Business Flow
9815: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
9816: -- Prior Entry. Currently, the following code is always generated.
9817: ------------------------------------------------------------------------------------------------
9818: XLA_AE_LINES_PKG.ValidateCurrentLine;
9819:
9820: ------------------------------------------------------------------------------------
9821: -- 4219869 Business Flow
9822: -- Populated credit and debit amounts -- Need to generate this within IF
9820: ------------------------------------------------------------------------------------
9821: -- 4219869 Business Flow
9822: -- Populated credit and debit amounts -- Need to generate this within IF
9823: ------------------------------------------------------------------------------------
9824: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9825:
9826: ----------------------------------------------------------------------------------
9827: -- 4219869 Business Flow
9828: -- Update journal entry status -- Need to generate this within IF
9852: -- To allow MPA report to determine if it should generate report process
9853: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9854: ------------------------------------------------------------------------------------------
9855:
9856: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9857: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9858: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9859: -- call ADRs
9860: -- Bug 4922099
9853: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
9854: ------------------------------------------------------------------------------------------
9855:
9856: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
9857: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
9858: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
9859: -- call ADRs
9860: -- Bug 4922099
9861: --
9878: , x_value_type_code => l_adr_value_type_code
9879: , p_side => 'NA'
9880: );
9881:
9882: xla_ae_lines_pkg.set_ccid(
9883: p_code_combination_id => l_ccid
9884: , p_value_type_code => l_adr_value_type_code
9885: , p_transaction_coa_id => l_adr_transaction_coa_id
9886: , p_accounting_coa_id => l_adr_accounting_coa_id
9901:
9902: --
9903: -- Update the line information that should be overwritten
9904: --
9905: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9906: p_header_num => 1);
9907: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9908:
9909: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9903: -- Update the line information that should be overwritten
9904: --
9905: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9906: p_header_num => 1);
9907: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9908:
9909: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9910:
9911: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9905: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
9906: p_header_num => 1);
9907: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
9908:
9909: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9910:
9911: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9912: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9913: END IF;
9908:
9909: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
9910:
9911: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
9912: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
9913: END IF;
9914:
9915: --
9916: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9915: --
9916: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
9917: --
9918: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
9919: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
9920: ELSE
9921: ---------------------------------------------------------------------------------------------------
9922: -- 4262811a Switch Sign
9923: ---------------------------------------------------------------------------------------------------
9920: ELSE
9921: ---------------------------------------------------------------------------------------------------
9922: -- 4262811a Switch Sign
9923: ---------------------------------------------------------------------------------------------------
9924: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9925: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9921: ---------------------------------------------------------------------------------------------------
9922: -- 4262811a Switch Sign
9923: ---------------------------------------------------------------------------------------------------
9924: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9925: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9922: -- 4262811a Switch Sign
9923: ---------------------------------------------------------------------------------------------------
9924: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9925: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9930: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9923: ---------------------------------------------------------------------------------------------------
9924: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9925: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9930: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9931: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9924: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
9925: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9930: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9931: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9932:
9926: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9930: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9931: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9932:
9933: END IF;
9934:
9927: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
9928: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9929: -- 5132302
9930: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
9931: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
9932:
9933: END IF;
9934:
9935: -- 4955764
9932:
9933: END IF;
9934:
9935: -- 4955764
9936: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9937: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9938:
9939:
9940: XLA_AE_LINES_PKG.ValidateCurrentLine;
9936: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
9937: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9938:
9939:
9940: XLA_AE_LINES_PKG.ValidateCurrentLine;
9941: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9942:
9943: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9944: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9937: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
9938:
9939:
9940: XLA_AE_LINES_PKG.ValidateCurrentLine;
9941: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
9942:
9943: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
9944: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
9945: ,p_balance_type_code => l_balance_type_code);
10088: --
10089: -- bulk performance
10090: --
10091: l_balance_type_code VARCHAR2(1);
10092: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10093: l_log_module VARCHAR2(240);
10094:
10095: --
10096: -- Upgrade strategy
10158: ') = 'N'
10159: THEN
10160:
10161: --
10162: XLA_AE_LINES_PKG.SetNewLine;
10163:
10164: p_balance_type_code := l_balance_type_code;
10165: -- set the flag so later we will know whether the gain loss line needs to be created
10166:
10170:
10171: --
10172: -- bulk performance
10173: --
10174: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10175: p_header_num => 0); -- 4262811
10176: --
10177: -- set accounting line options
10178: --
10175: p_header_num => 0); -- 4262811
10176: --
10177: -- set accounting line options
10178: --
10179: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10180: p_natural_side_code => 'C'
10181: , p_gain_or_loss_flag => 'N'
10182: , p_gl_transfer_mode_code => 'S'
10183: , p_acct_entry_type_code => 'A'
10189: --
10190: --
10191: -- set accounting line type info
10192: --
10193: xla_ae_lines_pkg.SetAcctLineType
10194: (p_component_type => l_component_type
10195: ,p_event_type_code => l_event_type_code
10196: ,p_line_definition_owner_code => l_line_definition_owner_code
10197: ,p_line_definition_code => l_line_definition_code
10203: ,p_event_class_code => l_event_class_code);
10204: --
10205: -- set accounting class
10206: --
10207: xla_ae_lines_pkg.SetAcctClass(
10208: p_accounting_class_code => 'BANK_CHG'
10209: , p_ae_header_id => l_ae_header_id
10210: );
10211:
10211:
10212: --
10213: -- set rounding class
10214: --
10215: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10216: 'RECEIVABLE';
10217:
10218: --
10219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10215: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10216: 'RECEIVABLE';
10217:
10218: --
10219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10221: --
10222: -- bulk performance
10223: --
10216: 'RECEIVABLE';
10217:
10218: --
10219: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10221: --
10222: -- bulk performance
10223: --
10224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10220: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10221: --
10222: -- bulk performance
10223: --
10224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10225:
10226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10228:
10222: -- bulk performance
10223: --
10224: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10225:
10226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10228:
10229: -- 4955764
10230: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10226: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10227: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10228:
10229: -- 4955764
10230: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10231: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10232:
10233: -- 4458381 Public Sector Enh
10234:
10270: l_rec_acct_attrs.array_num_value(15) := p_source_27;
10271: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
10272: l_rec_acct_attrs.array_char_value(16) := p_source_28;
10273:
10274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10276:
10277: ---------------------------------------------------------------------------------------------------------------
10278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10271: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
10272: l_rec_acct_attrs.array_char_value(16) := p_source_28;
10273:
10274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10276:
10277: ---------------------------------------------------------------------------------------------------------------
10278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10279: ---------------------------------------------------------------------------------------------------------------
10274: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10275: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10276:
10277: ---------------------------------------------------------------------------------------------------------------
10278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10279: ---------------------------------------------------------------------------------------------------------------
10280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10281:
10282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10276:
10277: ---------------------------------------------------------------------------------------------------------------
10278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10279: ---------------------------------------------------------------------------------------------------------------
10280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10281:
10282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10284:
10278: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10279: ---------------------------------------------------------------------------------------------------------------
10280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10281:
10282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10284:
10285: IF xla_accounting_cache_pkg.GetValueChar
10286: (p_source_code => 'LEDGER_CATEGORY_CODE'
10279: ---------------------------------------------------------------------------------------------------------------
10280: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10281:
10282: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10283: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10284:
10285: IF xla_accounting_cache_pkg.GetValueChar
10286: (p_source_code => 'LEDGER_CATEGORY_CODE'
10287: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10290: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10291: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10292: )
10293: THEN
10294: xla_ae_lines_pkg.BflowUpgEntry
10295: (p_business_method_code => l_bflow_method_code
10296: ,p_business_class_code => l_bflow_class_code
10297: ,p_balance_type => l_balance_type_code);
10298: ELSE
10330: , x_value_type_code => l_adr_value_type_code
10331: , p_side => 'NA'
10332: );
10333:
10334: xla_ae_lines_pkg.set_ccid(
10335: p_code_combination_id => l_ccid
10336: , p_value_type_code => l_adr_value_type_code
10337: , p_transaction_coa_id => l_adr_transaction_coa_id
10338: , p_accounting_coa_id => l_adr_accounting_coa_id
10366: xla_accounting_err_pkg.build_message
10367: (p_appli_s_name => 'XLA'
10368: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10369: ,p_token_1 => 'LINE_NUMBER'
10370: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10371: ,p_token_2 => 'LINE_TYPE_NAME'
10372: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10373: l_component_type
10374: ,l_component_code
10402: --
10403: --
10404: ------------------------------------------------------------------------------------------------
10405: -- 4219869 Business Flow
10406: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10407: -- Prior Entry. Currently, the following code is always generated.
10408: ------------------------------------------------------------------------------------------------
10409: XLA_AE_LINES_PKG.ValidateCurrentLine;
10410:
10405: -- 4219869 Business Flow
10406: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10407: -- Prior Entry. Currently, the following code is always generated.
10408: ------------------------------------------------------------------------------------------------
10409: XLA_AE_LINES_PKG.ValidateCurrentLine;
10410:
10411: ------------------------------------------------------------------------------------
10412: -- 4219869 Business Flow
10413: -- Populated credit and debit amounts -- Need to generate this within IF
10411: ------------------------------------------------------------------------------------
10412: -- 4219869 Business Flow
10413: -- Populated credit and debit amounts -- Need to generate this within IF
10414: ------------------------------------------------------------------------------------
10415: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10416:
10417: ----------------------------------------------------------------------------------
10418: -- 4219869 Business Flow
10419: -- Update journal entry status -- Need to generate this within IF
10443: -- To allow MPA report to determine if it should generate report process
10444: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10445: ------------------------------------------------------------------------------------------
10446:
10447: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10448: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10449: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10450: -- call ADRs
10451: -- Bug 4922099
10444: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
10445: ------------------------------------------------------------------------------------------
10446:
10447: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
10448: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
10449: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
10450: -- call ADRs
10451: -- Bug 4922099
10452: --
10468: , x_value_type_code => l_adr_value_type_code
10469: , p_side => 'NA'
10470: );
10471:
10472: xla_ae_lines_pkg.set_ccid(
10473: p_code_combination_id => l_ccid
10474: , p_value_type_code => l_adr_value_type_code
10475: , p_transaction_coa_id => l_adr_transaction_coa_id
10476: , p_accounting_coa_id => l_adr_accounting_coa_id
10491:
10492: --
10493: -- Update the line information that should be overwritten
10494: --
10495: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10496: p_header_num => 1);
10497: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10498:
10499: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10493: -- Update the line information that should be overwritten
10494: --
10495: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10496: p_header_num => 1);
10497: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10498:
10499: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10500:
10501: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10495: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
10496: p_header_num => 1);
10497: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
10498:
10499: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10500:
10501: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10502: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10503: END IF;
10498:
10499: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
10500:
10501: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
10502: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
10503: END IF;
10504:
10505: --
10506: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10505: --
10506: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
10507: --
10508: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
10509: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
10510: ELSE
10511: ---------------------------------------------------------------------------------------------------
10512: -- 4262811a Switch Sign
10513: ---------------------------------------------------------------------------------------------------
10510: ELSE
10511: ---------------------------------------------------------------------------------------------------
10512: -- 4262811a Switch Sign
10513: ---------------------------------------------------------------------------------------------------
10514: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10515: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10511: ---------------------------------------------------------------------------------------------------
10512: -- 4262811a Switch Sign
10513: ---------------------------------------------------------------------------------------------------
10514: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10515: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10512: -- 4262811a Switch Sign
10513: ---------------------------------------------------------------------------------------------------
10514: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10515: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10520: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10513: ---------------------------------------------------------------------------------------------------
10514: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10515: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10520: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10521: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10514: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
10515: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10520: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10521: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10522:
10516: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10520: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10521: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10522:
10523: END IF;
10524:
10517: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
10518: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10519: -- 5132302
10520: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
10521: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
10522:
10523: END IF;
10524:
10525: -- 4955764
10522:
10523: END IF;
10524:
10525: -- 4955764
10526: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10527: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10528:
10529:
10530: XLA_AE_LINES_PKG.ValidateCurrentLine;
10526: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10527: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10528:
10529:
10530: XLA_AE_LINES_PKG.ValidateCurrentLine;
10531: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10532:
10533: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10534: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10527: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
10528:
10529:
10530: XLA_AE_LINES_PKG.ValidateCurrentLine;
10531: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
10532:
10533: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
10534: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
10535: ,p_balance_type_code => l_balance_type_code);
10678: --
10679: -- bulk performance
10680: --
10681: l_balance_type_code VARCHAR2(1);
10682: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
10683: l_log_module VARCHAR2(240);
10684:
10685: --
10686: -- Upgrade strategy
10748: ') = 'N'
10749: THEN
10750:
10751: --
10752: XLA_AE_LINES_PKG.SetNewLine;
10753:
10754: p_balance_type_code := l_balance_type_code;
10755: -- set the flag so later we will know whether the gain loss line needs to be created
10756:
10760:
10761: --
10762: -- bulk performance
10763: --
10764: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
10765: p_header_num => 0); -- 4262811
10766: --
10767: -- set accounting line options
10768: --
10765: p_header_num => 0); -- 4262811
10766: --
10767: -- set accounting line options
10768: --
10769: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
10770: p_natural_side_code => 'C'
10771: , p_gain_or_loss_flag => 'N'
10772: , p_gl_transfer_mode_code => 'S'
10773: , p_acct_entry_type_code => 'A'
10779: --
10780: --
10781: -- set accounting line type info
10782: --
10783: xla_ae_lines_pkg.SetAcctLineType
10784: (p_component_type => l_component_type
10785: ,p_event_type_code => l_event_type_code
10786: ,p_line_definition_owner_code => l_line_definition_owner_code
10787: ,p_line_definition_code => l_line_definition_code
10793: ,p_event_class_code => l_event_class_code);
10794: --
10795: -- set accounting class
10796: --
10797: xla_ae_lines_pkg.SetAcctClass(
10798: p_accounting_class_code => 'CASH'
10799: , p_ae_header_id => l_ae_header_id
10800: );
10801:
10801:
10802: --
10803: -- set rounding class
10804: --
10805: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10806: 'RECEIVABLE';
10807:
10808: --
10809: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10805: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
10806: 'RECEIVABLE';
10807:
10808: --
10809: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10810: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10811: --
10812: -- bulk performance
10813: --
10806: 'RECEIVABLE';
10807:
10808: --
10809: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
10810: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10811: --
10812: -- bulk performance
10813: --
10814: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10810: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
10811: --
10812: -- bulk performance
10813: --
10814: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10815:
10816: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10817: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10818:
10812: -- bulk performance
10813: --
10814: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
10815:
10816: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10817: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10818:
10819: -- 4955764
10820: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10816: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
10817: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
10818:
10819: -- 4955764
10820: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
10821: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
10822:
10823: -- 4458381 Public Sector Enh
10824:
10860: l_rec_acct_attrs.array_num_value(15) := p_source_27;
10861: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
10862: l_rec_acct_attrs.array_char_value(16) := p_source_28;
10863:
10864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10866:
10867: ---------------------------------------------------------------------------------------------------------------
10868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10861: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
10862: l_rec_acct_attrs.array_char_value(16) := p_source_28;
10863:
10864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10866:
10867: ---------------------------------------------------------------------------------------------------------------
10868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10869: ---------------------------------------------------------------------------------------------------------------
10864: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
10865: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
10866:
10867: ---------------------------------------------------------------------------------------------------------------
10868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10869: ---------------------------------------------------------------------------------------------------------------
10870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10871:
10872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10866:
10867: ---------------------------------------------------------------------------------------------------------------
10868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10869: ---------------------------------------------------------------------------------------------------------------
10870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10871:
10872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10874:
10868: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
10869: ---------------------------------------------------------------------------------------------------------------
10870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10871:
10872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10874:
10875: IF xla_accounting_cache_pkg.GetValueChar
10876: (p_source_code => 'LEDGER_CATEGORY_CODE'
10869: ---------------------------------------------------------------------------------------------------------------
10870: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
10871:
10872: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10873: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
10874:
10875: IF xla_accounting_cache_pkg.GetValueChar
10876: (p_source_code => 'LEDGER_CATEGORY_CODE'
10877: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
10880: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
10881: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
10882: )
10883: THEN
10884: xla_ae_lines_pkg.BflowUpgEntry
10885: (p_business_method_code => l_bflow_method_code
10886: ,p_business_class_code => l_bflow_class_code
10887: ,p_balance_type => l_balance_type_code);
10888: ELSE
10920: , x_value_type_code => l_adr_value_type_code
10921: , p_side => 'NA'
10922: );
10923:
10924: xla_ae_lines_pkg.set_ccid(
10925: p_code_combination_id => l_ccid
10926: , p_value_type_code => l_adr_value_type_code
10927: , p_transaction_coa_id => l_adr_transaction_coa_id
10928: , p_accounting_coa_id => l_adr_accounting_coa_id
10956: xla_accounting_err_pkg.build_message
10957: (p_appli_s_name => 'XLA'
10958: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
10959: ,p_token_1 => 'LINE_NUMBER'
10960: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
10961: ,p_token_2 => 'LINE_TYPE_NAME'
10962: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
10963: l_component_type
10964: ,l_component_code
10992: --
10993: --
10994: ------------------------------------------------------------------------------------------------
10995: -- 4219869 Business Flow
10996: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10997: -- Prior Entry. Currently, the following code is always generated.
10998: ------------------------------------------------------------------------------------------------
10999: XLA_AE_LINES_PKG.ValidateCurrentLine;
11000:
10995: -- 4219869 Business Flow
10996: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
10997: -- Prior Entry. Currently, the following code is always generated.
10998: ------------------------------------------------------------------------------------------------
10999: XLA_AE_LINES_PKG.ValidateCurrentLine;
11000:
11001: ------------------------------------------------------------------------------------
11002: -- 4219869 Business Flow
11003: -- Populated credit and debit amounts -- Need to generate this within IF
11001: ------------------------------------------------------------------------------------
11002: -- 4219869 Business Flow
11003: -- Populated credit and debit amounts -- Need to generate this within IF
11004: ------------------------------------------------------------------------------------
11005: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11006:
11007: ----------------------------------------------------------------------------------
11008: -- 4219869 Business Flow
11009: -- Update journal entry status -- Need to generate this within IF
11033: -- To allow MPA report to determine if it should generate report process
11034: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11035: ------------------------------------------------------------------------------------------
11036:
11037: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11038: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11039: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11040: -- call ADRs
11041: -- Bug 4922099
11034: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11035: ------------------------------------------------------------------------------------------
11036:
11037: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11038: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11039: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11040: -- call ADRs
11041: -- Bug 4922099
11042: --
11058: , x_value_type_code => l_adr_value_type_code
11059: , p_side => 'NA'
11060: );
11061:
11062: xla_ae_lines_pkg.set_ccid(
11063: p_code_combination_id => l_ccid
11064: , p_value_type_code => l_adr_value_type_code
11065: , p_transaction_coa_id => l_adr_transaction_coa_id
11066: , p_accounting_coa_id => l_adr_accounting_coa_id
11081:
11082: --
11083: -- Update the line information that should be overwritten
11084: --
11085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11086: p_header_num => 1);
11087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11088:
11089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11083: -- Update the line information that should be overwritten
11084: --
11085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11086: p_header_num => 1);
11087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11088:
11089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11090:
11091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11085: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11086: p_header_num => 1);
11087: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11088:
11089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11090:
11091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11092: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11093: END IF;
11088:
11089: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11090:
11091: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11092: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11093: END IF;
11094:
11095: --
11096: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11095: --
11096: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11097: --
11098: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
11099: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
11100: ELSE
11101: ---------------------------------------------------------------------------------------------------
11102: -- 4262811a Switch Sign
11103: ---------------------------------------------------------------------------------------------------
11100: ELSE
11101: ---------------------------------------------------------------------------------------------------
11102: -- 4262811a Switch Sign
11103: ---------------------------------------------------------------------------------------------------
11104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11101: ---------------------------------------------------------------------------------------------------
11102: -- 4262811a Switch Sign
11103: ---------------------------------------------------------------------------------------------------
11104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11102: -- 4262811a Switch Sign
11103: ---------------------------------------------------------------------------------------------------
11104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11103: ---------------------------------------------------------------------------------------------------
11104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11104: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11105: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11112:
11106: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11112:
11113: END IF;
11114:
11107: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11108: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11109: -- 5132302
11110: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11111: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11112:
11113: END IF;
11114:
11115: -- 4955764
11112:
11113: END IF;
11114:
11115: -- 4955764
11116: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11118:
11119:
11120: XLA_AE_LINES_PKG.ValidateCurrentLine;
11116: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11118:
11119:
11120: XLA_AE_LINES_PKG.ValidateCurrentLine;
11121: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11122:
11123: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11124: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11117: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11118:
11119:
11120: XLA_AE_LINES_PKG.ValidateCurrentLine;
11121: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11122:
11123: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11124: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11125: ,p_balance_type_code => l_balance_type_code);
11270: --
11271: -- bulk performance
11272: --
11273: l_balance_type_code VARCHAR2(1);
11274: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11275: l_log_module VARCHAR2(240);
11276:
11277: --
11278: -- Upgrade strategy
11342: ') = 'N'
11343: THEN
11344:
11345: --
11346: XLA_AE_LINES_PKG.SetNewLine;
11347:
11348: p_balance_type_code := l_balance_type_code;
11349: -- set the flag so later we will know whether the gain loss line needs to be created
11350:
11354:
11355: --
11356: -- bulk performance
11357: --
11358: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11359: p_header_num => 0); -- 4262811
11360: --
11361: -- set accounting line options
11362: --
11359: p_header_num => 0); -- 4262811
11360: --
11361: -- set accounting line options
11362: --
11363: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11364: p_natural_side_code => 'C'
11365: , p_gain_or_loss_flag => 'N'
11366: , p_gl_transfer_mode_code => 'S'
11367: , p_acct_entry_type_code => 'A'
11373: --
11374: --
11375: -- set accounting line type info
11376: --
11377: xla_ae_lines_pkg.SetAcctLineType
11378: (p_component_type => l_component_type
11379: ,p_event_type_code => l_event_type_code
11380: ,p_line_definition_owner_code => l_line_definition_owner_code
11381: ,p_line_definition_code => l_line_definition_code
11387: ,p_event_class_code => l_event_class_code);
11388: --
11389: -- set accounting class
11390: --
11391: xla_ae_lines_pkg.SetAcctClass(
11392: p_accounting_class_code => 'CLAIM'
11393: , p_ae_header_id => l_ae_header_id
11394: );
11395:
11395:
11396: --
11397: -- set rounding class
11398: --
11399: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11400: 'RECEIVABLE';
11401:
11402: --
11403: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11399: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11400: 'RECEIVABLE';
11401:
11402: --
11403: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11404: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11405: --
11406: -- bulk performance
11407: --
11400: 'RECEIVABLE';
11401:
11402: --
11403: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11404: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11405: --
11406: -- bulk performance
11407: --
11408: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11404: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11405: --
11406: -- bulk performance
11407: --
11408: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11409:
11410: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11411: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11412:
11406: -- bulk performance
11407: --
11408: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11409:
11410: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11411: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11412:
11413: -- 4955764
11414: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11410: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
11411: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
11412:
11413: -- 4955764
11414: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11415: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
11416:
11417: -- 4458381 Public Sector Enh
11418:
11454: l_rec_acct_attrs.array_num_value(15) := p_source_27;
11455: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
11456: l_rec_acct_attrs.array_char_value(16) := p_source_28;
11457:
11458: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11459: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11460:
11461: ---------------------------------------------------------------------------------------------------------------
11462: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11455: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
11456: l_rec_acct_attrs.array_char_value(16) := p_source_28;
11457:
11458: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11459: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11460:
11461: ---------------------------------------------------------------------------------------------------------------
11462: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11463: ---------------------------------------------------------------------------------------------------------------
11458: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
11459: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
11460:
11461: ---------------------------------------------------------------------------------------------------------------
11462: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11463: ---------------------------------------------------------------------------------------------------------------
11464: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11465:
11466: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11460:
11461: ---------------------------------------------------------------------------------------------------------------
11462: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11463: ---------------------------------------------------------------------------------------------------------------
11464: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11465:
11466: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11467: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11468:
11462: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
11463: ---------------------------------------------------------------------------------------------------------------
11464: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11465:
11466: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11467: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11468:
11469: IF xla_accounting_cache_pkg.GetValueChar
11470: (p_source_code => 'LEDGER_CATEGORY_CODE'
11463: ---------------------------------------------------------------------------------------------------------------
11464: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
11465:
11466: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11467: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
11468:
11469: IF xla_accounting_cache_pkg.GetValueChar
11470: (p_source_code => 'LEDGER_CATEGORY_CODE'
11471: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
11474: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
11475: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
11476: )
11477: THEN
11478: xla_ae_lines_pkg.BflowUpgEntry
11479: (p_business_method_code => l_bflow_method_code
11480: ,p_business_class_code => l_bflow_class_code
11481: ,p_balance_type => l_balance_type_code);
11482: ELSE
11514: , x_value_type_code => l_adr_value_type_code
11515: , p_side => 'NA'
11516: );
11517:
11518: xla_ae_lines_pkg.set_ccid(
11519: p_code_combination_id => l_ccid
11520: , p_value_type_code => l_adr_value_type_code
11521: , p_transaction_coa_id => l_adr_transaction_coa_id
11522: , p_accounting_coa_id => l_adr_accounting_coa_id
11550: xla_accounting_err_pkg.build_message
11551: (p_appli_s_name => 'XLA'
11552: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
11553: ,p_token_1 => 'LINE_NUMBER'
11554: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
11555: ,p_token_2 => 'LINE_TYPE_NAME'
11556: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
11557: l_component_type
11558: ,l_component_code
11586: --
11587: --
11588: ------------------------------------------------------------------------------------------------
11589: -- 4219869 Business Flow
11590: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11591: -- Prior Entry. Currently, the following code is always generated.
11592: ------------------------------------------------------------------------------------------------
11593: XLA_AE_LINES_PKG.ValidateCurrentLine;
11594:
11589: -- 4219869 Business Flow
11590: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
11591: -- Prior Entry. Currently, the following code is always generated.
11592: ------------------------------------------------------------------------------------------------
11593: XLA_AE_LINES_PKG.ValidateCurrentLine;
11594:
11595: ------------------------------------------------------------------------------------
11596: -- 4219869 Business Flow
11597: -- Populated credit and debit amounts -- Need to generate this within IF
11595: ------------------------------------------------------------------------------------
11596: -- 4219869 Business Flow
11597: -- Populated credit and debit amounts -- Need to generate this within IF
11598: ------------------------------------------------------------------------------------
11599: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11600:
11601: ----------------------------------------------------------------------------------
11602: -- 4219869 Business Flow
11603: -- Update journal entry status -- Need to generate this within IF
11627: -- To allow MPA report to determine if it should generate report process
11628: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11629: ------------------------------------------------------------------------------------------
11630:
11631: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11632: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11633: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11634: -- call ADRs
11635: -- Bug 4922099
11628: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
11629: ------------------------------------------------------------------------------------------
11630:
11631: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
11632: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
11633: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
11634: -- call ADRs
11635: -- Bug 4922099
11636: --
11652: , x_value_type_code => l_adr_value_type_code
11653: , p_side => 'NA'
11654: );
11655:
11656: xla_ae_lines_pkg.set_ccid(
11657: p_code_combination_id => l_ccid
11658: , p_value_type_code => l_adr_value_type_code
11659: , p_transaction_coa_id => l_adr_transaction_coa_id
11660: , p_accounting_coa_id => l_adr_accounting_coa_id
11675:
11676: --
11677: -- Update the line information that should be overwritten
11678: --
11679: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11680: p_header_num => 1);
11681: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11682:
11683: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11677: -- Update the line information that should be overwritten
11678: --
11679: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11680: p_header_num => 1);
11681: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11682:
11683: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11684:
11685: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11679: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
11680: p_header_num => 1);
11681: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
11682:
11683: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11684:
11685: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11686: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11687: END IF;
11682:
11683: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
11684:
11685: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
11686: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
11687: END IF;
11688:
11689: --
11690: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11689: --
11690: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
11691: --
11692: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
11693: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
11694: ELSE
11695: ---------------------------------------------------------------------------------------------------
11696: -- 4262811a Switch Sign
11697: ---------------------------------------------------------------------------------------------------
11694: ELSE
11695: ---------------------------------------------------------------------------------------------------
11696: -- 4262811a Switch Sign
11697: ---------------------------------------------------------------------------------------------------
11698: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11699: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11695: ---------------------------------------------------------------------------------------------------
11696: -- 4262811a Switch Sign
11697: ---------------------------------------------------------------------------------------------------
11698: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11699: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11696: -- 4262811a Switch Sign
11697: ---------------------------------------------------------------------------------------------------
11698: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11699: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11704: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11697: ---------------------------------------------------------------------------------------------------
11698: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11699: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11704: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11705: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11698: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
11699: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11704: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11705: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11706:
11700: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11704: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11705: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11706:
11707: END IF;
11708:
11701: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
11702: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11703: -- 5132302
11704: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
11705: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
11706:
11707: END IF;
11708:
11709: -- 4955764
11706:
11707: END IF;
11708:
11709: -- 4955764
11710: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11711: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11712:
11713:
11714: XLA_AE_LINES_PKG.ValidateCurrentLine;
11710: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
11711: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11712:
11713:
11714: XLA_AE_LINES_PKG.ValidateCurrentLine;
11715: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11716:
11717: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11718: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11711: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
11712:
11713:
11714: XLA_AE_LINES_PKG.ValidateCurrentLine;
11715: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
11716:
11717: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
11718: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
11719: ,p_balance_type_code => l_balance_type_code);
11862: --
11863: -- bulk performance
11864: --
11865: l_balance_type_code VARCHAR2(1);
11866: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
11867: l_log_module VARCHAR2(240);
11868:
11869: --
11870: -- Upgrade strategy
11932: ') = 'N'
11933: THEN
11934:
11935: --
11936: XLA_AE_LINES_PKG.SetNewLine;
11937:
11938: p_balance_type_code := l_balance_type_code;
11939: -- set the flag so later we will know whether the gain loss line needs to be created
11940:
11944:
11945: --
11946: -- bulk performance
11947: --
11948: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
11949: p_header_num => 0); -- 4262811
11950: --
11951: -- set accounting line options
11952: --
11949: p_header_num => 0); -- 4262811
11950: --
11951: -- set accounting line options
11952: --
11953: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
11954: p_natural_side_code => 'C'
11955: , p_gain_or_loss_flag => 'N'
11956: , p_gl_transfer_mode_code => 'S'
11957: , p_acct_entry_type_code => 'A'
11963: --
11964: --
11965: -- set accounting line type info
11966: --
11967: xla_ae_lines_pkg.SetAcctLineType
11968: (p_component_type => l_component_type
11969: ,p_event_type_code => l_event_type_code
11970: ,p_line_definition_owner_code => l_line_definition_owner_code
11971: ,p_line_definition_code => l_line_definition_code
11977: ,p_event_class_code => l_event_class_code);
11978: --
11979: -- set accounting class
11980: --
11981: xla_ae_lines_pkg.SetAcctClass(
11982: p_accounting_class_code => 'CONFIRMATION'
11983: , p_ae_header_id => l_ae_header_id
11984: );
11985:
11985:
11986: --
11987: -- set rounding class
11988: --
11989: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11990: 'RECEIVABLE';
11991:
11992: --
11993: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11989: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
11990: 'RECEIVABLE';
11991:
11992: --
11993: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11994: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11995: --
11996: -- bulk performance
11997: --
11990: 'RECEIVABLE';
11991:
11992: --
11993: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
11994: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11995: --
11996: -- bulk performance
11997: --
11998: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11994: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
11995: --
11996: -- bulk performance
11997: --
11998: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11999:
12000: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12001: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12002:
11996: -- bulk performance
11997: --
11998: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
11999:
12000: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12001: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12002:
12003: -- 4955764
12004: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12000: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12001: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12002:
12003: -- 4955764
12004: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12005: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12006:
12007: -- 4458381 Public Sector Enh
12008:
12044: l_rec_acct_attrs.array_num_value(15) := p_source_27;
12045: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
12046: l_rec_acct_attrs.array_char_value(16) := p_source_28;
12047:
12048: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12049: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12050:
12051: ---------------------------------------------------------------------------------------------------------------
12052: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12045: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
12046: l_rec_acct_attrs.array_char_value(16) := p_source_28;
12047:
12048: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12049: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12050:
12051: ---------------------------------------------------------------------------------------------------------------
12052: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12053: ---------------------------------------------------------------------------------------------------------------
12048: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12049: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12050:
12051: ---------------------------------------------------------------------------------------------------------------
12052: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12053: ---------------------------------------------------------------------------------------------------------------
12054: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12055:
12056: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12050:
12051: ---------------------------------------------------------------------------------------------------------------
12052: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12053: ---------------------------------------------------------------------------------------------------------------
12054: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12055:
12056: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12057: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12058:
12052: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12053: ---------------------------------------------------------------------------------------------------------------
12054: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12055:
12056: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12057: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12058:
12059: IF xla_accounting_cache_pkg.GetValueChar
12060: (p_source_code => 'LEDGER_CATEGORY_CODE'
12053: ---------------------------------------------------------------------------------------------------------------
12054: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12055:
12056: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12057: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12058:
12059: IF xla_accounting_cache_pkg.GetValueChar
12060: (p_source_code => 'LEDGER_CATEGORY_CODE'
12061: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12064: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12065: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12066: )
12067: THEN
12068: xla_ae_lines_pkg.BflowUpgEntry
12069: (p_business_method_code => l_bflow_method_code
12070: ,p_business_class_code => l_bflow_class_code
12071: ,p_balance_type => l_balance_type_code);
12072: ELSE
12104: , x_value_type_code => l_adr_value_type_code
12105: , p_side => 'NA'
12106: );
12107:
12108: xla_ae_lines_pkg.set_ccid(
12109: p_code_combination_id => l_ccid
12110: , p_value_type_code => l_adr_value_type_code
12111: , p_transaction_coa_id => l_adr_transaction_coa_id
12112: , p_accounting_coa_id => l_adr_accounting_coa_id
12140: xla_accounting_err_pkg.build_message
12141: (p_appli_s_name => 'XLA'
12142: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12143: ,p_token_1 => 'LINE_NUMBER'
12144: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12145: ,p_token_2 => 'LINE_TYPE_NAME'
12146: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12147: l_component_type
12148: ,l_component_code
12176: --
12177: --
12178: ------------------------------------------------------------------------------------------------
12179: -- 4219869 Business Flow
12180: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12181: -- Prior Entry. Currently, the following code is always generated.
12182: ------------------------------------------------------------------------------------------------
12183: XLA_AE_LINES_PKG.ValidateCurrentLine;
12184:
12179: -- 4219869 Business Flow
12180: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12181: -- Prior Entry. Currently, the following code is always generated.
12182: ------------------------------------------------------------------------------------------------
12183: XLA_AE_LINES_PKG.ValidateCurrentLine;
12184:
12185: ------------------------------------------------------------------------------------
12186: -- 4219869 Business Flow
12187: -- Populated credit and debit amounts -- Need to generate this within IF
12185: ------------------------------------------------------------------------------------
12186: -- 4219869 Business Flow
12187: -- Populated credit and debit amounts -- Need to generate this within IF
12188: ------------------------------------------------------------------------------------
12189: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12190:
12191: ----------------------------------------------------------------------------------
12192: -- 4219869 Business Flow
12193: -- Update journal entry status -- Need to generate this within IF
12217: -- To allow MPA report to determine if it should generate report process
12218: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12219: ------------------------------------------------------------------------------------------
12220:
12221: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12222: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12223: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12224: -- call ADRs
12225: -- Bug 4922099
12218: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12219: ------------------------------------------------------------------------------------------
12220:
12221: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12222: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12223: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12224: -- call ADRs
12225: -- Bug 4922099
12226: --
12242: , x_value_type_code => l_adr_value_type_code
12243: , p_side => 'NA'
12244: );
12245:
12246: xla_ae_lines_pkg.set_ccid(
12247: p_code_combination_id => l_ccid
12248: , p_value_type_code => l_adr_value_type_code
12249: , p_transaction_coa_id => l_adr_transaction_coa_id
12250: , p_accounting_coa_id => l_adr_accounting_coa_id
12265:
12266: --
12267: -- Update the line information that should be overwritten
12268: --
12269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12270: p_header_num => 1);
12271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12272:
12273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12267: -- Update the line information that should be overwritten
12268: --
12269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12270: p_header_num => 1);
12271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12272:
12273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12274:
12275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12269: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12270: p_header_num => 1);
12271: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12272:
12273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12274:
12275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12276: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12277: END IF;
12272:
12273: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12274:
12275: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12276: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12277: END IF;
12278:
12279: --
12280: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12279: --
12280: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12281: --
12282: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12283: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12284: ELSE
12285: ---------------------------------------------------------------------------------------------------
12286: -- 4262811a Switch Sign
12287: ---------------------------------------------------------------------------------------------------
12284: ELSE
12285: ---------------------------------------------------------------------------------------------------
12286: -- 4262811a Switch Sign
12287: ---------------------------------------------------------------------------------------------------
12288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12285: ---------------------------------------------------------------------------------------------------
12286: -- 4262811a Switch Sign
12287: ---------------------------------------------------------------------------------------------------
12288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12286: -- 4262811a Switch Sign
12287: ---------------------------------------------------------------------------------------------------
12288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12287: ---------------------------------------------------------------------------------------------------
12288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12288: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12289: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12296:
12290: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12296:
12297: END IF;
12298:
12291: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12292: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12293: -- 5132302
12294: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12295: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12296:
12297: END IF;
12298:
12299: -- 4955764
12296:
12297: END IF;
12298:
12299: -- 4955764
12300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12302:
12303:
12304: XLA_AE_LINES_PKG.ValidateCurrentLine;
12300: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12302:
12303:
12304: XLA_AE_LINES_PKG.ValidateCurrentLine;
12305: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12306:
12307: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12308: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12301: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12302:
12303:
12304: XLA_AE_LINES_PKG.ValidateCurrentLine;
12305: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12306:
12307: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12308: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12309: ,p_balance_type_code => l_balance_type_code);
12452: --
12453: -- bulk performance
12454: --
12455: l_balance_type_code VARCHAR2(1);
12456: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
12457: l_log_module VARCHAR2(240);
12458:
12459: --
12460: -- Upgrade strategy
12522: ') = 'N'
12523: THEN
12524:
12525: --
12526: XLA_AE_LINES_PKG.SetNewLine;
12527:
12528: p_balance_type_code := l_balance_type_code;
12529: -- set the flag so later we will know whether the gain loss line needs to be created
12530:
12534:
12535: --
12536: -- bulk performance
12537: --
12538: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
12539: p_header_num => 0); -- 4262811
12540: --
12541: -- set accounting line options
12542: --
12539: p_header_num => 0); -- 4262811
12540: --
12541: -- set accounting line options
12542: --
12543: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
12544: p_natural_side_code => 'C'
12545: , p_gain_or_loss_flag => 'N'
12546: , p_gl_transfer_mode_code => 'S'
12547: , p_acct_entry_type_code => 'A'
12553: --
12554: --
12555: -- set accounting line type info
12556: --
12557: xla_ae_lines_pkg.SetAcctLineType
12558: (p_component_type => l_component_type
12559: ,p_event_type_code => l_event_type_code
12560: ,p_line_definition_owner_code => l_line_definition_owner_code
12561: ,p_line_definition_code => l_line_definition_code
12567: ,p_event_class_code => l_event_class_code);
12568: --
12569: -- set accounting class
12570: --
12571: xla_ae_lines_pkg.SetAcctClass(
12572: p_accounting_class_code => 'ROUNDING'
12573: , p_ae_header_id => l_ae_header_id
12574: );
12575:
12575:
12576: --
12577: -- set rounding class
12578: --
12579: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12580: 'RECEIVABLE';
12581:
12582: --
12583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12579: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
12580: 'RECEIVABLE';
12581:
12582: --
12583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12585: --
12586: -- bulk performance
12587: --
12580: 'RECEIVABLE';
12581:
12582: --
12583: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
12584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12585: --
12586: -- bulk performance
12587: --
12588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12584: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
12585: --
12586: -- bulk performance
12587: --
12588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12589:
12590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12592:
12586: -- bulk performance
12587: --
12588: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
12589:
12590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12592:
12593: -- 4955764
12594: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12590: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
12591: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
12592:
12593: -- 4955764
12594: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12595: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
12596:
12597: -- 4458381 Public Sector Enh
12598:
12634: l_rec_acct_attrs.array_num_value(15) := p_source_27;
12635: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
12636: l_rec_acct_attrs.array_char_value(16) := p_source_28;
12637:
12638: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12639: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12640:
12641: ---------------------------------------------------------------------------------------------------------------
12642: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12635: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
12636: l_rec_acct_attrs.array_char_value(16) := p_source_28;
12637:
12638: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12639: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12640:
12641: ---------------------------------------------------------------------------------------------------------------
12642: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12643: ---------------------------------------------------------------------------------------------------------------
12638: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
12639: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
12640:
12641: ---------------------------------------------------------------------------------------------------------------
12642: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12643: ---------------------------------------------------------------------------------------------------------------
12644: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12645:
12646: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12640:
12641: ---------------------------------------------------------------------------------------------------------------
12642: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12643: ---------------------------------------------------------------------------------------------------------------
12644: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12645:
12646: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12647: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12648:
12642: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
12643: ---------------------------------------------------------------------------------------------------------------
12644: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12645:
12646: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12647: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12648:
12649: IF xla_accounting_cache_pkg.GetValueChar
12650: (p_source_code => 'LEDGER_CATEGORY_CODE'
12643: ---------------------------------------------------------------------------------------------------------------
12644: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
12645:
12646: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12647: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
12648:
12649: IF xla_accounting_cache_pkg.GetValueChar
12650: (p_source_code => 'LEDGER_CATEGORY_CODE'
12651: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
12654: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
12655: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
12656: )
12657: THEN
12658: xla_ae_lines_pkg.BflowUpgEntry
12659: (p_business_method_code => l_bflow_method_code
12660: ,p_business_class_code => l_bflow_class_code
12661: ,p_balance_type => l_balance_type_code);
12662: ELSE
12694: , x_value_type_code => l_adr_value_type_code
12695: , p_side => 'NA'
12696: );
12697:
12698: xla_ae_lines_pkg.set_ccid(
12699: p_code_combination_id => l_ccid
12700: , p_value_type_code => l_adr_value_type_code
12701: , p_transaction_coa_id => l_adr_transaction_coa_id
12702: , p_accounting_coa_id => l_adr_accounting_coa_id
12730: xla_accounting_err_pkg.build_message
12731: (p_appli_s_name => 'XLA'
12732: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
12733: ,p_token_1 => 'LINE_NUMBER'
12734: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
12735: ,p_token_2 => 'LINE_TYPE_NAME'
12736: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
12737: l_component_type
12738: ,l_component_code
12766: --
12767: --
12768: ------------------------------------------------------------------------------------------------
12769: -- 4219869 Business Flow
12770: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12771: -- Prior Entry. Currently, the following code is always generated.
12772: ------------------------------------------------------------------------------------------------
12773: XLA_AE_LINES_PKG.ValidateCurrentLine;
12774:
12769: -- 4219869 Business Flow
12770: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
12771: -- Prior Entry. Currently, the following code is always generated.
12772: ------------------------------------------------------------------------------------------------
12773: XLA_AE_LINES_PKG.ValidateCurrentLine;
12774:
12775: ------------------------------------------------------------------------------------
12776: -- 4219869 Business Flow
12777: -- Populated credit and debit amounts -- Need to generate this within IF
12775: ------------------------------------------------------------------------------------
12776: -- 4219869 Business Flow
12777: -- Populated credit and debit amounts -- Need to generate this within IF
12778: ------------------------------------------------------------------------------------
12779: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12780:
12781: ----------------------------------------------------------------------------------
12782: -- 4219869 Business Flow
12783: -- Update journal entry status -- Need to generate this within IF
12807: -- To allow MPA report to determine if it should generate report process
12808: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12809: ------------------------------------------------------------------------------------------
12810:
12811: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12812: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12813: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12814: -- call ADRs
12815: -- Bug 4922099
12808: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
12809: ------------------------------------------------------------------------------------------
12810:
12811: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
12812: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
12813: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
12814: -- call ADRs
12815: -- Bug 4922099
12816: --
12832: , x_value_type_code => l_adr_value_type_code
12833: , p_side => 'NA'
12834: );
12835:
12836: xla_ae_lines_pkg.set_ccid(
12837: p_code_combination_id => l_ccid
12838: , p_value_type_code => l_adr_value_type_code
12839: , p_transaction_coa_id => l_adr_transaction_coa_id
12840: , p_accounting_coa_id => l_adr_accounting_coa_id
12855:
12856: --
12857: -- Update the line information that should be overwritten
12858: --
12859: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12860: p_header_num => 1);
12861: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12862:
12863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12857: -- Update the line information that should be overwritten
12858: --
12859: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12860: p_header_num => 1);
12861: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12862:
12863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12864:
12865: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12859: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
12860: p_header_num => 1);
12861: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
12862:
12863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12864:
12865: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12866: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12867: END IF;
12862:
12863: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
12864:
12865: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
12866: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
12867: END IF;
12868:
12869: --
12870: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12869: --
12870: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
12871: --
12872: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
12873: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
12874: ELSE
12875: ---------------------------------------------------------------------------------------------------
12876: -- 4262811a Switch Sign
12877: ---------------------------------------------------------------------------------------------------
12874: ELSE
12875: ---------------------------------------------------------------------------------------------------
12876: -- 4262811a Switch Sign
12877: ---------------------------------------------------------------------------------------------------
12878: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12875: ---------------------------------------------------------------------------------------------------
12876: -- 4262811a Switch Sign
12877: ---------------------------------------------------------------------------------------------------
12878: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12876: -- 4262811a Switch Sign
12877: ---------------------------------------------------------------------------------------------------
12878: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12884: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12877: ---------------------------------------------------------------------------------------------------
12878: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12884: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12885: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12878: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
12879: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12884: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12885: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12886:
12880: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12884: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12885: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12886:
12887: END IF;
12888:
12881: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
12882: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12883: -- 5132302
12884: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
12885: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
12886:
12887: END IF;
12888:
12889: -- 4955764
12886:
12887: END IF;
12888:
12889: -- 4955764
12890: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12891: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12892:
12893:
12894: XLA_AE_LINES_PKG.ValidateCurrentLine;
12890: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
12891: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12892:
12893:
12894: XLA_AE_LINES_PKG.ValidateCurrentLine;
12895: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12896:
12897: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12898: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12891: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
12892:
12893:
12894: XLA_AE_LINES_PKG.ValidateCurrentLine;
12895: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
12896:
12897: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
12898: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
12899: ,p_balance_type_code => l_balance_type_code);
13042: --
13043: -- bulk performance
13044: --
13045: l_balance_type_code VARCHAR2(1);
13046: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13047: l_log_module VARCHAR2(240);
13048:
13049: --
13050: -- Upgrade strategy
13112: ') = 'N'
13113: THEN
13114:
13115: --
13116: XLA_AE_LINES_PKG.SetNewLine;
13117:
13118: p_balance_type_code := l_balance_type_code;
13119: -- set the flag so later we will know whether the gain loss line needs to be created
13120:
13124:
13125: --
13126: -- bulk performance
13127: --
13128: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13129: p_header_num => 0); -- 4262811
13130: --
13131: -- set accounting line options
13132: --
13129: p_header_num => 0); -- 4262811
13130: --
13131: -- set accounting line options
13132: --
13133: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13134: p_natural_side_code => 'C'
13135: , p_gain_or_loss_flag => 'N'
13136: , p_gl_transfer_mode_code => 'S'
13137: , p_acct_entry_type_code => 'A'
13143: --
13144: --
13145: -- set accounting line type info
13146: --
13147: xla_ae_lines_pkg.SetAcctLineType
13148: (p_component_type => l_component_type
13149: ,p_event_type_code => l_event_type_code
13150: ,p_line_definition_owner_code => l_line_definition_owner_code
13151: ,p_line_definition_code => l_line_definition_code
13157: ,p_event_class_code => l_event_class_code);
13158: --
13159: -- set accounting class
13160: --
13161: xla_ae_lines_pkg.SetAcctClass(
13162: p_accounting_class_code => 'SHORT_TERM_DEBT'
13163: , p_ae_header_id => l_ae_header_id
13164: );
13165:
13165:
13166: --
13167: -- set rounding class
13168: --
13169: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13170: 'RECEIVABLE';
13171:
13172: --
13173: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13169: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13170: 'RECEIVABLE';
13171:
13172: --
13173: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13174: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13175: --
13176: -- bulk performance
13177: --
13170: 'RECEIVABLE';
13171:
13172: --
13173: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13174: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13175: --
13176: -- bulk performance
13177: --
13178: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13174: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13175: --
13176: -- bulk performance
13177: --
13178: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13179:
13180: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13181: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13182:
13176: -- bulk performance
13177: --
13178: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13179:
13180: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13181: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13182:
13183: -- 4955764
13184: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13180: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13181: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13182:
13183: -- 4955764
13184: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13185: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13186:
13187: -- 4458381 Public Sector Enh
13188:
13224: l_rec_acct_attrs.array_num_value(15) := p_source_27;
13225: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
13226: l_rec_acct_attrs.array_char_value(16) := p_source_28;
13227:
13228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13230:
13231: ---------------------------------------------------------------------------------------------------------------
13232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13225: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
13226: l_rec_acct_attrs.array_char_value(16) := p_source_28;
13227:
13228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13230:
13231: ---------------------------------------------------------------------------------------------------------------
13232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13233: ---------------------------------------------------------------------------------------------------------------
13228: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13229: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13230:
13231: ---------------------------------------------------------------------------------------------------------------
13232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13233: ---------------------------------------------------------------------------------------------------------------
13234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13235:
13236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13230:
13231: ---------------------------------------------------------------------------------------------------------------
13232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13233: ---------------------------------------------------------------------------------------------------------------
13234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13235:
13236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13238:
13232: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13233: ---------------------------------------------------------------------------------------------------------------
13234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13235:
13236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13238:
13239: IF xla_accounting_cache_pkg.GetValueChar
13240: (p_source_code => 'LEDGER_CATEGORY_CODE'
13233: ---------------------------------------------------------------------------------------------------------------
13234: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13235:
13236: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13237: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13238:
13239: IF xla_accounting_cache_pkg.GetValueChar
13240: (p_source_code => 'LEDGER_CATEGORY_CODE'
13241: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13244: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13245: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13246: )
13247: THEN
13248: xla_ae_lines_pkg.BflowUpgEntry
13249: (p_business_method_code => l_bflow_method_code
13250: ,p_business_class_code => l_bflow_class_code
13251: ,p_balance_type => l_balance_type_code);
13252: ELSE
13284: , x_value_type_code => l_adr_value_type_code
13285: , p_side => 'NA'
13286: );
13287:
13288: xla_ae_lines_pkg.set_ccid(
13289: p_code_combination_id => l_ccid
13290: , p_value_type_code => l_adr_value_type_code
13291: , p_transaction_coa_id => l_adr_transaction_coa_id
13292: , p_accounting_coa_id => l_adr_accounting_coa_id
13320: xla_accounting_err_pkg.build_message
13321: (p_appli_s_name => 'XLA'
13322: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13323: ,p_token_1 => 'LINE_NUMBER'
13324: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13325: ,p_token_2 => 'LINE_TYPE_NAME'
13326: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13327: l_component_type
13328: ,l_component_code
13356: --
13357: --
13358: ------------------------------------------------------------------------------------------------
13359: -- 4219869 Business Flow
13360: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13361: -- Prior Entry. Currently, the following code is always generated.
13362: ------------------------------------------------------------------------------------------------
13363: XLA_AE_LINES_PKG.ValidateCurrentLine;
13364:
13359: -- 4219869 Business Flow
13360: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13361: -- Prior Entry. Currently, the following code is always generated.
13362: ------------------------------------------------------------------------------------------------
13363: XLA_AE_LINES_PKG.ValidateCurrentLine;
13364:
13365: ------------------------------------------------------------------------------------
13366: -- 4219869 Business Flow
13367: -- Populated credit and debit amounts -- Need to generate this within IF
13365: ------------------------------------------------------------------------------------
13366: -- 4219869 Business Flow
13367: -- Populated credit and debit amounts -- Need to generate this within IF
13368: ------------------------------------------------------------------------------------
13369: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13370:
13371: ----------------------------------------------------------------------------------
13372: -- 4219869 Business Flow
13373: -- Update journal entry status -- Need to generate this within IF
13397: -- To allow MPA report to determine if it should generate report process
13398: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13399: ------------------------------------------------------------------------------------------
13400:
13401: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13402: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13403: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13404: -- call ADRs
13405: -- Bug 4922099
13398: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13399: ------------------------------------------------------------------------------------------
13400:
13401: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13402: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13403: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13404: -- call ADRs
13405: -- Bug 4922099
13406: --
13422: , x_value_type_code => l_adr_value_type_code
13423: , p_side => 'NA'
13424: );
13425:
13426: xla_ae_lines_pkg.set_ccid(
13427: p_code_combination_id => l_ccid
13428: , p_value_type_code => l_adr_value_type_code
13429: , p_transaction_coa_id => l_adr_transaction_coa_id
13430: , p_accounting_coa_id => l_adr_accounting_coa_id
13445:
13446: --
13447: -- Update the line information that should be overwritten
13448: --
13449: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13450: p_header_num => 1);
13451: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13452:
13453: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13447: -- Update the line information that should be overwritten
13448: --
13449: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13450: p_header_num => 1);
13451: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13452:
13453: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13454:
13455: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13449: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
13450: p_header_num => 1);
13451: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
13452:
13453: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13454:
13455: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13456: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13457: END IF;
13452:
13453: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
13454:
13455: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
13456: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
13457: END IF;
13458:
13459: --
13460: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13459: --
13460: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
13461: --
13462: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
13463: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
13464: ELSE
13465: ---------------------------------------------------------------------------------------------------
13466: -- 4262811a Switch Sign
13467: ---------------------------------------------------------------------------------------------------
13464: ELSE
13465: ---------------------------------------------------------------------------------------------------
13466: -- 4262811a Switch Sign
13467: ---------------------------------------------------------------------------------------------------
13468: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13465: ---------------------------------------------------------------------------------------------------
13466: -- 4262811a Switch Sign
13467: ---------------------------------------------------------------------------------------------------
13468: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13466: -- 4262811a Switch Sign
13467: ---------------------------------------------------------------------------------------------------
13468: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13474: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13467: ---------------------------------------------------------------------------------------------------
13468: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13474: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13475: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13468: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
13469: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13474: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13475: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13476:
13470: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13474: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13475: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13476:
13477: END IF;
13478:
13471: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
13472: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13473: -- 5132302
13474: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
13475: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
13476:
13477: END IF;
13478:
13479: -- 4955764
13476:
13477: END IF;
13478:
13479: -- 4955764
13480: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13481: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13482:
13483:
13484: XLA_AE_LINES_PKG.ValidateCurrentLine;
13480: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13481: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13482:
13483:
13484: XLA_AE_LINES_PKG.ValidateCurrentLine;
13485: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13486:
13487: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13488: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13481: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
13482:
13483:
13484: XLA_AE_LINES_PKG.ValidateCurrentLine;
13485: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13486:
13487: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
13488: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
13489: ,p_balance_type_code => l_balance_type_code);
13610: --
13611: -- bulk performance
13612: --
13613: l_balance_type_code VARCHAR2(1);
13614: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
13615: l_log_module VARCHAR2(240);
13616:
13617: --
13618: -- Upgrade strategy
13679: IF XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id = XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id OR
13680: l_balance_type_code <> 'B' THEN
13681:
13682: --
13683: XLA_AE_LINES_PKG.SetNewLine;
13684:
13685: p_balance_type_code := l_balance_type_code;
13686: -- set the flag so later we will know whether the gain loss line needs to be created
13687:
13691:
13692: --
13693: -- bulk performance
13694: --
13695: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
13696: p_header_num => 0); -- 4262811
13697: --
13698: -- set accounting line options
13699: --
13696: p_header_num => 0); -- 4262811
13697: --
13698: -- set accounting line options
13699: --
13700: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
13701: p_natural_side_code => 'G'
13702: , p_gain_or_loss_flag => 'N'
13703: , p_gl_transfer_mode_code => 'S'
13704: , p_acct_entry_type_code => 'A'
13710: --
13711: --
13712: -- set accounting line type info
13713: --
13714: xla_ae_lines_pkg.SetAcctLineType
13715: (p_component_type => l_component_type
13716: ,p_event_type_code => l_event_type_code
13717: ,p_line_definition_owner_code => l_line_definition_owner_code
13718: ,p_line_definition_code => l_line_definition_code
13724: ,p_event_class_code => l_event_class_code);
13725: --
13726: -- set accounting class
13727: --
13728: xla_ae_lines_pkg.SetAcctClass(
13729: p_accounting_class_code => 'EXCHANGE_GAIN_LOSS'
13730: , p_ae_header_id => l_ae_header_id
13731: );
13732:
13732:
13733: --
13734: -- set rounding class
13735: --
13736: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13737: 'EXCHANGE_GAIN_LOSS';
13738:
13739: --
13740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13736: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
13737: 'EXCHANGE_GAIN_LOSS';
13738:
13739: --
13740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13742: --
13743: -- bulk performance
13744: --
13737: 'EXCHANGE_GAIN_LOSS';
13738:
13739: --
13740: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
13741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13742: --
13743: -- bulk performance
13744: --
13745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13741: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
13742: --
13743: -- bulk performance
13744: --
13745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13746:
13747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13749:
13743: -- bulk performance
13744: --
13745: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
13746:
13747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13749:
13750: -- 4955764
13751: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13747: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
13748: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
13749:
13750: -- 4955764
13751: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
13752: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
13753:
13754: -- 4458381 Public Sector Enh
13755:
13771: l_rec_acct_attrs.array_num_value(5) := p_source_27;
13772: l_rec_acct_attrs.array_acct_attr_code(6) := 'PARTY_TYPE';
13773: l_rec_acct_attrs.array_char_value(6) := p_source_28;
13774:
13775: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13776: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13777:
13778: ---------------------------------------------------------------------------------------------------------------
13779: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13772: l_rec_acct_attrs.array_acct_attr_code(6) := 'PARTY_TYPE';
13773: l_rec_acct_attrs.array_char_value(6) := p_source_28;
13774:
13775: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13776: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13777:
13778: ---------------------------------------------------------------------------------------------------------------
13779: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13780: ---------------------------------------------------------------------------------------------------------------
13775: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
13776: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
13777:
13778: ---------------------------------------------------------------------------------------------------------------
13779: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13780: ---------------------------------------------------------------------------------------------------------------
13781: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13782:
13783: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13777:
13778: ---------------------------------------------------------------------------------------------------------------
13779: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13780: ---------------------------------------------------------------------------------------------------------------
13781: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13782:
13783: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13784: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13785:
13779: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
13780: ---------------------------------------------------------------------------------------------------------------
13781: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13782:
13783: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13784: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13785:
13786: IF xla_accounting_cache_pkg.GetValueChar
13787: (p_source_code => 'LEDGER_CATEGORY_CODE'
13780: ---------------------------------------------------------------------------------------------------------------
13781: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
13782:
13783: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13784: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
13785:
13786: IF xla_accounting_cache_pkg.GetValueChar
13787: (p_source_code => 'LEDGER_CATEGORY_CODE'
13788: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
13791: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
13792: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
13793: )
13794: THEN
13795: xla_ae_lines_pkg.BflowUpgEntry
13796: (p_business_method_code => l_bflow_method_code
13797: ,p_business_class_code => l_bflow_class_code
13798: ,p_balance_type => l_balance_type_code);
13799: ELSE
13831: , x_value_type_code => l_adr_value_type_code
13832: , p_side => 'CREDIT'
13833: );
13834:
13835: xla_ae_lines_pkg.set_ccid(
13836: p_code_combination_id => l_ccid
13837: , p_value_type_code => l_adr_value_type_code
13838: , p_transaction_coa_id => l_adr_transaction_coa_id
13839: , p_accounting_coa_id => l_adr_accounting_coa_id
13857: , x_value_type_code => l_adr_value_type_code
13858: , p_side => 'DEBIT'
13859: );
13860:
13861: xla_ae_lines_pkg.set_ccid(
13862: p_code_combination_id => l_ccid
13863: , p_value_type_code => l_adr_value_type_code
13864: , p_transaction_coa_id => l_adr_transaction_coa_id
13865: , p_accounting_coa_id => l_adr_accounting_coa_id
13893: xla_accounting_err_pkg.build_message
13894: (p_appli_s_name => 'XLA'
13895: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
13896: ,p_token_1 => 'LINE_NUMBER'
13897: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
13898: ,p_token_2 => 'LINE_TYPE_NAME'
13899: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
13900: l_component_type
13901: ,l_component_code
13929: --
13930: --
13931: ------------------------------------------------------------------------------------------------
13932: -- 4219869 Business Flow
13933: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13934: -- Prior Entry. Currently, the following code is always generated.
13935: ------------------------------------------------------------------------------------------------
13936: XLA_AE_LINES_PKG.ValidateCurrentLine;
13937:
13932: -- 4219869 Business Flow
13933: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
13934: -- Prior Entry. Currently, the following code is always generated.
13935: ------------------------------------------------------------------------------------------------
13936: XLA_AE_LINES_PKG.ValidateCurrentLine;
13937:
13938: ------------------------------------------------------------------------------------
13939: -- 4219869 Business Flow
13940: -- Populated credit and debit amounts -- Need to generate this within IF
13938: ------------------------------------------------------------------------------------
13939: -- 4219869 Business Flow
13940: -- Populated credit and debit amounts -- Need to generate this within IF
13941: ------------------------------------------------------------------------------------
13942: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
13943:
13944: ----------------------------------------------------------------------------------
13945: -- 4219869 Business Flow
13946: -- Update journal entry status -- Need to generate this within IF
13970: -- To allow MPA report to determine if it should generate report process
13971: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13972: ------------------------------------------------------------------------------------------
13973:
13974: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13975: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13976: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13977: -- call ADRs
13978: -- Bug 4922099
13971: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
13972: ------------------------------------------------------------------------------------------
13973:
13974: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
13975: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
13976: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
13977: -- call ADRs
13978: -- Bug 4922099
13979: --
13995: , x_value_type_code => l_adr_value_type_code
13996: , p_side => 'CREDIT'
13997: );
13998:
13999: xla_ae_lines_pkg.set_ccid(
14000: p_code_combination_id => l_ccid
14001: , p_value_type_code => l_adr_value_type_code
14002: , p_transaction_coa_id => l_adr_transaction_coa_id
14003: , p_accounting_coa_id => l_adr_accounting_coa_id
14021: , x_value_type_code => l_adr_value_type_code
14022: , p_side => 'DEBIT'
14023: );
14024:
14025: xla_ae_lines_pkg.set_ccid(
14026: p_code_combination_id => l_ccid
14027: , p_value_type_code => l_adr_value_type_code
14028: , p_transaction_coa_id => l_adr_transaction_coa_id
14029: , p_accounting_coa_id => l_adr_accounting_coa_id
14044:
14045: --
14046: -- Update the line information that should be overwritten
14047: --
14048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14049: p_header_num => 1);
14050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14051:
14052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14046: -- Update the line information that should be overwritten
14047: --
14048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14049: p_header_num => 1);
14050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14051:
14052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14053:
14054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14048: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14049: p_header_num => 1);
14050: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14051:
14052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14053:
14054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14055: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14056: END IF;
14051:
14052: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14053:
14054: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14055: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14056: END IF;
14057:
14058: --
14059: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14058: --
14059: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14060: --
14061: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14062: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14063: ELSE
14064: ---------------------------------------------------------------------------------------------------
14065: -- 4262811a Switch Sign
14066: ---------------------------------------------------------------------------------------------------
14063: ELSE
14064: ---------------------------------------------------------------------------------------------------
14065: -- 4262811a Switch Sign
14066: ---------------------------------------------------------------------------------------------------
14067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14064: ---------------------------------------------------------------------------------------------------
14065: -- 4262811a Switch Sign
14066: ---------------------------------------------------------------------------------------------------
14067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14065: -- 4262811a Switch Sign
14066: ---------------------------------------------------------------------------------------------------
14067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14066: ---------------------------------------------------------------------------------------------------
14067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14067: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14068: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14075:
14069: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14075:
14076: END IF;
14077:
14070: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14071: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14072: -- 5132302
14073: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14074: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14075:
14076: END IF;
14077:
14078: -- 4955764
14075:
14076: END IF;
14077:
14078: -- 4955764
14079: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14081:
14082:
14083: XLA_AE_LINES_PKG.ValidateCurrentLine;
14079: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14081:
14082:
14083: XLA_AE_LINES_PKG.ValidateCurrentLine;
14084: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14085:
14086: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14087: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14080: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14081:
14082:
14083: XLA_AE_LINES_PKG.ValidateCurrentLine;
14084: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14085:
14086: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14087: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14088: ,p_balance_type_code => l_balance_type_code);
14232: --
14233: -- bulk performance
14234: --
14235: l_balance_type_code VARCHAR2(1);
14236: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14237: l_log_module VARCHAR2(240);
14238:
14239: --
14240: -- Upgrade strategy
14304: ') = 'N'
14305: THEN
14306:
14307: --
14308: XLA_AE_LINES_PKG.SetNewLine;
14309:
14310: p_balance_type_code := l_balance_type_code;
14311: -- set the flag so later we will know whether the gain loss line needs to be created
14312:
14316:
14317: --
14318: -- bulk performance
14319: --
14320: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14321: p_header_num => 0); -- 4262811
14322: --
14323: -- set accounting line options
14324: --
14321: p_header_num => 0); -- 4262811
14322: --
14323: -- set accounting line options
14324: --
14325: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14326: p_natural_side_code => 'C'
14327: , p_gain_or_loss_flag => 'N'
14328: , p_gl_transfer_mode_code => 'S'
14329: , p_acct_entry_type_code => 'A'
14335: --
14336: --
14337: -- set accounting line type info
14338: --
14339: xla_ae_lines_pkg.SetAcctLineType
14340: (p_component_type => l_component_type
14341: ,p_event_type_code => l_event_type_code
14342: ,p_line_definition_owner_code => l_line_definition_owner_code
14343: ,p_line_definition_code => l_line_definition_code
14349: ,p_event_class_code => l_event_class_code);
14350: --
14351: -- set accounting class
14352: --
14353: xla_ae_lines_pkg.SetAcctClass(
14354: p_accounting_class_code => 'FACTOR'
14355: , p_ae_header_id => l_ae_header_id
14356: );
14357:
14357:
14358: --
14359: -- set rounding class
14360: --
14361: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14362: 'RECEIVABLE';
14363:
14364: --
14365: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14361: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14362: 'RECEIVABLE';
14363:
14364: --
14365: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14366: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14367: --
14368: -- bulk performance
14369: --
14362: 'RECEIVABLE';
14363:
14364: --
14365: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14366: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14367: --
14368: -- bulk performance
14369: --
14370: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14366: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14367: --
14368: -- bulk performance
14369: --
14370: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14371:
14372: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14373: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14374:
14368: -- bulk performance
14369: --
14370: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14371:
14372: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14373: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14374:
14375: -- 4955764
14376: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14372: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14373: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14374:
14375: -- 4955764
14376: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14377: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
14378:
14379: -- 4458381 Public Sector Enh
14380:
14416: l_rec_acct_attrs.array_num_value(15) := p_source_27;
14417: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
14418: l_rec_acct_attrs.array_char_value(16) := p_source_28;
14419:
14420: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14421: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14422:
14423: ---------------------------------------------------------------------------------------------------------------
14424: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14417: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
14418: l_rec_acct_attrs.array_char_value(16) := p_source_28;
14419:
14420: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14421: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14422:
14423: ---------------------------------------------------------------------------------------------------------------
14424: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14425: ---------------------------------------------------------------------------------------------------------------
14420: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
14421: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
14422:
14423: ---------------------------------------------------------------------------------------------------------------
14424: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14425: ---------------------------------------------------------------------------------------------------------------
14426: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14427:
14428: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14422:
14423: ---------------------------------------------------------------------------------------------------------------
14424: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14425: ---------------------------------------------------------------------------------------------------------------
14426: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14427:
14428: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14429: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14430:
14424: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
14425: ---------------------------------------------------------------------------------------------------------------
14426: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14427:
14428: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14429: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14430:
14431: IF xla_accounting_cache_pkg.GetValueChar
14432: (p_source_code => 'LEDGER_CATEGORY_CODE'
14425: ---------------------------------------------------------------------------------------------------------------
14426: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
14427:
14428: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14429: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
14430:
14431: IF xla_accounting_cache_pkg.GetValueChar
14432: (p_source_code => 'LEDGER_CATEGORY_CODE'
14433: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
14436: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
14437: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
14438: )
14439: THEN
14440: xla_ae_lines_pkg.BflowUpgEntry
14441: (p_business_method_code => l_bflow_method_code
14442: ,p_business_class_code => l_bflow_class_code
14443: ,p_balance_type => l_balance_type_code);
14444: ELSE
14476: , x_value_type_code => l_adr_value_type_code
14477: , p_side => 'NA'
14478: );
14479:
14480: xla_ae_lines_pkg.set_ccid(
14481: p_code_combination_id => l_ccid
14482: , p_value_type_code => l_adr_value_type_code
14483: , p_transaction_coa_id => l_adr_transaction_coa_id
14484: , p_accounting_coa_id => l_adr_accounting_coa_id
14512: xla_accounting_err_pkg.build_message
14513: (p_appli_s_name => 'XLA'
14514: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
14515: ,p_token_1 => 'LINE_NUMBER'
14516: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
14517: ,p_token_2 => 'LINE_TYPE_NAME'
14518: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
14519: l_component_type
14520: ,l_component_code
14548: --
14549: --
14550: ------------------------------------------------------------------------------------------------
14551: -- 4219869 Business Flow
14552: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14553: -- Prior Entry. Currently, the following code is always generated.
14554: ------------------------------------------------------------------------------------------------
14555: XLA_AE_LINES_PKG.ValidateCurrentLine;
14556:
14551: -- 4219869 Business Flow
14552: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
14553: -- Prior Entry. Currently, the following code is always generated.
14554: ------------------------------------------------------------------------------------------------
14555: XLA_AE_LINES_PKG.ValidateCurrentLine;
14556:
14557: ------------------------------------------------------------------------------------
14558: -- 4219869 Business Flow
14559: -- Populated credit and debit amounts -- Need to generate this within IF
14557: ------------------------------------------------------------------------------------
14558: -- 4219869 Business Flow
14559: -- Populated credit and debit amounts -- Need to generate this within IF
14560: ------------------------------------------------------------------------------------
14561: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14562:
14563: ----------------------------------------------------------------------------------
14564: -- 4219869 Business Flow
14565: -- Update journal entry status -- Need to generate this within IF
14589: -- To allow MPA report to determine if it should generate report process
14590: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14591: ------------------------------------------------------------------------------------------
14592:
14593: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14594: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14595: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
14596: -- call ADRs
14597: -- Bug 4922099
14590: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
14591: ------------------------------------------------------------------------------------------
14592:
14593: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
14594: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
14595: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
14596: -- call ADRs
14597: -- Bug 4922099
14598: --
14614: , x_value_type_code => l_adr_value_type_code
14615: , p_side => 'NA'
14616: );
14617:
14618: xla_ae_lines_pkg.set_ccid(
14619: p_code_combination_id => l_ccid
14620: , p_value_type_code => l_adr_value_type_code
14621: , p_transaction_coa_id => l_adr_transaction_coa_id
14622: , p_accounting_coa_id => l_adr_accounting_coa_id
14637:
14638: --
14639: -- Update the line information that should be overwritten
14640: --
14641: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14642: p_header_num => 1);
14643: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14644:
14645: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14639: -- Update the line information that should be overwritten
14640: --
14641: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14642: p_header_num => 1);
14643: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14644:
14645: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14646:
14647: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14641: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
14642: p_header_num => 1);
14643: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
14644:
14645: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14646:
14647: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14648: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14649: END IF;
14644:
14645: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
14646:
14647: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
14648: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
14649: END IF;
14650:
14651: --
14652: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14651: --
14652: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
14653: --
14654: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
14655: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
14656: ELSE
14657: ---------------------------------------------------------------------------------------------------
14658: -- 4262811a Switch Sign
14659: ---------------------------------------------------------------------------------------------------
14656: ELSE
14657: ---------------------------------------------------------------------------------------------------
14658: -- 4262811a Switch Sign
14659: ---------------------------------------------------------------------------------------------------
14660: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14661: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14657: ---------------------------------------------------------------------------------------------------
14658: -- 4262811a Switch Sign
14659: ---------------------------------------------------------------------------------------------------
14660: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14661: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14658: -- 4262811a Switch Sign
14659: ---------------------------------------------------------------------------------------------------
14660: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14661: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14666: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14659: ---------------------------------------------------------------------------------------------------
14660: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14661: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14666: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14667: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14660: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
14661: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14666: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14667: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14668:
14662: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14666: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14667: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14668:
14669: END IF;
14670:
14663: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
14664: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14665: -- 5132302
14666: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
14667: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
14668:
14669: END IF;
14670:
14671: -- 4955764
14668:
14669: END IF;
14670:
14671: -- 4955764
14672: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14673: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14674:
14675:
14676: XLA_AE_LINES_PKG.ValidateCurrentLine;
14672: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14673: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14674:
14675:
14676: XLA_AE_LINES_PKG.ValidateCurrentLine;
14677: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14678:
14679: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14680: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14673: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
14674:
14675:
14676: XLA_AE_LINES_PKG.ValidateCurrentLine;
14677: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
14678:
14679: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
14680: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
14681: ,p_balance_type_code => l_balance_type_code);
14826: --
14827: -- bulk performance
14828: --
14829: l_balance_type_code VARCHAR2(1);
14830: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
14831: l_log_module VARCHAR2(240);
14832:
14833: --
14834: -- Upgrade strategy
14898: ') = 'N'
14899: THEN
14900:
14901: --
14902: XLA_AE_LINES_PKG.SetNewLine;
14903:
14904: p_balance_type_code := l_balance_type_code;
14905: -- set the flag so later we will know whether the gain loss line needs to be created
14906:
14910:
14911: --
14912: -- bulk performance
14913: --
14914: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
14915: p_header_num => 0); -- 4262811
14916: --
14917: -- set accounting line options
14918: --
14915: p_header_num => 0); -- 4262811
14916: --
14917: -- set accounting line options
14918: --
14919: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
14920: p_natural_side_code => 'C'
14921: , p_gain_or_loss_flag => 'N'
14922: , p_gl_transfer_mode_code => 'S'
14923: , p_acct_entry_type_code => 'A'
14929: --
14930: --
14931: -- set accounting line type info
14932: --
14933: xla_ae_lines_pkg.SetAcctLineType
14934: (p_component_type => l_component_type
14935: ,p_event_type_code => l_event_type_code
14936: ,p_line_definition_owner_code => l_line_definition_owner_code
14937: ,p_line_definition_code => l_line_definition_code
14943: ,p_event_class_code => l_event_class_code);
14944: --
14945: -- set accounting class
14946: --
14947: xla_ae_lines_pkg.SetAcctClass(
14948: p_accounting_class_code => 'FAC_BR'
14949: , p_ae_header_id => l_ae_header_id
14950: );
14951:
14951:
14952: --
14953: -- set rounding class
14954: --
14955: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14956: 'RECEIVABLE';
14957:
14958: --
14959: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14955: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
14956: 'RECEIVABLE';
14957:
14958: --
14959: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14960: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14961: --
14962: -- bulk performance
14963: --
14956: 'RECEIVABLE';
14957:
14958: --
14959: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
14960: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14961: --
14962: -- bulk performance
14963: --
14964: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14960: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
14961: --
14962: -- bulk performance
14963: --
14964: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14965:
14966: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14967: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14968:
14962: -- bulk performance
14963: --
14964: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
14965:
14966: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14967: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14968:
14969: -- 4955764
14970: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14966: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
14967: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
14968:
14969: -- 4955764
14970: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
14971: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
14972:
14973: -- 4458381 Public Sector Enh
14974:
15010: l_rec_acct_attrs.array_num_value(15) := p_source_27;
15011: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
15012: l_rec_acct_attrs.array_char_value(16) := p_source_28;
15013:
15014: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15015: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15016:
15017: ---------------------------------------------------------------------------------------------------------------
15018: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15011: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
15012: l_rec_acct_attrs.array_char_value(16) := p_source_28;
15013:
15014: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15015: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15016:
15017: ---------------------------------------------------------------------------------------------------------------
15018: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15019: ---------------------------------------------------------------------------------------------------------------
15014: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15015: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15016:
15017: ---------------------------------------------------------------------------------------------------------------
15018: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15019: ---------------------------------------------------------------------------------------------------------------
15020: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15021:
15022: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15016:
15017: ---------------------------------------------------------------------------------------------------------------
15018: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15019: ---------------------------------------------------------------------------------------------------------------
15020: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15021:
15022: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15023: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15024:
15018: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15019: ---------------------------------------------------------------------------------------------------------------
15020: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15021:
15022: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15023: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15024:
15025: IF xla_accounting_cache_pkg.GetValueChar
15026: (p_source_code => 'LEDGER_CATEGORY_CODE'
15019: ---------------------------------------------------------------------------------------------------------------
15020: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15021:
15022: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15023: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15024:
15025: IF xla_accounting_cache_pkg.GetValueChar
15026: (p_source_code => 'LEDGER_CATEGORY_CODE'
15027: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
15030: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
15031: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
15032: )
15033: THEN
15034: xla_ae_lines_pkg.BflowUpgEntry
15035: (p_business_method_code => l_bflow_method_code
15036: ,p_business_class_code => l_bflow_class_code
15037: ,p_balance_type => l_balance_type_code);
15038: ELSE
15070: , x_value_type_code => l_adr_value_type_code
15071: , p_side => 'NA'
15072: );
15073:
15074: xla_ae_lines_pkg.set_ccid(
15075: p_code_combination_id => l_ccid
15076: , p_value_type_code => l_adr_value_type_code
15077: , p_transaction_coa_id => l_adr_transaction_coa_id
15078: , p_accounting_coa_id => l_adr_accounting_coa_id
15106: xla_accounting_err_pkg.build_message
15107: (p_appli_s_name => 'XLA'
15108: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15109: ,p_token_1 => 'LINE_NUMBER'
15110: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15111: ,p_token_2 => 'LINE_TYPE_NAME'
15112: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15113: l_component_type
15114: ,l_component_code
15142: --
15143: --
15144: ------------------------------------------------------------------------------------------------
15145: -- 4219869 Business Flow
15146: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15147: -- Prior Entry. Currently, the following code is always generated.
15148: ------------------------------------------------------------------------------------------------
15149: XLA_AE_LINES_PKG.ValidateCurrentLine;
15150:
15145: -- 4219869 Business Flow
15146: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15147: -- Prior Entry. Currently, the following code is always generated.
15148: ------------------------------------------------------------------------------------------------
15149: XLA_AE_LINES_PKG.ValidateCurrentLine;
15150:
15151: ------------------------------------------------------------------------------------
15152: -- 4219869 Business Flow
15153: -- Populated credit and debit amounts -- Need to generate this within IF
15151: ------------------------------------------------------------------------------------
15152: -- 4219869 Business Flow
15153: -- Populated credit and debit amounts -- Need to generate this within IF
15154: ------------------------------------------------------------------------------------
15155: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15156:
15157: ----------------------------------------------------------------------------------
15158: -- 4219869 Business Flow
15159: -- Update journal entry status -- Need to generate this within IF
15183: -- To allow MPA report to determine if it should generate report process
15184: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15185: ------------------------------------------------------------------------------------------
15186:
15187: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15188: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15189: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
15190: -- call ADRs
15191: -- Bug 4922099
15184: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15185: ------------------------------------------------------------------------------------------
15186:
15187: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15188: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15189: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
15190: -- call ADRs
15191: -- Bug 4922099
15192: --
15208: , x_value_type_code => l_adr_value_type_code
15209: , p_side => 'NA'
15210: );
15211:
15212: xla_ae_lines_pkg.set_ccid(
15213: p_code_combination_id => l_ccid
15214: , p_value_type_code => l_adr_value_type_code
15215: , p_transaction_coa_id => l_adr_transaction_coa_id
15216: , p_accounting_coa_id => l_adr_accounting_coa_id
15231:
15232: --
15233: -- Update the line information that should be overwritten
15234: --
15235: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15236: p_header_num => 1);
15237: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15238:
15239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15233: -- Update the line information that should be overwritten
15234: --
15235: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15236: p_header_num => 1);
15237: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15238:
15239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15240:
15241: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15235: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15236: p_header_num => 1);
15237: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15238:
15239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15240:
15241: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15242: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15243: END IF;
15238:
15239: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15240:
15241: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15242: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15243: END IF;
15244:
15245: --
15246: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15245: --
15246: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15247: --
15248: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15249: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15250: ELSE
15251: ---------------------------------------------------------------------------------------------------
15252: -- 4262811a Switch Sign
15253: ---------------------------------------------------------------------------------------------------
15250: ELSE
15251: ---------------------------------------------------------------------------------------------------
15252: -- 4262811a Switch Sign
15253: ---------------------------------------------------------------------------------------------------
15254: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15255: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15251: ---------------------------------------------------------------------------------------------------
15252: -- 4262811a Switch Sign
15253: ---------------------------------------------------------------------------------------------------
15254: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15255: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15252: -- 4262811a Switch Sign
15253: ---------------------------------------------------------------------------------------------------
15254: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15255: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15260: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15253: ---------------------------------------------------------------------------------------------------
15254: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15255: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15260: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15254: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15255: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15260: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15262:
15256: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15260: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15262:
15263: END IF;
15264:
15257: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15258: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15259: -- 5132302
15260: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15261: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15262:
15263: END IF;
15264:
15265: -- 4955764
15262:
15263: END IF;
15264:
15265: -- 4955764
15266: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15267: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15268:
15269:
15270: XLA_AE_LINES_PKG.ValidateCurrentLine;
15266: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15267: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15268:
15269:
15270: XLA_AE_LINES_PKG.ValidateCurrentLine;
15271: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15272:
15273: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15274: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15267: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15268:
15269:
15270: XLA_AE_LINES_PKG.ValidateCurrentLine;
15271: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15272:
15273: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15274: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15275: ,p_balance_type_code => l_balance_type_code);
15420: --
15421: -- bulk performance
15422: --
15423: l_balance_type_code VARCHAR2(1);
15424: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
15425: l_log_module VARCHAR2(240);
15426:
15427: --
15428: -- Upgrade strategy
15494: ') = 'N'
15495: THEN
15496:
15497: --
15498: XLA_AE_LINES_PKG.SetNewLine;
15499:
15500: p_balance_type_code := l_balance_type_code;
15501: -- set the flag so later we will know whether the gain loss line needs to be created
15502:
15506:
15507: --
15508: -- bulk performance
15509: --
15510: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
15511: p_header_num => 0); -- 4262811
15512: --
15513: -- set accounting line options
15514: --
15511: p_header_num => 0); -- 4262811
15512: --
15513: -- set accounting line options
15514: --
15515: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
15516: p_natural_side_code => 'C'
15517: , p_gain_or_loss_flag => 'N'
15518: , p_gl_transfer_mode_code => 'S'
15519: , p_acct_entry_type_code => 'A'
15525: --
15526: --
15527: -- set accounting line type info
15528: --
15529: xla_ae_lines_pkg.SetAcctLineType
15530: (p_component_type => l_component_type
15531: ,p_event_type_code => l_event_type_code
15532: ,p_line_definition_owner_code => l_line_definition_owner_code
15533: ,p_line_definition_code => l_line_definition_code
15539: ,p_event_class_code => l_event_class_code);
15540: --
15541: -- set accounting class
15542: --
15543: xla_ae_lines_pkg.SetAcctClass(
15544: p_accounting_class_code => 'PMT_NET'
15545: , p_ae_header_id => l_ae_header_id
15546: );
15547:
15547:
15548: --
15549: -- set rounding class
15550: --
15551: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15552: 'RECEIVABLE';
15553:
15554: --
15555: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15551: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
15552: 'RECEIVABLE';
15553:
15554: --
15555: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15556: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15557: --
15558: -- bulk performance
15559: --
15552: 'RECEIVABLE';
15553:
15554: --
15555: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
15556: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15557: --
15558: -- bulk performance
15559: --
15560: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15556: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
15557: --
15558: -- bulk performance
15559: --
15560: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15561:
15562: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15563: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15564:
15558: -- bulk performance
15559: --
15560: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
15561:
15562: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15563: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15564:
15565: -- 4955764
15566: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15562: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
15563: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
15564:
15565: -- 4955764
15566: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15567: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
15568:
15569: -- 4458381 Public Sector Enh
15570:
15606: l_rec_acct_attrs.array_num_value(15) := p_source_27;
15607: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
15608: l_rec_acct_attrs.array_char_value(16) := p_source_28;
15609:
15610: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15611: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15612:
15613: ---------------------------------------------------------------------------------------------------------------
15614: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15607: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
15608: l_rec_acct_attrs.array_char_value(16) := p_source_28;
15609:
15610: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15611: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15612:
15613: ---------------------------------------------------------------------------------------------------------------
15614: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15615: ---------------------------------------------------------------------------------------------------------------
15610: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
15611: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
15612:
15613: ---------------------------------------------------------------------------------------------------------------
15614: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15615: ---------------------------------------------------------------------------------------------------------------
15616: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15617:
15618: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15612:
15613: ---------------------------------------------------------------------------------------------------------------
15614: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15615: ---------------------------------------------------------------------------------------------------------------
15616: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15617:
15618: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15619: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15620:
15614: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
15615: ---------------------------------------------------------------------------------------------------------------
15616: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15617:
15618: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15619: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15620:
15621: IF xla_accounting_cache_pkg.GetValueChar
15622: (p_source_code => 'LEDGER_CATEGORY_CODE'
15615: ---------------------------------------------------------------------------------------------------------------
15616: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
15617:
15618: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15619: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
15620:
15621: IF xla_accounting_cache_pkg.GetValueChar
15622: (p_source_code => 'LEDGER_CATEGORY_CODE'
15623: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
15626: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
15627: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
15628: )
15629: THEN
15630: xla_ae_lines_pkg.BflowUpgEntry
15631: (p_business_method_code => l_bflow_method_code
15632: ,p_business_class_code => l_bflow_class_code
15633: ,p_balance_type => l_balance_type_code);
15634: ELSE
15666: , x_value_type_code => l_adr_value_type_code
15667: , p_side => 'NA'
15668: );
15669:
15670: xla_ae_lines_pkg.set_ccid(
15671: p_code_combination_id => l_ccid
15672: , p_value_type_code => l_adr_value_type_code
15673: , p_transaction_coa_id => l_adr_transaction_coa_id
15674: , p_accounting_coa_id => l_adr_accounting_coa_id
15702: xla_accounting_err_pkg.build_message
15703: (p_appli_s_name => 'XLA'
15704: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
15705: ,p_token_1 => 'LINE_NUMBER'
15706: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
15707: ,p_token_2 => 'LINE_TYPE_NAME'
15708: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
15709: l_component_type
15710: ,l_component_code
15738: --
15739: --
15740: ------------------------------------------------------------------------------------------------
15741: -- 4219869 Business Flow
15742: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15743: -- Prior Entry. Currently, the following code is always generated.
15744: ------------------------------------------------------------------------------------------------
15745: XLA_AE_LINES_PKG.ValidateCurrentLine;
15746:
15741: -- 4219869 Business Flow
15742: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
15743: -- Prior Entry. Currently, the following code is always generated.
15744: ------------------------------------------------------------------------------------------------
15745: XLA_AE_LINES_PKG.ValidateCurrentLine;
15746:
15747: ------------------------------------------------------------------------------------
15748: -- 4219869 Business Flow
15749: -- Populated credit and debit amounts -- Need to generate this within IF
15747: ------------------------------------------------------------------------------------
15748: -- 4219869 Business Flow
15749: -- Populated credit and debit amounts -- Need to generate this within IF
15750: ------------------------------------------------------------------------------------
15751: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15752:
15753: ----------------------------------------------------------------------------------
15754: -- 4219869 Business Flow
15755: -- Update journal entry status -- Need to generate this within IF
15779: -- To allow MPA report to determine if it should generate report process
15780: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15781: ------------------------------------------------------------------------------------------
15782:
15783: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15784: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15785: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
15786: -- call ADRs
15787: -- Bug 4922099
15780: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
15781: ------------------------------------------------------------------------------------------
15782:
15783: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
15784: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
15785: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
15786: -- call ADRs
15787: -- Bug 4922099
15788: --
15804: , x_value_type_code => l_adr_value_type_code
15805: , p_side => 'NA'
15806: );
15807:
15808: xla_ae_lines_pkg.set_ccid(
15809: p_code_combination_id => l_ccid
15810: , p_value_type_code => l_adr_value_type_code
15811: , p_transaction_coa_id => l_adr_transaction_coa_id
15812: , p_accounting_coa_id => l_adr_accounting_coa_id
15827:
15828: --
15829: -- Update the line information that should be overwritten
15830: --
15831: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15832: p_header_num => 1);
15833: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15834:
15835: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15829: -- Update the line information that should be overwritten
15830: --
15831: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15832: p_header_num => 1);
15833: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15834:
15835: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15836:
15837: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15831: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
15832: p_header_num => 1);
15833: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
15834:
15835: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15836:
15837: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15838: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15839: END IF;
15834:
15835: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
15836:
15837: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
15838: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
15839: END IF;
15840:
15841: --
15842: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15841: --
15842: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
15843: --
15844: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
15845: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
15846: ELSE
15847: ---------------------------------------------------------------------------------------------------
15848: -- 4262811a Switch Sign
15849: ---------------------------------------------------------------------------------------------------
15846: ELSE
15847: ---------------------------------------------------------------------------------------------------
15848: -- 4262811a Switch Sign
15849: ---------------------------------------------------------------------------------------------------
15850: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15851: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15847: ---------------------------------------------------------------------------------------------------
15848: -- 4262811a Switch Sign
15849: ---------------------------------------------------------------------------------------------------
15850: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15851: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15848: -- 4262811a Switch Sign
15849: ---------------------------------------------------------------------------------------------------
15850: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15851: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15856: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15849: ---------------------------------------------------------------------------------------------------
15850: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15851: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15856: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15857: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15850: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
15851: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15856: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15857: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15858:
15852: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15856: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15857: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15858:
15859: END IF;
15860:
15853: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
15854: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15855: -- 5132302
15856: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
15857: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
15858:
15859: END IF;
15860:
15861: -- 4955764
15858:
15859: END IF;
15860:
15861: -- 4955764
15862: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15863: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15864:
15865:
15866: XLA_AE_LINES_PKG.ValidateCurrentLine;
15862: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
15863: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15864:
15865:
15866: XLA_AE_LINES_PKG.ValidateCurrentLine;
15867: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15868:
15869: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15870: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15863: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
15864:
15865:
15866: XLA_AE_LINES_PKG.ValidateCurrentLine;
15867: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
15868:
15869: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
15870: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
15871: ,p_balance_type_code => l_balance_type_code);
16016: --
16017: -- bulk performance
16018: --
16019: l_balance_type_code VARCHAR2(1);
16020: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16021: l_log_module VARCHAR2(240);
16022:
16023: --
16024: -- Upgrade strategy
16088: ') = 'N'
16089: THEN
16090:
16091: --
16092: XLA_AE_LINES_PKG.SetNewLine;
16093:
16094: p_balance_type_code := l_balance_type_code;
16095: -- set the flag so later we will know whether the gain loss line needs to be created
16096:
16100:
16101: --
16102: -- bulk performance
16103: --
16104: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
16105: p_header_num => 0); -- 4262811
16106: --
16107: -- set accounting line options
16108: --
16105: p_header_num => 0); -- 4262811
16106: --
16107: -- set accounting line options
16108: --
16109: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
16110: p_natural_side_code => 'C'
16111: , p_gain_or_loss_flag => 'N'
16112: , p_gl_transfer_mode_code => 'S'
16113: , p_acct_entry_type_code => 'A'
16119: --
16120: --
16121: -- set accounting line type info
16122: --
16123: xla_ae_lines_pkg.SetAcctLineType
16124: (p_component_type => l_component_type
16125: ,p_event_type_code => l_event_type_code
16126: ,p_line_definition_owner_code => l_line_definition_owner_code
16127: ,p_line_definition_code => l_line_definition_code
16133: ,p_event_class_code => l_event_class_code);
16134: --
16135: -- set accounting class
16136: --
16137: xla_ae_lines_pkg.SetAcctClass(
16138: p_accounting_class_code => 'PREPAY'
16139: , p_ae_header_id => l_ae_header_id
16140: );
16141:
16141:
16142: --
16143: -- set rounding class
16144: --
16145: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16146: 'RECEIVABLE';
16147:
16148: --
16149: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16145: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16146: 'RECEIVABLE';
16147:
16148: --
16149: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16150: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16151: --
16152: -- bulk performance
16153: --
16146: 'RECEIVABLE';
16147:
16148: --
16149: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16150: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16151: --
16152: -- bulk performance
16153: --
16154: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16150: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16151: --
16152: -- bulk performance
16153: --
16154: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16155:
16156: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16157: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16158:
16152: -- bulk performance
16153: --
16154: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16155:
16156: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16157: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16158:
16159: -- 4955764
16160: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16156: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16157: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16158:
16159: -- 4955764
16160: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16161: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16162:
16163: -- 4458381 Public Sector Enh
16164:
16200: l_rec_acct_attrs.array_num_value(15) := p_source_27;
16201: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
16202: l_rec_acct_attrs.array_char_value(16) := p_source_28;
16203:
16204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16206:
16207: ---------------------------------------------------------------------------------------------------------------
16208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16201: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
16202: l_rec_acct_attrs.array_char_value(16) := p_source_28;
16203:
16204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16206:
16207: ---------------------------------------------------------------------------------------------------------------
16208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16209: ---------------------------------------------------------------------------------------------------------------
16204: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16205: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16206:
16207: ---------------------------------------------------------------------------------------------------------------
16208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16209: ---------------------------------------------------------------------------------------------------------------
16210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16211:
16212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16206:
16207: ---------------------------------------------------------------------------------------------------------------
16208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16209: ---------------------------------------------------------------------------------------------------------------
16210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16211:
16212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16214:
16208: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16209: ---------------------------------------------------------------------------------------------------------------
16210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16211:
16212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16214:
16215: IF xla_accounting_cache_pkg.GetValueChar
16216: (p_source_code => 'LEDGER_CATEGORY_CODE'
16209: ---------------------------------------------------------------------------------------------------------------
16210: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16211:
16212: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16213: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16214:
16215: IF xla_accounting_cache_pkg.GetValueChar
16216: (p_source_code => 'LEDGER_CATEGORY_CODE'
16217: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16220: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16221: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16222: )
16223: THEN
16224: xla_ae_lines_pkg.BflowUpgEntry
16225: (p_business_method_code => l_bflow_method_code
16226: ,p_business_class_code => l_bflow_class_code
16227: ,p_balance_type => l_balance_type_code);
16228: ELSE
16260: , x_value_type_code => l_adr_value_type_code
16261: , p_side => 'NA'
16262: );
16263:
16264: xla_ae_lines_pkg.set_ccid(
16265: p_code_combination_id => l_ccid
16266: , p_value_type_code => l_adr_value_type_code
16267: , p_transaction_coa_id => l_adr_transaction_coa_id
16268: , p_accounting_coa_id => l_adr_accounting_coa_id
16296: xla_accounting_err_pkg.build_message
16297: (p_appli_s_name => 'XLA'
16298: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
16299: ,p_token_1 => 'LINE_NUMBER'
16300: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
16301: ,p_token_2 => 'LINE_TYPE_NAME'
16302: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
16303: l_component_type
16304: ,l_component_code
16332: --
16333: --
16334: ------------------------------------------------------------------------------------------------
16335: -- 4219869 Business Flow
16336: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16337: -- Prior Entry. Currently, the following code is always generated.
16338: ------------------------------------------------------------------------------------------------
16339: XLA_AE_LINES_PKG.ValidateCurrentLine;
16340:
16335: -- 4219869 Business Flow
16336: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16337: -- Prior Entry. Currently, the following code is always generated.
16338: ------------------------------------------------------------------------------------------------
16339: XLA_AE_LINES_PKG.ValidateCurrentLine;
16340:
16341: ------------------------------------------------------------------------------------
16342: -- 4219869 Business Flow
16343: -- Populated credit and debit amounts -- Need to generate this within IF
16341: ------------------------------------------------------------------------------------
16342: -- 4219869 Business Flow
16343: -- Populated credit and debit amounts -- Need to generate this within IF
16344: ------------------------------------------------------------------------------------
16345: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16346:
16347: ----------------------------------------------------------------------------------
16348: -- 4219869 Business Flow
16349: -- Update journal entry status -- Need to generate this within IF
16373: -- To allow MPA report to determine if it should generate report process
16374: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16375: ------------------------------------------------------------------------------------------
16376:
16377: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16378: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16379: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
16380: -- call ADRs
16381: -- Bug 4922099
16374: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16375: ------------------------------------------------------------------------------------------
16376:
16377: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16378: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16379: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
16380: -- call ADRs
16381: -- Bug 4922099
16382: --
16398: , x_value_type_code => l_adr_value_type_code
16399: , p_side => 'NA'
16400: );
16401:
16402: xla_ae_lines_pkg.set_ccid(
16403: p_code_combination_id => l_ccid
16404: , p_value_type_code => l_adr_value_type_code
16405: , p_transaction_coa_id => l_adr_transaction_coa_id
16406: , p_accounting_coa_id => l_adr_accounting_coa_id
16421:
16422: --
16423: -- Update the line information that should be overwritten
16424: --
16425: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16426: p_header_num => 1);
16427: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16428:
16429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16423: -- Update the line information that should be overwritten
16424: --
16425: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16426: p_header_num => 1);
16427: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16428:
16429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16430:
16431: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16425: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
16426: p_header_num => 1);
16427: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
16428:
16429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16430:
16431: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16432: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16433: END IF;
16428:
16429: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
16430:
16431: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
16432: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
16433: END IF;
16434:
16435: --
16436: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16435: --
16436: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
16437: --
16438: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
16439: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
16440: ELSE
16441: ---------------------------------------------------------------------------------------------------
16442: -- 4262811a Switch Sign
16443: ---------------------------------------------------------------------------------------------------
16440: ELSE
16441: ---------------------------------------------------------------------------------------------------
16442: -- 4262811a Switch Sign
16443: ---------------------------------------------------------------------------------------------------
16444: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16445: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16441: ---------------------------------------------------------------------------------------------------
16442: -- 4262811a Switch Sign
16443: ---------------------------------------------------------------------------------------------------
16444: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16445: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16442: -- 4262811a Switch Sign
16443: ---------------------------------------------------------------------------------------------------
16444: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16445: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16450: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16443: ---------------------------------------------------------------------------------------------------
16444: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16445: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16450: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16451: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16444: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
16445: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16450: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16451: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16452:
16446: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16450: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16451: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16452:
16453: END IF;
16454:
16447: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
16448: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16449: -- 5132302
16450: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
16451: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
16452:
16453: END IF;
16454:
16455: -- 4955764
16452:
16453: END IF;
16454:
16455: -- 4955764
16456: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16457: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16458:
16459:
16460: XLA_AE_LINES_PKG.ValidateCurrentLine;
16456: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16457: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16458:
16459:
16460: XLA_AE_LINES_PKG.ValidateCurrentLine;
16461: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16462:
16463: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16464: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16457: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
16458:
16459:
16460: XLA_AE_LINES_PKG.ValidateCurrentLine;
16461: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16462:
16463: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
16464: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
16465: ,p_balance_type_code => l_balance_type_code);
16610: --
16611: -- bulk performance
16612: --
16613: l_balance_type_code VARCHAR2(1);
16614: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
16615: l_log_module VARCHAR2(240);
16616:
16617: --
16618: -- Upgrade strategy
16688: ') = 'N')
16689: THEN
16690:
16691: --
16692: XLA_AE_LINES_PKG.SetNewLine;
16693:
16694: p_balance_type_code := l_balance_type_code;
16695: -- set the flag so later we will know whether the gain loss line needs to be created
16696:
16700:
16701: --
16702: -- bulk performance
16703: --
16704: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
16705: p_header_num => 0); -- 4262811
16706: --
16707: -- set accounting line options
16708: --
16705: p_header_num => 0); -- 4262811
16706: --
16707: -- set accounting line options
16708: --
16709: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
16710: p_natural_side_code => 'C'
16711: , p_gain_or_loss_flag => 'N'
16712: , p_gl_transfer_mode_code => 'S'
16713: , p_acct_entry_type_code => 'A'
16719: --
16720: --
16721: -- set accounting line type info
16722: --
16723: xla_ae_lines_pkg.SetAcctLineType
16724: (p_component_type => l_component_type
16725: ,p_event_type_code => l_event_type_code
16726: ,p_line_definition_owner_code => l_line_definition_owner_code
16727: ,p_line_definition_code => l_line_definition_code
16733: ,p_event_class_code => l_event_class_code);
16734: --
16735: -- set accounting class
16736: --
16737: xla_ae_lines_pkg.SetAcctClass(
16738: p_accounting_class_code => 'REFUND'
16739: , p_ae_header_id => l_ae_header_id
16740: );
16741:
16741:
16742: --
16743: -- set rounding class
16744: --
16745: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16746: 'RECEIVABLE';
16747:
16748: --
16749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16745: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
16746: 'RECEIVABLE';
16747:
16748: --
16749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16751: --
16752: -- bulk performance
16753: --
16746: 'RECEIVABLE';
16747:
16748: --
16749: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
16750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16751: --
16752: -- bulk performance
16753: --
16754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16750: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
16751: --
16752: -- bulk performance
16753: --
16754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16755:
16756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16758:
16752: -- bulk performance
16753: --
16754: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
16755:
16756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16758:
16759: -- 4955764
16760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16756: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
16757: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
16758:
16759: -- 4955764
16760: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
16761: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
16762:
16763: -- 4458381 Public Sector Enh
16764:
16800: l_rec_acct_attrs.array_num_value(15) := p_source_27;
16801: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
16802: l_rec_acct_attrs.array_char_value(16) := p_source_28;
16803:
16804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16806:
16807: ---------------------------------------------------------------------------------------------------------------
16808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16801: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
16802: l_rec_acct_attrs.array_char_value(16) := p_source_28;
16803:
16804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16806:
16807: ---------------------------------------------------------------------------------------------------------------
16808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16809: ---------------------------------------------------------------------------------------------------------------
16804: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
16805: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
16806:
16807: ---------------------------------------------------------------------------------------------------------------
16808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16809: ---------------------------------------------------------------------------------------------------------------
16810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16811:
16812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16806:
16807: ---------------------------------------------------------------------------------------------------------------
16808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16809: ---------------------------------------------------------------------------------------------------------------
16810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16811:
16812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16814:
16808: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
16809: ---------------------------------------------------------------------------------------------------------------
16810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16811:
16812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16814:
16815: IF xla_accounting_cache_pkg.GetValueChar
16816: (p_source_code => 'LEDGER_CATEGORY_CODE'
16809: ---------------------------------------------------------------------------------------------------------------
16810: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
16811:
16812: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16813: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
16814:
16815: IF xla_accounting_cache_pkg.GetValueChar
16816: (p_source_code => 'LEDGER_CATEGORY_CODE'
16817: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
16820: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
16821: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
16822: )
16823: THEN
16824: xla_ae_lines_pkg.BflowUpgEntry
16825: (p_business_method_code => l_bflow_method_code
16826: ,p_business_class_code => l_bflow_class_code
16827: ,p_balance_type => l_balance_type_code);
16828: ELSE
16860: , x_value_type_code => l_adr_value_type_code
16861: , p_side => 'NA'
16862: );
16863:
16864: xla_ae_lines_pkg.set_ccid(
16865: p_code_combination_id => l_ccid
16866: , p_value_type_code => l_adr_value_type_code
16867: , p_transaction_coa_id => l_adr_transaction_coa_id
16868: , p_accounting_coa_id => l_adr_accounting_coa_id
16896: xla_accounting_err_pkg.build_message
16897: (p_appli_s_name => 'XLA'
16898: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
16899: ,p_token_1 => 'LINE_NUMBER'
16900: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
16901: ,p_token_2 => 'LINE_TYPE_NAME'
16902: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
16903: l_component_type
16904: ,l_component_code
16932: --
16933: --
16934: ------------------------------------------------------------------------------------------------
16935: -- 4219869 Business Flow
16936: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16937: -- Prior Entry. Currently, the following code is always generated.
16938: ------------------------------------------------------------------------------------------------
16939: XLA_AE_LINES_PKG.ValidateCurrentLine;
16940:
16935: -- 4219869 Business Flow
16936: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
16937: -- Prior Entry. Currently, the following code is always generated.
16938: ------------------------------------------------------------------------------------------------
16939: XLA_AE_LINES_PKG.ValidateCurrentLine;
16940:
16941: ------------------------------------------------------------------------------------
16942: -- 4219869 Business Flow
16943: -- Populated credit and debit amounts -- Need to generate this within IF
16941: ------------------------------------------------------------------------------------
16942: -- 4219869 Business Flow
16943: -- Populated credit and debit amounts -- Need to generate this within IF
16944: ------------------------------------------------------------------------------------
16945: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
16946:
16947: ----------------------------------------------------------------------------------
16948: -- 4219869 Business Flow
16949: -- Update journal entry status -- Need to generate this within IF
16973: -- To allow MPA report to determine if it should generate report process
16974: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16975: ------------------------------------------------------------------------------------------
16976:
16977: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16978: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16979: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
16980: -- call ADRs
16981: -- Bug 4922099
16974: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
16975: ------------------------------------------------------------------------------------------
16976:
16977: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
16978: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
16979: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
16980: -- call ADRs
16981: -- Bug 4922099
16982: --
16998: , x_value_type_code => l_adr_value_type_code
16999: , p_side => 'NA'
17000: );
17001:
17002: xla_ae_lines_pkg.set_ccid(
17003: p_code_combination_id => l_ccid
17004: , p_value_type_code => l_adr_value_type_code
17005: , p_transaction_coa_id => l_adr_transaction_coa_id
17006: , p_accounting_coa_id => l_adr_accounting_coa_id
17021:
17022: --
17023: -- Update the line information that should be overwritten
17024: --
17025: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17026: p_header_num => 1);
17027: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17028:
17029: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17023: -- Update the line information that should be overwritten
17024: --
17025: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17026: p_header_num => 1);
17027: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17028:
17029: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17030:
17031: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17025: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17026: p_header_num => 1);
17027: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17028:
17029: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17030:
17031: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17032: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17033: END IF;
17028:
17029: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17030:
17031: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17032: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17033: END IF;
17034:
17035: --
17036: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17035: --
17036: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17037: --
17038: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17039: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17040: ELSE
17041: ---------------------------------------------------------------------------------------------------
17042: -- 4262811a Switch Sign
17043: ---------------------------------------------------------------------------------------------------
17040: ELSE
17041: ---------------------------------------------------------------------------------------------------
17042: -- 4262811a Switch Sign
17043: ---------------------------------------------------------------------------------------------------
17044: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17041: ---------------------------------------------------------------------------------------------------
17042: -- 4262811a Switch Sign
17043: ---------------------------------------------------------------------------------------------------
17044: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17042: -- 4262811a Switch Sign
17043: ---------------------------------------------------------------------------------------------------
17044: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17050: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17043: ---------------------------------------------------------------------------------------------------
17044: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17050: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17044: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17045: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17050: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17052:
17046: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17050: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17052:
17053: END IF;
17054:
17047: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17048: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17049: -- 5132302
17050: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17051: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17052:
17053: END IF;
17054:
17055: -- 4955764
17052:
17053: END IF;
17054:
17055: -- 4955764
17056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17058:
17059:
17060: XLA_AE_LINES_PKG.ValidateCurrentLine;
17056: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17058:
17059:
17060: XLA_AE_LINES_PKG.ValidateCurrentLine;
17061: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17062:
17063: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17064: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17057: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17058:
17059:
17060: XLA_AE_LINES_PKG.ValidateCurrentLine;
17061: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17062:
17063: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17064: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17065: ,p_balance_type_code => l_balance_type_code);
17210: --
17211: -- bulk performance
17212: --
17213: l_balance_type_code VARCHAR2(1);
17214: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
17215: l_log_module VARCHAR2(240);
17216:
17217: --
17218: -- Upgrade strategy
17282: ') = 'N'
17283: THEN
17284:
17285: --
17286: XLA_AE_LINES_PKG.SetNewLine;
17287:
17288: p_balance_type_code := l_balance_type_code;
17289: -- set the flag so later we will know whether the gain loss line needs to be created
17290:
17294:
17295: --
17296: -- bulk performance
17297: --
17298: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
17299: p_header_num => 0); -- 4262811
17300: --
17301: -- set accounting line options
17302: --
17299: p_header_num => 0); -- 4262811
17300: --
17301: -- set accounting line options
17302: --
17303: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
17304: p_natural_side_code => 'C'
17305: , p_gain_or_loss_flag => 'N'
17306: , p_gl_transfer_mode_code => 'S'
17307: , p_acct_entry_type_code => 'A'
17313: --
17314: --
17315: -- set accounting line type info
17316: --
17317: xla_ae_lines_pkg.SetAcctLineType
17318: (p_component_type => l_component_type
17319: ,p_event_type_code => l_event_type_code
17320: ,p_line_definition_owner_code => l_line_definition_owner_code
17321: ,p_line_definition_code => l_line_definition_code
17327: ,p_event_class_code => l_event_class_code);
17328: --
17329: -- set accounting class
17330: --
17331: xla_ae_lines_pkg.SetAcctClass(
17332: p_accounting_class_code => 'REMITTANCE'
17333: , p_ae_header_id => l_ae_header_id
17334: );
17335:
17335:
17336: --
17337: -- set rounding class
17338: --
17339: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17340: 'RECEIVABLE';
17341:
17342: --
17343: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17339: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17340: 'RECEIVABLE';
17341:
17342: --
17343: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17344: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17345: --
17346: -- bulk performance
17347: --
17340: 'RECEIVABLE';
17341:
17342: --
17343: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17344: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17345: --
17346: -- bulk performance
17347: --
17348: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17344: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17345: --
17346: -- bulk performance
17347: --
17348: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17349:
17350: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17351: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17352:
17346: -- bulk performance
17347: --
17348: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17349:
17350: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17351: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17352:
17353: -- 4955764
17354: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17350: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17351: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17352:
17353: -- 4955764
17354: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17355: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
17356:
17357: -- 4458381 Public Sector Enh
17358:
17394: l_rec_acct_attrs.array_num_value(15) := p_source_27;
17395: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
17396: l_rec_acct_attrs.array_char_value(16) := p_source_28;
17397:
17398: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17399: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17400:
17401: ---------------------------------------------------------------------------------------------------------------
17402: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17395: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
17396: l_rec_acct_attrs.array_char_value(16) := p_source_28;
17397:
17398: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17399: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17400:
17401: ---------------------------------------------------------------------------------------------------------------
17402: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17403: ---------------------------------------------------------------------------------------------------------------
17398: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17399: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17400:
17401: ---------------------------------------------------------------------------------------------------------------
17402: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17403: ---------------------------------------------------------------------------------------------------------------
17404: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17405:
17406: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17400:
17401: ---------------------------------------------------------------------------------------------------------------
17402: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17403: ---------------------------------------------------------------------------------------------------------------
17404: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17405:
17406: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17407: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17408:
17402: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17403: ---------------------------------------------------------------------------------------------------------------
17404: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17405:
17406: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17407: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17408:
17409: IF xla_accounting_cache_pkg.GetValueChar
17410: (p_source_code => 'LEDGER_CATEGORY_CODE'
17403: ---------------------------------------------------------------------------------------------------------------
17404: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17405:
17406: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17407: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17408:
17409: IF xla_accounting_cache_pkg.GetValueChar
17410: (p_source_code => 'LEDGER_CATEGORY_CODE'
17411: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
17414: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
17415: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
17416: )
17417: THEN
17418: xla_ae_lines_pkg.BflowUpgEntry
17419: (p_business_method_code => l_bflow_method_code
17420: ,p_business_class_code => l_bflow_class_code
17421: ,p_balance_type => l_balance_type_code);
17422: ELSE
17454: , x_value_type_code => l_adr_value_type_code
17455: , p_side => 'NA'
17456: );
17457:
17458: xla_ae_lines_pkg.set_ccid(
17459: p_code_combination_id => l_ccid
17460: , p_value_type_code => l_adr_value_type_code
17461: , p_transaction_coa_id => l_adr_transaction_coa_id
17462: , p_accounting_coa_id => l_adr_accounting_coa_id
17490: xla_accounting_err_pkg.build_message
17491: (p_appli_s_name => 'XLA'
17492: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
17493: ,p_token_1 => 'LINE_NUMBER'
17494: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
17495: ,p_token_2 => 'LINE_TYPE_NAME'
17496: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
17497: l_component_type
17498: ,l_component_code
17526: --
17527: --
17528: ------------------------------------------------------------------------------------------------
17529: -- 4219869 Business Flow
17530: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17531: -- Prior Entry. Currently, the following code is always generated.
17532: ------------------------------------------------------------------------------------------------
17533: XLA_AE_LINES_PKG.ValidateCurrentLine;
17534:
17529: -- 4219869 Business Flow
17530: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
17531: -- Prior Entry. Currently, the following code is always generated.
17532: ------------------------------------------------------------------------------------------------
17533: XLA_AE_LINES_PKG.ValidateCurrentLine;
17534:
17535: ------------------------------------------------------------------------------------
17536: -- 4219869 Business Flow
17537: -- Populated credit and debit amounts -- Need to generate this within IF
17535: ------------------------------------------------------------------------------------
17536: -- 4219869 Business Flow
17537: -- Populated credit and debit amounts -- Need to generate this within IF
17538: ------------------------------------------------------------------------------------
17539: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17540:
17541: ----------------------------------------------------------------------------------
17542: -- 4219869 Business Flow
17543: -- Update journal entry status -- Need to generate this within IF
17567: -- To allow MPA report to determine if it should generate report process
17568: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17569: ------------------------------------------------------------------------------------------
17570:
17571: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17572: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17573: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
17574: -- call ADRs
17575: -- Bug 4922099
17568: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
17569: ------------------------------------------------------------------------------------------
17570:
17571: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
17572: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
17573: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
17574: -- call ADRs
17575: -- Bug 4922099
17576: --
17592: , x_value_type_code => l_adr_value_type_code
17593: , p_side => 'NA'
17594: );
17595:
17596: xla_ae_lines_pkg.set_ccid(
17597: p_code_combination_id => l_ccid
17598: , p_value_type_code => l_adr_value_type_code
17599: , p_transaction_coa_id => l_adr_transaction_coa_id
17600: , p_accounting_coa_id => l_adr_accounting_coa_id
17615:
17616: --
17617: -- Update the line information that should be overwritten
17618: --
17619: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17620: p_header_num => 1);
17621: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17622:
17623: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17617: -- Update the line information that should be overwritten
17618: --
17619: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17620: p_header_num => 1);
17621: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17622:
17623: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17624:
17625: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17619: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
17620: p_header_num => 1);
17621: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
17622:
17623: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17624:
17625: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17626: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17627: END IF;
17622:
17623: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
17624:
17625: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
17626: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
17627: END IF;
17628:
17629: --
17630: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17629: --
17630: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
17631: --
17632: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
17633: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
17634: ELSE
17635: ---------------------------------------------------------------------------------------------------
17636: -- 4262811a Switch Sign
17637: ---------------------------------------------------------------------------------------------------
17634: ELSE
17635: ---------------------------------------------------------------------------------------------------
17636: -- 4262811a Switch Sign
17637: ---------------------------------------------------------------------------------------------------
17638: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17639: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17635: ---------------------------------------------------------------------------------------------------
17636: -- 4262811a Switch Sign
17637: ---------------------------------------------------------------------------------------------------
17638: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17639: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17636: -- 4262811a Switch Sign
17637: ---------------------------------------------------------------------------------------------------
17638: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17639: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17644: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17637: ---------------------------------------------------------------------------------------------------
17638: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17639: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17644: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17645: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17638: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
17639: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17644: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17645: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17646:
17640: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17644: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17645: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17646:
17647: END IF;
17648:
17641: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
17642: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17643: -- 5132302
17644: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
17645: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
17646:
17647: END IF;
17648:
17649: -- 4955764
17646:
17647: END IF;
17648:
17649: -- 4955764
17650: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17651: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17652:
17653:
17654: XLA_AE_LINES_PKG.ValidateCurrentLine;
17650: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17651: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17652:
17653:
17654: XLA_AE_LINES_PKG.ValidateCurrentLine;
17655: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17656:
17657: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17658: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17651: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
17652:
17653:
17654: XLA_AE_LINES_PKG.ValidateCurrentLine;
17655: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
17656:
17657: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
17658: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
17659: ,p_balance_type_code => l_balance_type_code);
17804: --
17805: -- bulk performance
17806: --
17807: l_balance_type_code VARCHAR2(1);
17808: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
17809: l_log_module VARCHAR2(240);
17810:
17811: --
17812: -- Upgrade strategy
17876: ') = 'N'
17877: THEN
17878:
17879: --
17880: XLA_AE_LINES_PKG.SetNewLine;
17881:
17882: p_balance_type_code := l_balance_type_code;
17883: -- set the flag so later we will know whether the gain loss line needs to be created
17884:
17888:
17889: --
17890: -- bulk performance
17891: --
17892: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
17893: p_header_num => 0); -- 4262811
17894: --
17895: -- set accounting line options
17896: --
17893: p_header_num => 0); -- 4262811
17894: --
17895: -- set accounting line options
17896: --
17897: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
17898: p_natural_side_code => 'C'
17899: , p_gain_or_loss_flag => 'N'
17900: , p_gl_transfer_mode_code => 'S'
17901: , p_acct_entry_type_code => 'A'
17907: --
17908: --
17909: -- set accounting line type info
17910: --
17911: xla_ae_lines_pkg.SetAcctLineType
17912: (p_component_type => l_component_type
17913: ,p_event_type_code => l_event_type_code
17914: ,p_line_definition_owner_code => l_line_definition_owner_code
17915: ,p_line_definition_code => l_line_definition_code
17921: ,p_event_class_code => l_event_class_code);
17922: --
17923: -- set accounting class
17924: --
17925: xla_ae_lines_pkg.SetAcctClass(
17926: p_accounting_class_code => 'REM_BR'
17927: , p_ae_header_id => l_ae_header_id
17928: );
17929:
17929:
17930: --
17931: -- set rounding class
17932: --
17933: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17934: 'RECEIVABLE';
17935:
17936: --
17937: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17933: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
17934: 'RECEIVABLE';
17935:
17936: --
17937: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17938: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17939: --
17940: -- bulk performance
17941: --
17934: 'RECEIVABLE';
17935:
17936: --
17937: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
17938: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17939: --
17940: -- bulk performance
17941: --
17942: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17938: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
17939: --
17940: -- bulk performance
17941: --
17942: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17943:
17944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17945: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17946:
17940: -- bulk performance
17941: --
17942: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
17943:
17944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17945: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17946:
17947: -- 4955764
17948: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17944: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
17945: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
17946:
17947: -- 4955764
17948: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
17949: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
17950:
17951: -- 4458381 Public Sector Enh
17952:
17988: l_rec_acct_attrs.array_num_value(15) := p_source_27;
17989: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
17990: l_rec_acct_attrs.array_char_value(16) := p_source_28;
17991:
17992: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17993: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17994:
17995: ---------------------------------------------------------------------------------------------------------------
17996: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17989: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
17990: l_rec_acct_attrs.array_char_value(16) := p_source_28;
17991:
17992: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17993: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17994:
17995: ---------------------------------------------------------------------------------------------------------------
17996: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17997: ---------------------------------------------------------------------------------------------------------------
17992: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
17993: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
17994:
17995: ---------------------------------------------------------------------------------------------------------------
17996: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17997: ---------------------------------------------------------------------------------------------------------------
17998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17999:
18000: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
17994:
17995: ---------------------------------------------------------------------------------------------------------------
17996: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17997: ---------------------------------------------------------------------------------------------------------------
17998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17999:
18000: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18001: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18002:
17996: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
17997: ---------------------------------------------------------------------------------------------------------------
17998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17999:
18000: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18001: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18002:
18003: IF xla_accounting_cache_pkg.GetValueChar
18004: (p_source_code => 'LEDGER_CATEGORY_CODE'
17997: ---------------------------------------------------------------------------------------------------------------
17998: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
17999:
18000: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18001: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18002:
18003: IF xla_accounting_cache_pkg.GetValueChar
18004: (p_source_code => 'LEDGER_CATEGORY_CODE'
18005: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18008: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18009: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18010: )
18011: THEN
18012: xla_ae_lines_pkg.BflowUpgEntry
18013: (p_business_method_code => l_bflow_method_code
18014: ,p_business_class_code => l_bflow_class_code
18015: ,p_balance_type => l_balance_type_code);
18016: ELSE
18048: , x_value_type_code => l_adr_value_type_code
18049: , p_side => 'NA'
18050: );
18051:
18052: xla_ae_lines_pkg.set_ccid(
18053: p_code_combination_id => l_ccid
18054: , p_value_type_code => l_adr_value_type_code
18055: , p_transaction_coa_id => l_adr_transaction_coa_id
18056: , p_accounting_coa_id => l_adr_accounting_coa_id
18084: xla_accounting_err_pkg.build_message
18085: (p_appli_s_name => 'XLA'
18086: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
18087: ,p_token_1 => 'LINE_NUMBER'
18088: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
18089: ,p_token_2 => 'LINE_TYPE_NAME'
18090: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
18091: l_component_type
18092: ,l_component_code
18120: --
18121: --
18122: ------------------------------------------------------------------------------------------------
18123: -- 4219869 Business Flow
18124: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18125: -- Prior Entry. Currently, the following code is always generated.
18126: ------------------------------------------------------------------------------------------------
18127: XLA_AE_LINES_PKG.ValidateCurrentLine;
18128:
18123: -- 4219869 Business Flow
18124: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18125: -- Prior Entry. Currently, the following code is always generated.
18126: ------------------------------------------------------------------------------------------------
18127: XLA_AE_LINES_PKG.ValidateCurrentLine;
18128:
18129: ------------------------------------------------------------------------------------
18130: -- 4219869 Business Flow
18131: -- Populated credit and debit amounts -- Need to generate this within IF
18129: ------------------------------------------------------------------------------------
18130: -- 4219869 Business Flow
18131: -- Populated credit and debit amounts -- Need to generate this within IF
18132: ------------------------------------------------------------------------------------
18133: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18134:
18135: ----------------------------------------------------------------------------------
18136: -- 4219869 Business Flow
18137: -- Update journal entry status -- Need to generate this within IF
18161: -- To allow MPA report to determine if it should generate report process
18162: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18163: ------------------------------------------------------------------------------------------
18164:
18165: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18166: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18167: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
18168: -- call ADRs
18169: -- Bug 4922099
18162: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18163: ------------------------------------------------------------------------------------------
18164:
18165: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18166: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18167: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
18168: -- call ADRs
18169: -- Bug 4922099
18170: --
18186: , x_value_type_code => l_adr_value_type_code
18187: , p_side => 'NA'
18188: );
18189:
18190: xla_ae_lines_pkg.set_ccid(
18191: p_code_combination_id => l_ccid
18192: , p_value_type_code => l_adr_value_type_code
18193: , p_transaction_coa_id => l_adr_transaction_coa_id
18194: , p_accounting_coa_id => l_adr_accounting_coa_id
18209:
18210: --
18211: -- Update the line information that should be overwritten
18212: --
18213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18214: p_header_num => 1);
18215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18216:
18217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18211: -- Update the line information that should be overwritten
18212: --
18213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18214: p_header_num => 1);
18215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18216:
18217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18218:
18219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18213: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18214: p_header_num => 1);
18215: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18216:
18217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18218:
18219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18220: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18221: END IF;
18216:
18217: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18218:
18219: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18220: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18221: END IF;
18222:
18223: --
18224: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18223: --
18224: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18225: --
18226: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
18227: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
18228: ELSE
18229: ---------------------------------------------------------------------------------------------------
18230: -- 4262811a Switch Sign
18231: ---------------------------------------------------------------------------------------------------
18228: ELSE
18229: ---------------------------------------------------------------------------------------------------
18230: -- 4262811a Switch Sign
18231: ---------------------------------------------------------------------------------------------------
18232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18229: ---------------------------------------------------------------------------------------------------
18230: -- 4262811a Switch Sign
18231: ---------------------------------------------------------------------------------------------------
18232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18230: -- 4262811a Switch Sign
18231: ---------------------------------------------------------------------------------------------------
18232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18231: ---------------------------------------------------------------------------------------------------
18232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18232: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18233: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18240:
18234: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18240:
18241: END IF;
18242:
18235: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18236: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18237: -- 5132302
18238: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18239: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18240:
18241: END IF;
18242:
18243: -- 4955764
18240:
18241: END IF;
18242:
18243: -- 4955764
18244: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18246:
18247:
18248: XLA_AE_LINES_PKG.ValidateCurrentLine;
18244: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18246:
18247:
18248: XLA_AE_LINES_PKG.ValidateCurrentLine;
18249: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18250:
18251: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18252: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18245: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18246:
18247:
18248: XLA_AE_LINES_PKG.ValidateCurrentLine;
18249: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18250:
18251: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18252: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18253: ,p_balance_type_code => l_balance_type_code);
18400: --
18401: -- bulk performance
18402: --
18403: l_balance_type_code VARCHAR2(1);
18404: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
18405: l_log_module VARCHAR2(240);
18406:
18407: --
18408: -- Upgrade strategy
18532: ') = 'NETTING')
18533: THEN
18534:
18535: --
18536: XLA_AE_LINES_PKG.SetNewLine;
18537:
18538: p_balance_type_code := l_balance_type_code;
18539: -- set the flag so later we will know whether the gain loss line needs to be created
18540:
18544:
18545: --
18546: -- bulk performance
18547: --
18548: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
18549: p_header_num => 0); -- 4262811
18550: --
18551: -- set accounting line options
18552: --
18549: p_header_num => 0); -- 4262811
18550: --
18551: -- set accounting line options
18552: --
18553: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
18554: p_natural_side_code => 'D'
18555: , p_gain_or_loss_flag => 'N'
18556: , p_gl_transfer_mode_code => 'S'
18557: , p_acct_entry_type_code => 'A'
18563: --
18564: --
18565: -- set accounting line type info
18566: --
18567: xla_ae_lines_pkg.SetAcctLineType
18568: (p_component_type => l_component_type
18569: ,p_event_type_code => l_event_type_code
18570: ,p_line_definition_owner_code => l_line_definition_owner_code
18571: ,p_line_definition_code => l_line_definition_code
18577: ,p_event_class_code => l_event_class_code);
18578: --
18579: -- set accounting class
18580: --
18581: xla_ae_lines_pkg.SetAcctClass(
18582: p_accounting_class_code => 'UNAPP'
18583: , p_ae_header_id => l_ae_header_id
18584: );
18585:
18585:
18586: --
18587: -- set rounding class
18588: --
18589: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18590: 'RECEIVABLE';
18591:
18592: --
18593: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18589: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
18590: 'RECEIVABLE';
18591:
18592: --
18593: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18594: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18595: --
18596: -- bulk performance
18597: --
18590: 'RECEIVABLE';
18591:
18592: --
18593: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
18594: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18595: --
18596: -- bulk performance
18597: --
18598: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18594: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
18595: --
18596: -- bulk performance
18597: --
18598: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18599:
18600: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18601: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18602:
18596: -- bulk performance
18597: --
18598: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
18599:
18600: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18601: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18602:
18603: -- 4955764
18604: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18600: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
18601: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
18602:
18603: -- 4955764
18604: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18605: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
18606:
18607: -- 4458381 Public Sector Enh
18608:
18644: l_rec_acct_attrs.array_num_value(15) := p_source_35;
18645: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
18646: l_rec_acct_attrs.array_char_value(16) := p_source_28;
18647:
18648: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18649: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18650:
18651: ---------------------------------------------------------------------------------------------------------------
18652: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18645: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
18646: l_rec_acct_attrs.array_char_value(16) := p_source_28;
18647:
18648: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18649: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18650:
18651: ---------------------------------------------------------------------------------------------------------------
18652: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18653: ---------------------------------------------------------------------------------------------------------------
18648: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
18649: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
18650:
18651: ---------------------------------------------------------------------------------------------------------------
18652: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18653: ---------------------------------------------------------------------------------------------------------------
18654: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18655:
18656: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18650:
18651: ---------------------------------------------------------------------------------------------------------------
18652: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18653: ---------------------------------------------------------------------------------------------------------------
18654: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18655:
18656: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18657: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18658:
18652: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
18653: ---------------------------------------------------------------------------------------------------------------
18654: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18655:
18656: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18657: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18658:
18659: IF xla_accounting_cache_pkg.GetValueChar
18660: (p_source_code => 'LEDGER_CATEGORY_CODE'
18653: ---------------------------------------------------------------------------------------------------------------
18654: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
18655:
18656: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18657: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
18658:
18659: IF xla_accounting_cache_pkg.GetValueChar
18660: (p_source_code => 'LEDGER_CATEGORY_CODE'
18661: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
18664: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
18665: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
18666: )
18667: THEN
18668: xla_ae_lines_pkg.BflowUpgEntry
18669: (p_business_method_code => l_bflow_method_code
18670: ,p_business_class_code => l_bflow_class_code
18671: ,p_balance_type => l_balance_type_code);
18672: ELSE
18704: , x_value_type_code => l_adr_value_type_code
18705: , p_side => 'NA'
18706: );
18707:
18708: xla_ae_lines_pkg.set_ccid(
18709: p_code_combination_id => l_ccid
18710: , p_value_type_code => l_adr_value_type_code
18711: , p_transaction_coa_id => l_adr_transaction_coa_id
18712: , p_accounting_coa_id => l_adr_accounting_coa_id
18740: xla_accounting_err_pkg.build_message
18741: (p_appli_s_name => 'XLA'
18742: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
18743: ,p_token_1 => 'LINE_NUMBER'
18744: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
18745: ,p_token_2 => 'LINE_TYPE_NAME'
18746: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
18747: l_component_type
18748: ,l_component_code
18776: --
18777: --
18778: ------------------------------------------------------------------------------------------------
18779: -- 4219869 Business Flow
18780: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18781: -- Prior Entry. Currently, the following code is always generated.
18782: ------------------------------------------------------------------------------------------------
18783: XLA_AE_LINES_PKG.ValidateCurrentLine;
18784:
18779: -- 4219869 Business Flow
18780: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
18781: -- Prior Entry. Currently, the following code is always generated.
18782: ------------------------------------------------------------------------------------------------
18783: XLA_AE_LINES_PKG.ValidateCurrentLine;
18784:
18785: ------------------------------------------------------------------------------------
18786: -- 4219869 Business Flow
18787: -- Populated credit and debit amounts -- Need to generate this within IF
18785: ------------------------------------------------------------------------------------
18786: -- 4219869 Business Flow
18787: -- Populated credit and debit amounts -- Need to generate this within IF
18788: ------------------------------------------------------------------------------------
18789: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18790:
18791: ----------------------------------------------------------------------------------
18792: -- 4219869 Business Flow
18793: -- Update journal entry status -- Need to generate this within IF
18817: -- To allow MPA report to determine if it should generate report process
18818: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18819: ------------------------------------------------------------------------------------------
18820:
18821: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18822: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18823: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
18824: -- call ADRs
18825: -- Bug 4922099
18818: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
18819: ------------------------------------------------------------------------------------------
18820:
18821: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
18822: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
18823: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
18824: -- call ADRs
18825: -- Bug 4922099
18826: --
18842: , x_value_type_code => l_adr_value_type_code
18843: , p_side => 'NA'
18844: );
18845:
18846: xla_ae_lines_pkg.set_ccid(
18847: p_code_combination_id => l_ccid
18848: , p_value_type_code => l_adr_value_type_code
18849: , p_transaction_coa_id => l_adr_transaction_coa_id
18850: , p_accounting_coa_id => l_adr_accounting_coa_id
18865:
18866: --
18867: -- Update the line information that should be overwritten
18868: --
18869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18870: p_header_num => 1);
18871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18872:
18873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18867: -- Update the line information that should be overwritten
18868: --
18869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18870: p_header_num => 1);
18871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18872:
18873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18874:
18875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18869: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
18870: p_header_num => 1);
18871: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
18872:
18873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18874:
18875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18876: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18877: END IF;
18872:
18873: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
18874:
18875: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
18876: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
18877: END IF;
18878:
18879: --
18880: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18879: --
18880: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
18881: --
18882: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
18883: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
18884: ELSE
18885: ---------------------------------------------------------------------------------------------------
18886: -- 4262811a Switch Sign
18887: ---------------------------------------------------------------------------------------------------
18884: ELSE
18885: ---------------------------------------------------------------------------------------------------
18886: -- 4262811a Switch Sign
18887: ---------------------------------------------------------------------------------------------------
18888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18885: ---------------------------------------------------------------------------------------------------
18886: -- 4262811a Switch Sign
18887: ---------------------------------------------------------------------------------------------------
18888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18886: -- 4262811a Switch Sign
18887: ---------------------------------------------------------------------------------------------------
18888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18887: ---------------------------------------------------------------------------------------------------
18888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18888: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
18889: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18896:
18890: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18896:
18897: END IF;
18898:
18891: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
18892: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18893: -- 5132302
18894: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
18895: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
18896:
18897: END IF;
18898:
18899: -- 4955764
18896:
18897: END IF;
18898:
18899: -- 4955764
18900: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18902:
18903:
18904: XLA_AE_LINES_PKG.ValidateCurrentLine;
18900: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
18901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18902:
18903:
18904: XLA_AE_LINES_PKG.ValidateCurrentLine;
18905: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18906:
18907: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18908: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18901: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
18902:
18903:
18904: XLA_AE_LINES_PKG.ValidateCurrentLine;
18905: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
18906:
18907: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
18908: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
18909: ,p_balance_type_code => l_balance_type_code);
19056: --
19057: -- bulk performance
19058: --
19059: l_balance_type_code VARCHAR2(1);
19060: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19061: l_log_module VARCHAR2(240);
19062:
19063: --
19064: -- Upgrade strategy
19184: ') <> 'UNID'
19185: THEN
19186:
19187: --
19188: XLA_AE_LINES_PKG.SetNewLine;
19189:
19190: p_balance_type_code := l_balance_type_code;
19191: -- set the flag so later we will know whether the gain loss line needs to be created
19192:
19196:
19197: --
19198: -- bulk performance
19199: --
19200: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
19201: p_header_num => 0); -- 4262811
19202: --
19203: -- set accounting line options
19204: --
19201: p_header_num => 0); -- 4262811
19202: --
19203: -- set accounting line options
19204: --
19205: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
19206: p_natural_side_code => 'D'
19207: , p_gain_or_loss_flag => 'N'
19208: , p_gl_transfer_mode_code => 'S'
19209: , p_acct_entry_type_code => 'A'
19215: --
19216: --
19217: -- set accounting line type info
19218: --
19219: xla_ae_lines_pkg.SetAcctLineType
19220: (p_component_type => l_component_type
19221: ,p_event_type_code => l_event_type_code
19222: ,p_line_definition_owner_code => l_line_definition_owner_code
19223: ,p_line_definition_code => l_line_definition_code
19229: ,p_event_class_code => l_event_class_code);
19230: --
19231: -- set accounting class
19232: --
19233: xla_ae_lines_pkg.SetAcctClass(
19234: p_accounting_class_code => 'UNAPP'
19235: , p_ae_header_id => l_ae_header_id
19236: );
19237:
19237:
19238: --
19239: -- set rounding class
19240: --
19241: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19242: 'RECEIVABLE';
19243:
19244: --
19245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19241: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19242: 'RECEIVABLE';
19243:
19244: --
19245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19247: --
19248: -- bulk performance
19249: --
19242: 'RECEIVABLE';
19243:
19244: --
19245: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19247: --
19248: -- bulk performance
19249: --
19250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19246: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19247: --
19248: -- bulk performance
19249: --
19250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19251:
19252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19254:
19248: -- bulk performance
19249: --
19250: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19251:
19252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19254:
19255: -- 4955764
19256: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19252: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19253: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19254:
19255: -- 4955764
19256: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19257: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
19258:
19259: -- 4458381 Public Sector Enh
19260:
19296: l_rec_acct_attrs.array_num_value(15) := p_source_35;
19297: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
19298: l_rec_acct_attrs.array_char_value(16) := p_source_28;
19299:
19300: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19301: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19302:
19303: ---------------------------------------------------------------------------------------------------------------
19304: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19297: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
19298: l_rec_acct_attrs.array_char_value(16) := p_source_28;
19299:
19300: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19301: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19302:
19303: ---------------------------------------------------------------------------------------------------------------
19304: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19305: ---------------------------------------------------------------------------------------------------------------
19300: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19301: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19302:
19303: ---------------------------------------------------------------------------------------------------------------
19304: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19305: ---------------------------------------------------------------------------------------------------------------
19306: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19307:
19308: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19302:
19303: ---------------------------------------------------------------------------------------------------------------
19304: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19305: ---------------------------------------------------------------------------------------------------------------
19306: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19307:
19308: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19309: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19310:
19304: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19305: ---------------------------------------------------------------------------------------------------------------
19306: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19307:
19308: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19309: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19310:
19311: IF xla_accounting_cache_pkg.GetValueChar
19312: (p_source_code => 'LEDGER_CATEGORY_CODE'
19305: ---------------------------------------------------------------------------------------------------------------
19306: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19307:
19308: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19309: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19310:
19311: IF xla_accounting_cache_pkg.GetValueChar
19312: (p_source_code => 'LEDGER_CATEGORY_CODE'
19313: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
19316: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
19317: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
19318: )
19319: THEN
19320: xla_ae_lines_pkg.BflowUpgEntry
19321: (p_business_method_code => l_bflow_method_code
19322: ,p_business_class_code => l_bflow_class_code
19323: ,p_balance_type => l_balance_type_code);
19324: ELSE
19356: , x_value_type_code => l_adr_value_type_code
19357: , p_side => 'NA'
19358: );
19359:
19360: xla_ae_lines_pkg.set_ccid(
19361: p_code_combination_id => l_ccid
19362: , p_value_type_code => l_adr_value_type_code
19363: , p_transaction_coa_id => l_adr_transaction_coa_id
19364: , p_accounting_coa_id => l_adr_accounting_coa_id
19392: xla_accounting_err_pkg.build_message
19393: (p_appli_s_name => 'XLA'
19394: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19395: ,p_token_1 => 'LINE_NUMBER'
19396: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19397: ,p_token_2 => 'LINE_TYPE_NAME'
19398: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19399: l_component_type
19400: ,l_component_code
19428: --
19429: --
19430: ------------------------------------------------------------------------------------------------
19431: -- 4219869 Business Flow
19432: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19433: -- Prior Entry. Currently, the following code is always generated.
19434: ------------------------------------------------------------------------------------------------
19435: XLA_AE_LINES_PKG.ValidateCurrentLine;
19436:
19431: -- 4219869 Business Flow
19432: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
19433: -- Prior Entry. Currently, the following code is always generated.
19434: ------------------------------------------------------------------------------------------------
19435: XLA_AE_LINES_PKG.ValidateCurrentLine;
19436:
19437: ------------------------------------------------------------------------------------
19438: -- 4219869 Business Flow
19439: -- Populated credit and debit amounts -- Need to generate this within IF
19437: ------------------------------------------------------------------------------------
19438: -- 4219869 Business Flow
19439: -- Populated credit and debit amounts -- Need to generate this within IF
19440: ------------------------------------------------------------------------------------
19441: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19442:
19443: ----------------------------------------------------------------------------------
19444: -- 4219869 Business Flow
19445: -- Update journal entry status -- Need to generate this within IF
19469: -- To allow MPA report to determine if it should generate report process
19470: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19471: ------------------------------------------------------------------------------------------
19472:
19473: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19474: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19475: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
19476: -- call ADRs
19477: -- Bug 4922099
19470: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
19471: ------------------------------------------------------------------------------------------
19472:
19473: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
19474: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
19475: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
19476: -- call ADRs
19477: -- Bug 4922099
19478: --
19494: , x_value_type_code => l_adr_value_type_code
19495: , p_side => 'NA'
19496: );
19497:
19498: xla_ae_lines_pkg.set_ccid(
19499: p_code_combination_id => l_ccid
19500: , p_value_type_code => l_adr_value_type_code
19501: , p_transaction_coa_id => l_adr_transaction_coa_id
19502: , p_accounting_coa_id => l_adr_accounting_coa_id
19517:
19518: --
19519: -- Update the line information that should be overwritten
19520: --
19521: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19522: p_header_num => 1);
19523: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19524:
19525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19519: -- Update the line information that should be overwritten
19520: --
19521: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19522: p_header_num => 1);
19523: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19524:
19525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19526:
19527: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19521: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
19522: p_header_num => 1);
19523: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
19524:
19525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19526:
19527: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19528: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19529: END IF;
19524:
19525: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
19526:
19527: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
19528: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
19529: END IF;
19530:
19531: --
19532: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19531: --
19532: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
19533: --
19534: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
19535: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
19536: ELSE
19537: ---------------------------------------------------------------------------------------------------
19538: -- 4262811a Switch Sign
19539: ---------------------------------------------------------------------------------------------------
19536: ELSE
19537: ---------------------------------------------------------------------------------------------------
19538: -- 4262811a Switch Sign
19539: ---------------------------------------------------------------------------------------------------
19540: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19541: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19537: ---------------------------------------------------------------------------------------------------
19538: -- 4262811a Switch Sign
19539: ---------------------------------------------------------------------------------------------------
19540: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19541: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19538: -- 4262811a Switch Sign
19539: ---------------------------------------------------------------------------------------------------
19540: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19541: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19546: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19539: ---------------------------------------------------------------------------------------------------
19540: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19541: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19546: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19547: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19540: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
19541: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19546: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19547: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19548:
19542: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19546: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19547: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19548:
19549: END IF;
19550:
19543: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
19544: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19545: -- 5132302
19546: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
19547: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
19548:
19549: END IF;
19550:
19551: -- 4955764
19548:
19549: END IF;
19550:
19551: -- 4955764
19552: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19553: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19554:
19555:
19556: XLA_AE_LINES_PKG.ValidateCurrentLine;
19552: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19553: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19554:
19555:
19556: XLA_AE_LINES_PKG.ValidateCurrentLine;
19557: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19558:
19559: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19560: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19553: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
19554:
19555:
19556: XLA_AE_LINES_PKG.ValidateCurrentLine;
19557: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
19558:
19559: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
19560: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
19561: ,p_balance_type_code => l_balance_type_code);
19704: --
19705: -- bulk performance
19706: --
19707: l_balance_type_code VARCHAR2(1);
19708: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
19709: l_log_module VARCHAR2(240);
19710:
19711: --
19712: -- Upgrade strategy
19774: ') = 'N'
19775: THEN
19776:
19777: --
19778: XLA_AE_LINES_PKG.SetNewLine;
19779:
19780: p_balance_type_code := l_balance_type_code;
19781: -- set the flag so later we will know whether the gain loss line needs to be created
19782:
19786:
19787: --
19788: -- bulk performance
19789: --
19790: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
19791: p_header_num => 0); -- 4262811
19792: --
19793: -- set accounting line options
19794: --
19791: p_header_num => 0); -- 4262811
19792: --
19793: -- set accounting line options
19794: --
19795: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
19796: p_natural_side_code => 'C'
19797: , p_gain_or_loss_flag => 'N'
19798: , p_gl_transfer_mode_code => 'S'
19799: , p_acct_entry_type_code => 'A'
19805: --
19806: --
19807: -- set accounting line type info
19808: --
19809: xla_ae_lines_pkg.SetAcctLineType
19810: (p_component_type => l_component_type
19811: ,p_event_type_code => l_event_type_code
19812: ,p_line_definition_owner_code => l_line_definition_owner_code
19813: ,p_line_definition_code => l_line_definition_code
19819: ,p_event_class_code => l_event_class_code);
19820: --
19821: -- set accounting class
19822: --
19823: xla_ae_lines_pkg.SetAcctClass(
19824: p_accounting_class_code => 'UNID'
19825: , p_ae_header_id => l_ae_header_id
19826: );
19827:
19827:
19828: --
19829: -- set rounding class
19830: --
19831: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19832: 'RECEIVABLE';
19833:
19834: --
19835: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19831: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
19832: 'RECEIVABLE';
19833:
19834: --
19835: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19836: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19837: --
19838: -- bulk performance
19839: --
19832: 'RECEIVABLE';
19833:
19834: --
19835: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
19836: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19837: --
19838: -- bulk performance
19839: --
19840: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19836: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
19837: --
19838: -- bulk performance
19839: --
19840: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19841:
19842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19843: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19844:
19838: -- bulk performance
19839: --
19840: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
19841:
19842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19843: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19844:
19845: -- 4955764
19846: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19842: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
19843: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
19844:
19845: -- 4955764
19846: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
19847: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
19848:
19849: -- 4458381 Public Sector Enh
19850:
19886: l_rec_acct_attrs.array_num_value(15) := p_source_27;
19887: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
19888: l_rec_acct_attrs.array_char_value(16) := p_source_28;
19889:
19890: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19891: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19892:
19893: ---------------------------------------------------------------------------------------------------------------
19894: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19887: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
19888: l_rec_acct_attrs.array_char_value(16) := p_source_28;
19889:
19890: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19891: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19892:
19893: ---------------------------------------------------------------------------------------------------------------
19894: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19895: ---------------------------------------------------------------------------------------------------------------
19890: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
19891: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
19892:
19893: ---------------------------------------------------------------------------------------------------------------
19894: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19895: ---------------------------------------------------------------------------------------------------------------
19896: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19897:
19898: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19892:
19893: ---------------------------------------------------------------------------------------------------------------
19894: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19895: ---------------------------------------------------------------------------------------------------------------
19896: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19897:
19898: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19899: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19900:
19894: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
19895: ---------------------------------------------------------------------------------------------------------------
19896: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19897:
19898: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19899: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19900:
19901: IF xla_accounting_cache_pkg.GetValueChar
19902: (p_source_code => 'LEDGER_CATEGORY_CODE'
19895: ---------------------------------------------------------------------------------------------------------------
19896: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
19897:
19898: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19899: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
19900:
19901: IF xla_accounting_cache_pkg.GetValueChar
19902: (p_source_code => 'LEDGER_CATEGORY_CODE'
19903: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
19906: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
19907: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
19908: )
19909: THEN
19910: xla_ae_lines_pkg.BflowUpgEntry
19911: (p_business_method_code => l_bflow_method_code
19912: ,p_business_class_code => l_bflow_class_code
19913: ,p_balance_type => l_balance_type_code);
19914: ELSE
19946: , x_value_type_code => l_adr_value_type_code
19947: , p_side => 'NA'
19948: );
19949:
19950: xla_ae_lines_pkg.set_ccid(
19951: p_code_combination_id => l_ccid
19952: , p_value_type_code => l_adr_value_type_code
19953: , p_transaction_coa_id => l_adr_transaction_coa_id
19954: , p_accounting_coa_id => l_adr_accounting_coa_id
19982: xla_accounting_err_pkg.build_message
19983: (p_appli_s_name => 'XLA'
19984: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
19985: ,p_token_1 => 'LINE_NUMBER'
19986: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
19987: ,p_token_2 => 'LINE_TYPE_NAME'
19988: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
19989: l_component_type
19990: ,l_component_code
20018: --
20019: --
20020: ------------------------------------------------------------------------------------------------
20021: -- 4219869 Business Flow
20022: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20023: -- Prior Entry. Currently, the following code is always generated.
20024: ------------------------------------------------------------------------------------------------
20025: XLA_AE_LINES_PKG.ValidateCurrentLine;
20026:
20021: -- 4219869 Business Flow
20022: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20023: -- Prior Entry. Currently, the following code is always generated.
20024: ------------------------------------------------------------------------------------------------
20025: XLA_AE_LINES_PKG.ValidateCurrentLine;
20026:
20027: ------------------------------------------------------------------------------------
20028: -- 4219869 Business Flow
20029: -- Populated credit and debit amounts -- Need to generate this within IF
20027: ------------------------------------------------------------------------------------
20028: -- 4219869 Business Flow
20029: -- Populated credit and debit amounts -- Need to generate this within IF
20030: ------------------------------------------------------------------------------------
20031: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20032:
20033: ----------------------------------------------------------------------------------
20034: -- 4219869 Business Flow
20035: -- Update journal entry status -- Need to generate this within IF
20059: -- To allow MPA report to determine if it should generate report process
20060: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20061: ------------------------------------------------------------------------------------------
20062:
20063: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20064: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20065: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
20066: -- call ADRs
20067: -- Bug 4922099
20060: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20061: ------------------------------------------------------------------------------------------
20062:
20063: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20064: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20065: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
20066: -- call ADRs
20067: -- Bug 4922099
20068: --
20084: , x_value_type_code => l_adr_value_type_code
20085: , p_side => 'NA'
20086: );
20087:
20088: xla_ae_lines_pkg.set_ccid(
20089: p_code_combination_id => l_ccid
20090: , p_value_type_code => l_adr_value_type_code
20091: , p_transaction_coa_id => l_adr_transaction_coa_id
20092: , p_accounting_coa_id => l_adr_accounting_coa_id
20107:
20108: --
20109: -- Update the line information that should be overwritten
20110: --
20111: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20112: p_header_num => 1);
20113: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20114:
20115: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20109: -- Update the line information that should be overwritten
20110: --
20111: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20112: p_header_num => 1);
20113: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20114:
20115: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20116:
20117: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20111: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20112: p_header_num => 1);
20113: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20114:
20115: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20116:
20117: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20118: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20119: END IF;
20114:
20115: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20116:
20117: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20118: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20119: END IF;
20120:
20121: --
20122: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20121: --
20122: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20123: --
20124: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
20125: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
20126: ELSE
20127: ---------------------------------------------------------------------------------------------------
20128: -- 4262811a Switch Sign
20129: ---------------------------------------------------------------------------------------------------
20126: ELSE
20127: ---------------------------------------------------------------------------------------------------
20128: -- 4262811a Switch Sign
20129: ---------------------------------------------------------------------------------------------------
20130: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20127: ---------------------------------------------------------------------------------------------------
20128: -- 4262811a Switch Sign
20129: ---------------------------------------------------------------------------------------------------
20130: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20128: -- 4262811a Switch Sign
20129: ---------------------------------------------------------------------------------------------------
20130: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20136: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20129: ---------------------------------------------------------------------------------------------------
20130: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20136: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20137: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20130: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20131: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20136: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20137: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20138:
20132: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20136: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20137: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20138:
20139: END IF;
20140:
20133: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20134: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20135: -- 5132302
20136: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20137: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20138:
20139: END IF;
20140:
20141: -- 4955764
20138:
20139: END IF;
20140:
20141: -- 4955764
20142: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20143: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20144:
20145:
20146: XLA_AE_LINES_PKG.ValidateCurrentLine;
20142: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20143: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20144:
20145:
20146: XLA_AE_LINES_PKG.ValidateCurrentLine;
20147: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20148:
20149: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20150: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20143: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20144:
20145:
20146: XLA_AE_LINES_PKG.ValidateCurrentLine;
20147: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20148:
20149: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20150: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20151: ,p_balance_type_code => l_balance_type_code);
20296: --
20297: -- bulk performance
20298: --
20299: l_balance_type_code VARCHAR2(1);
20300: l_rec_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
20301: l_log_module VARCHAR2(240);
20302:
20303: --
20304: -- Upgrade strategy
20368: ') = 'N'
20369: THEN
20370:
20371: --
20372: XLA_AE_LINES_PKG.SetNewLine;
20373:
20374: p_balance_type_code := l_balance_type_code;
20375: -- set the flag so later we will know whether the gain loss line needs to be created
20376:
20380:
20381: --
20382: -- bulk performance
20383: --
20384: XLA_AE_LINES_PKG.set_ae_header_id (p_ae_header_id => p_event_id ,
20385: p_header_num => 0); -- 4262811
20386: --
20387: -- set accounting line options
20388: --
20385: p_header_num => 0); -- 4262811
20386: --
20387: -- set accounting line options
20388: --
20389: l_ae_header_id:= xla_ae_lines_pkg.SetAcctLineOption(
20390: p_natural_side_code => 'C'
20391: , p_gain_or_loss_flag => 'N'
20392: , p_gl_transfer_mode_code => 'S'
20393: , p_acct_entry_type_code => 'A'
20399: --
20400: --
20401: -- set accounting line type info
20402: --
20403: xla_ae_lines_pkg.SetAcctLineType
20404: (p_component_type => l_component_type
20405: ,p_event_type_code => l_event_type_code
20406: ,p_line_definition_owner_code => l_line_definition_owner_code
20407: ,p_line_definition_code => l_line_definition_code
20413: ,p_event_class_code => l_event_class_code);
20414: --
20415: -- set accounting class
20416: --
20417: xla_ae_lines_pkg.SetAcctClass(
20418: p_accounting_class_code => 'WRITE_OFF'
20419: , p_ae_header_id => l_ae_header_id
20420: );
20421:
20421:
20422: --
20423: -- set rounding class
20424: --
20425: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20426: 'RECEIVABLE';
20427:
20428: --
20429: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20425: XLA_AE_LINES_PKG.g_rec_lines.array_rounding_class(XLA_AE_LINES_PKG.g_LineNumber) :=
20426: 'RECEIVABLE';
20427:
20428: --
20429: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20430: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20431: --
20432: -- bulk performance
20433: --
20426: 'RECEIVABLE';
20427:
20428: --
20429: xla_ae_lines_pkg.g_rec_lines.array_calculate_acctd_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_acctd_flag;
20430: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20431: --
20432: -- bulk performance
20433: --
20434: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20430: xla_ae_lines_pkg.g_rec_lines.array_calculate_g_l_flag(xla_ae_lines_pkg.g_LineNumber) := p_calculate_g_l_flag;
20431: --
20432: -- bulk performance
20433: --
20434: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20435:
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20437: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20438:
20432: -- bulk performance
20433: --
20434: XLA_AE_LINES_PKG.g_rec_lines.array_balance_type_code(XLA_AE_LINES_PKG.g_LineNumber) := l_balance_type_code;
20435:
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20437: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20438:
20439: -- 4955764
20440: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20436: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_id(XLA_AE_LINES_PKG.g_LineNumber) :=
20437: XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id;
20438:
20439: -- 4955764
20440: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20441: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('header_index'));
20442:
20443: -- 4458381 Public Sector Enh
20444:
20480: l_rec_acct_attrs.array_num_value(15) := p_source_27;
20481: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
20482: l_rec_acct_attrs.array_char_value(16) := p_source_28;
20483:
20484: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20485: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20486:
20487: ---------------------------------------------------------------------------------------------------------------
20488: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20481: l_rec_acct_attrs.array_acct_attr_code(16) := 'PARTY_TYPE';
20482: l_rec_acct_attrs.array_char_value(16) := p_source_28;
20483:
20484: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20485: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20486:
20487: ---------------------------------------------------------------------------------------------------------------
20488: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20489: ---------------------------------------------------------------------------------------------------------------
20484: XLA_AE_LINES_PKG.SetLineAcctAttrs(l_rec_acct_attrs);
20485: p_gain_or_loss_ref := XLA_AE_LINES_PKG.g_rec_lines.array_gain_or_loss_ref(XLA_AE_LINES_PKG.g_LineNumber);
20486:
20487: ---------------------------------------------------------------------------------------------------------------
20488: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20489: ---------------------------------------------------------------------------------------------------------------
20490: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20491:
20492: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20486:
20487: ---------------------------------------------------------------------------------------------------------------
20488: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20489: ---------------------------------------------------------------------------------------------------------------
20490: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20491:
20492: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20493: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20494:
20488: -- 4336173 -- assign Business Flow Class (replace code in xla_ae_lines_pkg.Business_Flow_Validation)
20489: ---------------------------------------------------------------------------------------------------------------
20490: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20491:
20492: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20493: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20494:
20495: IF xla_accounting_cache_pkg.GetValueChar
20496: (p_source_code => 'LEDGER_CATEGORY_CODE'
20489: ---------------------------------------------------------------------------------------------------------------
20490: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := l_bflow_class_code;
20491:
20492: l_actual_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_actual_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20493: l_enc_upg_option := XLA_AE_LINES_PKG.g_rec_lines.array_enc_upg_option(XLA_AE_LINES_PKG.g_LineNumber);
20494:
20495: IF xla_accounting_cache_pkg.GetValueChar
20496: (p_source_code => 'LEDGER_CATEGORY_CODE'
20497: ,p_target_ledger_id => XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id) IN ('PRIMARY','ALC')
20500: AND ( (NVL(l_actual_upg_option, 'N') IN ('Y', 'O')) OR
20501: (NVL(l_enc_upg_option, 'N') IN ('Y', 'O'))
20502: )
20503: THEN
20504: xla_ae_lines_pkg.BflowUpgEntry
20505: (p_business_method_code => l_bflow_method_code
20506: ,p_business_class_code => l_bflow_class_code
20507: ,p_balance_type => l_balance_type_code);
20508: ELSE
20540: , x_value_type_code => l_adr_value_type_code
20541: , p_side => 'NA'
20542: );
20543:
20544: xla_ae_lines_pkg.set_ccid(
20545: p_code_combination_id => l_ccid
20546: , p_value_type_code => l_adr_value_type_code
20547: , p_transaction_coa_id => l_adr_transaction_coa_id
20548: , p_accounting_coa_id => l_adr_accounting_coa_id
20576: xla_accounting_err_pkg.build_message
20577: (p_appli_s_name => 'XLA'
20578: ,p_msg_name => 'XLA_UPG_OVERRIDE_ADR_UNDEFINED'
20579: ,p_token_1 => 'LINE_NUMBER'
20580: ,p_value_1 => XLA_AE_LINES_PKG.g_LineNumber
20581: ,p_token_2 => 'LINE_TYPE_NAME'
20582: ,p_value_2 => XLA_AE_SOURCES_PKG.GetComponentName (
20583: l_component_type
20584: ,l_component_code
20612: --
20613: --
20614: ------------------------------------------------------------------------------------------------
20615: -- 4219869 Business Flow
20616: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20617: -- Prior Entry. Currently, the following code is always generated.
20618: ------------------------------------------------------------------------------------------------
20619: XLA_AE_LINES_PKG.ValidateCurrentLine;
20620:
20615: -- 4219869 Business Flow
20616: -- NOTE: XLA_AE_LINES_PKG.ValidateCurrentLine should NOT be generated if business flow method is
20617: -- Prior Entry. Currently, the following code is always generated.
20618: ------------------------------------------------------------------------------------------------
20619: XLA_AE_LINES_PKG.ValidateCurrentLine;
20620:
20621: ------------------------------------------------------------------------------------
20622: -- 4219869 Business Flow
20623: -- Populated credit and debit amounts -- Need to generate this within IF
20621: ------------------------------------------------------------------------------------
20622: -- 4219869 Business Flow
20623: -- Populated credit and debit amounts -- Need to generate this within IF
20624: ------------------------------------------------------------------------------------
20625: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20626:
20627: ----------------------------------------------------------------------------------
20628: -- 4219869 Business Flow
20629: -- Update journal entry status -- Need to generate this within IF
20653: -- To allow MPA report to determine if it should generate report process
20654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20655: ------------------------------------------------------------------------------------------
20656:
20657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20659: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
20660: -- call ADRs
20661: -- Bug 4922099
20654: XLA_ACCOUNTING_PKG.g_mpa_accrual_exists := 'Y';
20655: ------------------------------------------------------------------------------------------
20656:
20657: l_accrual_line_num := XLA_AE_LINES_PKG.g_LineNumber;
20658: XLA_AE_LINES_PKG.CopyLineInfo(l_accrual_line_num);
20659: -- added call to set_ccid to execute mapping for secondary accrual reversal entries bug 7444204
20660: -- call ADRs
20661: -- Bug 4922099
20662: --
20678: , x_value_type_code => l_adr_value_type_code
20679: , p_side => 'NA'
20680: );
20681:
20682: xla_ae_lines_pkg.set_ccid(
20683: p_code_combination_id => l_ccid
20684: , p_value_type_code => l_adr_value_type_code
20685: , p_transaction_coa_id => l_adr_transaction_coa_id
20686: , p_accounting_coa_id => l_adr_accounting_coa_id
20701:
20702: --
20703: -- Update the line information that should be overwritten
20704: --
20705: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20706: p_header_num => 1);
20707: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20708:
20709: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20703: -- Update the line information that should be overwritten
20704: --
20705: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20706: p_header_num => 1);
20707: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20708:
20709: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20710:
20711: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20705: XLA_AE_LINES_PKG.set_ae_header_id(p_ae_header_id => p_event_id ,
20706: p_header_num => 1);
20707: XLA_AE_LINES_PKG.g_rec_lines.array_header_num(XLA_AE_LINES_PKG.g_LineNumber) :=1;
20708:
20709: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20710:
20711: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20712: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20713: END IF;
20708:
20709: XLA_AE_LINES_PKG.g_rec_lines.array_business_class_code(XLA_AE_LINES_PKG.g_LineNumber) := NULL; -- 4669271
20710:
20711: IF l_bflow_method_code <> 'NONE' THEN -- 4655713b
20712: XLA_AE_LINES_PKG.g_rec_lines.array_reversal_code(XLA_AE_LINES_PKG.g_LineNumber) := CONCAT('MPA_',l_bflow_method_code);
20713: END IF;
20714:
20715: --
20716: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20715: --
20716: -- Depending on the Reversal Method setup, do a switch side or changes sign for the amounts
20717: --
20718: IF (XLA_AE_JOURNAL_ENTRY_PKG.g_cache_ledgers_info.ledger_reversal_option = 'SIDE') THEN
20719: XLA_AE_LINES_PKG.g_rec_lines.array_natural_side_code(XLA_AE_LINES_PKG.g_LineNumber) := l_acc_rev_natural_side_code;
20720: ELSE
20721: ---------------------------------------------------------------------------------------------------
20722: -- 4262811a Switch Sign
20723: ---------------------------------------------------------------------------------------------------
20720: ELSE
20721: ---------------------------------------------------------------------------------------------------
20722: -- 4262811a Switch Sign
20723: ---------------------------------------------------------------------------------------------------
20724: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20725: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20721: ---------------------------------------------------------------------------------------------------
20722: -- 4262811a Switch Sign
20723: ---------------------------------------------------------------------------------------------------
20724: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20725: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20722: -- 4262811a Switch Sign
20723: ---------------------------------------------------------------------------------------------------
20724: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20725: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20730: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20723: ---------------------------------------------------------------------------------------------------
20724: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20725: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20730: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20731: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20724: XLA_AE_LINES_PKG.g_rec_lines.array_switch_side_flag(XLA_AE_LINES_PKG.g_LineNumber) := 'N'; -- 5052518
20725: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20730: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20731: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20732:
20726: XLA_AE_LINES_PKG.g_rec_lines.array_ledger_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20730: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20731: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20732:
20733: END IF;
20734:
20727: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) :=
20728: XLA_AE_LINES_PKG.g_rec_lines.array_entered_amount(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20729: -- 5132302
20730: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) :=
20731: XLA_AE_LINES_PKG.g_rec_lines.array_bflow_applied_to_amt(XLA_AE_LINES_PKG.g_LineNumber) * -1;
20732:
20733: END IF;
20734:
20735: -- 4955764
20732:
20733: END IF;
20734:
20735: -- 4955764
20736: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20737: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20738:
20739:
20740: XLA_AE_LINES_PKG.ValidateCurrentLine;
20736: XLA_AE_LINES_PKG.g_rec_lines.array_gl_date(XLA_AE_LINES_PKG.g_LineNumber) :=
20737: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20738:
20739:
20740: XLA_AE_LINES_PKG.ValidateCurrentLine;
20741: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20742:
20743: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20744: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20737: XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(g_array_event(p_event_id).array_value_num('acc_rev_header_index'));
20738:
20739:
20740: XLA_AE_LINES_PKG.ValidateCurrentLine;
20741: XLA_AE_LINES_PKG.SetDebitCreditAmounts;
20742:
20743: XLA_AE_JOURNAL_ENTRY_PKG.UpdateJournalEntryStatus
20744: (p_hdr_idx => g_array_event(p_event_id).array_value_num('acc_rev_header_index')
20745: ,p_balance_type_code => l_balance_type_code);
21172: l_first_event_id NUMBER;
21173: l_last_event_id NUMBER;
21174:
21175: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
21176: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
21177: --
21178: --
21179: l_result BOOLEAN := TRUE;
21180: l_rows NUMBER := 1000;
21424: EXIT WHEN l_array_entity_id.COUNT = 0;
21425:
21426: -- initialize arrays
21427: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
21428: XLA_AE_LINES_PKG.g_rec_lines := NULL;
21429:
21430: --
21431: -- Bug 4458708
21432: --
21429:
21430: --
21431: -- Bug 4458708
21432: --
21433: XLA_AE_LINES_PKG.g_LineNumber := 0;
21434:
21435:
21436: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
21437: g_last_hdr_idx := l_array_event_id.LAST;
21571: --
21572: -- following sets the accounting attributes needed to reverse
21573: -- accounting for a distributeion
21574: --
21575: xla_ae_lines_pkg.SetTrxReversalAttrs
21576: (p_event_id => l_event_id
21577: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
21578: ,p_trx_reversal_source => l_trx_reversal_source);
21579:
21603: --
21604: -- insert dummy rows into lines gt table that were created due to
21605: -- transaction reversals
21606: --
21607: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
21608: l_result := XLA_AE_LINES_PKG.InsertLines;
21609: END IF;
21610:
21611: --
21604: -- insert dummy rows into lines gt table that were created due to
21605: -- transaction reversals
21606: --
21607: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
21608: l_result := XLA_AE_LINES_PKG.InsertLines;
21609: END IF;
21610:
21611: --
21612: -- reset the temp_line_num for each set of events fetched from header
21612: -- reset the temp_line_num for each set of events fetched from header
21613: -- cursor rather than doing it for each new event in line cursor
21614: -- Bug 3939231
21615: --
21616: xla_ae_lines_pkg.g_temp_line_num := 0;
21617:
21618:
21619:
21620: --
21681: END IF;
21682: --
21683: EXIT WHEN l_array_entity_id.count = 0;
21684:
21685: XLA_AE_LINES_PKG.g_rec_lines := null;
21686:
21687: --
21688: -- Bug 4458708
21689: --
21686:
21687: --
21688: -- Bug 4458708
21689: --
21690: XLA_AE_LINES_PKG.g_LineNumber := 0;
21691: --
21692: --
21693:
21694: FOR Idx IN 1..l_array_event_id.count LOOP
21758:
21759:
21760:
21761: --
21762: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
21763:
21764: l_acct_reversal_source := SUBSTR(NULL, 1,30);
21765:
21766: IF l_continue_with_lines THEN
21794: --
21795:
21796: -- No reversal code generated
21797:
21798: xla_ae_lines_pkg.SetAcctReversalAttrs
21799: (p_event_id => l_event_id
21800: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
21801: ,p_calculate_acctd_flag => l_calculate_acctd_flag
21802: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
22044:
22045: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
22046: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
22047: AND (l_actual_flag = 'A')) THEN
22048: XLA_AE_LINES_PKG.CreateGainOrLossLines(
22049: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
22050: ,p_application_id => p_application_id
22051: ,p_amb_context_code => 'DEFAULT'
22052: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
22077: END IF;
22078: END IF;
22079:
22080: END LOOP;
22081: l_result := XLA_AE_LINES_PKG.InsertLines ;
22082: end loop;
22083: close line_cur;
22084:
22085:
22710: l_first_event_id NUMBER;
22711: l_last_event_id NUMBER;
22712:
22713: l_rec_acct_attrs XLA_AE_HEADER_PKG.t_rec_acct_attrs;
22714: l_rec_rev_acct_attrs XLA_AE_LINES_PKG.t_rec_acct_attrs;
22715: --
22716: --
22717: l_result BOOLEAN := TRUE;
22718: l_rows NUMBER := 1000;
23059: EXIT WHEN l_array_entity_id.COUNT = 0;
23060:
23061: -- initialize arrays
23062: XLA_AE_HEADER_PKG.g_rec_header_new := NULL;
23063: XLA_AE_LINES_PKG.g_rec_lines := NULL;
23064:
23065: --
23066: -- Bug 4458708
23067: --
23064:
23065: --
23066: -- Bug 4458708
23067: --
23068: XLA_AE_LINES_PKG.g_LineNumber := 0;
23069:
23070:
23071: -- 4262811 - when creating Accrual Reversal or MPA, use g_last_hdr_idx to increment for next header id
23072: g_last_hdr_idx := l_array_event_id.LAST;
23213: --
23214: -- following sets the accounting attributes needed to reverse
23215: -- accounting for a distributeion
23216: --
23217: xla_ae_lines_pkg.SetTrxReversalAttrs
23218: (p_event_id => l_event_id
23219: ,p_gl_date => XLA_AE_HEADER_PKG.g_rec_header_new.array_gl_date(hdr_idx)
23220: ,p_trx_reversal_source => l_trx_reversal_source);
23221:
23245: --
23246: -- insert dummy rows into lines gt table that were created due to
23247: -- transaction reversals
23248: --
23249: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
23250: l_result := XLA_AE_LINES_PKG.InsertLines;
23251: END IF;
23252:
23253: --
23246: -- insert dummy rows into lines gt table that were created due to
23247: -- transaction reversals
23248: --
23249: IF XLA_AE_LINES_PKG.g_rec_lines.array_ae_header_id.COUNT > 0 THEN
23250: l_result := XLA_AE_LINES_PKG.InsertLines;
23251: END IF;
23252:
23253: --
23254: -- reset the temp_line_num for each set of events fetched from header
23254: -- reset the temp_line_num for each set of events fetched from header
23255: -- cursor rather than doing it for each new event in line cursor
23256: -- Bug 3939231
23257: --
23258: xla_ae_lines_pkg.g_temp_line_num := 0;
23259:
23260:
23261:
23262: --
23341: END IF;
23342: --
23343: EXIT WHEN l_array_entity_id.count = 0;
23344:
23345: XLA_AE_LINES_PKG.g_rec_lines := null;
23346:
23347: --
23348: -- Bug 4458708
23349: --
23346:
23347: --
23348: -- Bug 4458708
23349: --
23350: XLA_AE_LINES_PKG.g_LineNumber := 0;
23351: --
23352: --
23353:
23354: FOR Idx IN 1..l_array_event_id.count LOOP
23418:
23419:
23420:
23421: --
23422: xla_ae_lines_pkg.SetExtractLine(p_extract_line => l_array_extract_line_num(Idx));
23423:
23424: l_acct_reversal_source := SUBSTR(NULL, 1,30);
23425:
23426: IF l_continue_with_lines THEN
23454: --
23455:
23456: -- No reversal code generated
23457:
23458: xla_ae_lines_pkg.SetAcctReversalAttrs
23459: (p_event_id => l_event_id
23460: ,p_rec_acct_attrs => l_rec_rev_acct_attrs
23461: ,p_calculate_acctd_flag => l_calculate_acctd_flag
23462: ,p_calculate_g_l_flag => l_calculate_g_l_flag);
24443:
24444: -- IF((l_calculate_g_l_flag='Y' or XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.target_ledger_id <>
24445: -- XLA_AE_JOURNAL_ENTRY_PKG.g_cache_event.ledger_id)
24446: AND (l_actual_flag = 'A')) THEN
24447: XLA_AE_LINES_PKG.CreateGainOrLossLines(
24448: p_event_id => xla_ae_journal_entry_pkg.g_cache_event.event_id
24449: ,p_application_id => p_application_id
24450: ,p_amb_context_code => 'DEFAULT'
24451: ,p_entity_code => xla_ae_journal_entry_pkg.g_cache_event.entity_code
24476: END IF;
24477: END IF;
24478:
24479: END LOOP;
24480: l_result := XLA_AE_LINES_PKG.InsertLines ;
24481: end loop;
24482: close line_cur;
24483:
24484:
24611:
24612: --
24613: -- initialize array of lines with NULL
24614: --
24615: xla_ae_lines_pkg.SetNullLine;
24616:
24617: --
24618: -- initialize header extract count -- Bug 4865292
24619: --